From 19d92def8ec849851e00e9a79fe9711af5b91218 Mon Sep 17 00:00:00 2001
From: "Reyesrivera, Jose" <reyesriv@msu.edu>
Date: Wed, 6 Nov 2019 14:51:35 -0500
Subject: [PATCH] update CMS Frames

---
 .DS_Store                                 |   Bin 6148 -> 6148 bytes
 feynamps/ggHgg_box_1_FeynAmp_9diags.m     |  3373 +-
 feynamps/ggHgg_box_4_FeynAmp_9diags.m     |   138 +-
 feynamps/ggHgg_box_test_2diags.m          |  1265 +
 feynamps/ggHgg_triangle_FeynAmp_38diags.m |  1392 +-
 ggHgg-SM.diagrams/box_1.png               |   Bin 42572 -> 42572 bytes
 ggHgg-SM.diagrams/box_2.png               |   Bin 44304 -> 44304 bytes
 ggHgg-SM.diagrams/box_3.png               |   Bin 44879 -> 44879 bytes
 ggHgg-SM.diagrams/box_4.png               |   Bin 39242 -> 39242 bytes
 ggHgg-SM.diagrams/triangle_1.png          |   Bin 45107 -> 45107 bytes
 ggHgg-SM.diagrams/triangle_2.png          |   Bin 44941 -> 44941 bytes
 ggHgg-SM.diagrams/triangle_3.png          |   Bin 47827 -> 47827 bytes
 ggHgg-SM.diagrams/triangle_4.png          |   Bin 47337 -> 47337 bytes
 ggHgg-SM.diagrams/triangle_5.png          |   Bin 12130 -> 12130 bytes
 scripts/FA_FC_B_T_amps.nb                 | 42846 ++++++++++++++++++--
 15 files changed, 43786 insertions(+), 5228 deletions(-)
 create mode 100644 feynamps/ggHgg_box_test_2diags.m

diff --git a/.DS_Store b/.DS_Store
index 93cdbde8722babf3f1c1f95a8ca5463afa433345..9ff987074f822072901ea51ab76e0255e35f9a57 100644
GIT binary patch
delta 14
VcmZoMXffCjz|P39Igov`001I01U~=(

delta 14
VcmZoMXffCjz|P3HIgov`001I61V8`)

diff --git a/feynamps/ggHgg_box_1_FeynAmp_9diags.m b/feynamps/ggHgg_box_1_FeynAmp_9diags.m
index 8d12acbe..249934f4 100644
--- a/feynamps/ggHgg_box_1_FeynAmp_9diags.m
+++ b/feynamps/ggHgg_box_1_FeynAmp_9diags.m
@@ -225,8 +225,8 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
         ((S - 2*S34 + 2*T - T24)*Pair[e[2], ec[5]] - 
          2*(2*(Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
            Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))))/
-     (MW*SW) + (Alfas2*EL*MT2*C0i[cc0, U, T14, 0, MT2, MT2, MT2]*
-      (4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+     (MW*SW) - (Alfas2*EL*MT2*C0i[cc0, U, T14, 0, MT2, MT2, MT2]*
+      (-4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
             2*Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
              (Pair[ec[4], k[2]] + 2*Pair[ec[4], k[5]]))) + 
          Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
@@ -234,7 +234,7 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
              Pair[ec[5], k[3]])) + Pair[e[1], k[4]]*
           ((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
            Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]))) + 
-       Pair[e[1], ec[4]]*((3*S - 2*S34 + 2*T - 3*T24)*Pair[e[2], ec[5]] - 
+       Pair[e[1], ec[4]]*((-3*S + 2*S34 - 2*T + 3*T24)*Pair[e[2], ec[5]] + 
          2*(Pair[e[2], k[4]]*(-2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
            Pair[e[2], k[1]]*(Pair[ec[5], k[2]] + 2*Pair[ec[5], k[4]])))))/
      (MW*SW) - (Alfas2*EL*MT2*D0i[dd2, 0, U, T14, MH2 - S - T24 - U, MH2, 0, 
@@ -870,9 +870,9 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
        Pair[e[1], ec[4]]*((2*S - S34 + T - 2*T24)*Pair[e[2], ec[5]] - 
          2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*(3*Pair[ec[5], k[2]] - 
              2*Pair[ec[5], k[3]]) + Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + 
-             Pair[ec[5], k[4]])))))/(MW*SW) + 
+             Pair[ec[5], k[4]])))))/(MW*SW) - 
     (Alfas2*EL*MT2*C0i[cc0, U, T14, 0, MT2, MT2, MT2]*
-      (4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+      (-4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
             2*Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
              (Pair[ec[4], k[2]] + 2*Pair[ec[4], k[5]]))) + 
          Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
@@ -880,7 +880,7 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
              Pair[ec[5], k[3]])) + Pair[e[1], k[4]]*
           ((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
            Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]))) + 
-       Pair[e[1], ec[4]]*((3*S - 2*S34 + 2*T - 3*T24)*Pair[e[2], ec[5]] - 
+       Pair[e[1], ec[4]]*((-3*S + 2*S34 - 2*T + 3*T24)*Pair[e[2], ec[5]] + 
          2*(Pair[e[2], k[4]]*(-2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
            Pair[e[2], k[1]]*(Pair[ec[5], k[2]] + 2*Pair[ec[5], k[4]])))))/
      (MW*SW) - (Alfas2*EL*MT2*D0i[dd2, 0, U, T14, MH2 - S - T24 - U, MH2, 0, 
@@ -980,12 +980,12 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
             Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
         (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
           Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - 
-           Pair[ec[5], k[2]]))))/(MW*SW) - 
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
     (8*Alfas2*EL*MT2*D0i[dd002, MH2, 2*MH2 - S34 - T - U, 0, 
        MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-      (((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
+      (((T + T14 - T24 - U)*Pair[e[1], e[2]] + 
          4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] - 2*Pair[ec[4], k[5]]*
+            Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
         (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
           Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - 
            Pair[ec[5], k[2]]))))/(MW*SW) + 
@@ -1921,12 +1921,12 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
             Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
         (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
           Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - 
-           Pair[ec[5], k[2]]))))/(MW*SW) - 
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
     (8*Alfas2*EL*MT2*D0i[dd002, MH2, 2*MH2 - S34 - T - U, 0, 
        MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-      (((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
+      (((T + T14 - T24 - U)*Pair[e[1], e[2]] + 
          4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] - 2*Pair[ec[4], k[5]]*
+            Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
         (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
           Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - 
            Pair[ec[5], k[2]]))))/(MW*SW) + 
@@ -2855,1461 +2855,288 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
                Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
              Pair[e[2], k[4]]*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) + 2*
                 Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))))/(MW*SW)) + 
-  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu4, Glu5, Glu2, 0, 0]]*
-    (-(Den[T14, 0]*(-8*D0i[dd112, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, 
-          MT2, MT2, MT2]*Pair[e[2], k[3]]*((-S + T24)*Pair[e[1], ec[4]] + 
-          4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
-        8*D0i[dd113, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-          MT2]*Pair[e[2], k[5]]*((-S + T24)*Pair[e[1], ec[4]] + 
+  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu2, Glu5, Glu4, 0, 0]]*
+    (-(Den[T14, 0]*((8*D0i[dd112, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, 
+            MT2, MT2, MT2, MT2] - 8*D0i[dd112, 0, U, T14, MH2 - S - T24 - U, 
+            MH2, 0, MT2, MT2, MT2, MT2])*Pair[e[2], k[3]]*
+         ((-S + T24)*Pair[e[1], ec[4]] + 
           4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
-        8*D0i[dd333, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-          MT2]*Pair[e[2], k[5]]*((-S34 + T)*Pair[e[1], ec[4]] + 
-          4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
-             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[ec[4], k[2]] - 
-              Pair[ec[4], k[5]])))*Pair[ec[5], k[2]] + 
-        8*D0i[dd133, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-          MT2]*Pair[e[2], k[5]]*((-S - S34 + T + T24)*Pair[e[1], ec[4]] + 
-          4*(2*Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
-             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - 
-              Pair[ec[4], k[5]])))*Pair[ec[5], k[2]] - 
-        8*D0i[dd233, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-          MT2]*(-((S34 - T)*Pair[e[1], ec[4]]*(Pair[e[2], k[3]]*
-              Pair[ec[5], k[2]] - Pair[e[2], k[5]]*(Pair[ec[5], k[2]] + Pair[
-                ec[5], k[3]]))) + 4*(-(Pair[e[1], k[3]]*Pair[e[2], k[5]]*
-              Pair[ec[4], k[1]]*Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*
-             Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
-            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-             Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-             Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
+             Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] - 
+        2*D0i[dd1, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+         (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
+          Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+            (S - T24)*Pair[e[2], k[3]] + (-MH2 + U)*Pair[e[2], k[4]]) + 
+          2*(-MH2 + U)*Pair[e[1], e[2]]*Pair[ec[4], k[1]] + 
+          4*Pair[e[2], k[3]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+            Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
+        (8*D0i[dd001, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+            MT2] - 8*D0i[dd001, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, 
+            MT2, MT2, MT2])*(Pair[e[2], ec[5]]*
+           ((-S + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
+                k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]])) - 
+          2*(Pair[e[1], ec[4]]*(Pair[e[2], k[1]] + Pair[e[2], k[4]]) - 
+            2*(Pair[e[1], k[4]]*Pair[e[2], ec[4]] + Pair[e[1], e[2]]*Pair[
+                ec[4], k[1]]))*Pair[ec[5], k[2]]) + 
+        D0i[dd1, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, MT2]*
+         (Pair[e[2], ec[5]]*((S - T24)*(MH2 - U)*Pair[e[1], ec[4]] - 
+            4*(MH2 - U)*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*Pair[ec[4], k[2]])) + 2*Pair[e[2], k[3]]*
+           ((-S + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
+                k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
+           Pair[ec[5], k[2]]) + 8*(D0i[dd113, 0, U, T14, MH2 - S - T24 - U, 
+            MH2, 0, MT2, MT2, MT2, MT2]*Pair[e[2], k[5]]*
+           ((-S + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
+                k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
+           Pair[ec[5], k[2]] + D0i[dd113, 0, U, 0, 2*MH2 - S34 - T - U, MH2, 
+            T14, MT2, MT2, MT2, MT2]*(-((S - T24)*Pair[e[1], ec[4]]*
+              (Pair[e[2], k[1]] - Pair[e[2], k[4]])) + 
+            4*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*(Pair[e[1], k[2]]*Pair[
+                ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
+           Pair[ec[5], k[2]]) + (8*D0i[dd222, 0, U, 0, 2*MH2 - S34 - T - U, 
+            MH2, T14, MT2, MT2, MT2, MT2] - 8*D0i[dd222, 0, U, T14, 
+            MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2])*Pair[e[2], k[3]]*
+         ((-S34 + T)*Pair[e[1], ec[4]] + 
+          4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             Pair[ec[4], k[3]]))*Pair[ec[5], k[3]] + 
+        8*D0i[dd223, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+          MT2]*(Pair[e[1], ec[4]]*((-S - 2*S34 + 2*T + T24)*
+             Pair[e[2], k[3]] + (-S34 + T)*Pair[e[2], k[5]]) + 
+          4*(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]] + 
+            Pair[e[1], k[3]]*(3*Pair[e[2], k[3]] + Pair[e[2], k[5]])*
+             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[e[2], k[5]]*Pair[
+                ec[4], k[3]] + Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 
+                Pair[ec[4], k[5]]))))*Pair[ec[5], k[3]] + 
+        8*D0i[dd233, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+          MT2]*(Pair[e[1], ec[4]]*((-2*S - S34 + T + 2*T24)*
+             Pair[e[2], k[3]] + (-S - S34 + T + T24)*Pair[e[2], k[5]]) + 
+          4*(Pair[e[1], k[5]]*(2*Pair[e[2], k[3]] + Pair[e[2], k[5]])*
+             Pair[ec[4], k[1]] + Pair[e[1], k[3]]*(3*Pair[e[2], k[3]] + 
+              2*Pair[e[2], k[5]])*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             (Pair[e[2], k[5]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
+              Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 2*Pair[ec[4], k[5]]))))*
+         Pair[ec[5], k[3]] + 8*(D0i[dd333, 0, U, T14, MH2 - S - T24 - U, MH2, 
+            0, MT2, MT2, MT2, MT2]*Pair[e[2], k[5]]*
+           ((-S34 + T)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
+                k[1]] - Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*(Pair[ec[4], k[2]] - Pair[ec[4], k[5]])))*
+           Pair[ec[5], k[2]] + D0i[dd333, 0, U, 0, 2*MH2 - S34 - T - U, MH2, 
+            T14, MT2, MT2, MT2, MT2]*(-((S - T24)*Pair[e[1], ec[4]]*
+              (Pair[e[2], k[1]] - Pair[e[2], k[4]])) + 
+            4*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*(Pair[e[1], k[2]]*Pair[
+                ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
+           Pair[ec[5], k[3]]) + 4*D0i[dd12, 0, U, 0, 2*MH2 - S34 - T - U, 
+          MH2, T14, MT2, MT2, MT2, MT2]*
+         (-2*(MH2 - U)*(Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
+            Pair[e[1], e[2]]*Pair[ec[4], k[1]])*Pair[ec[5], k[2]] + 
+          2*Pair[e[2], k[3]]*(-((S + T24)*Pair[e[1], k[4]]*Pair[ec[4], ec[
+                5]]) - (S + T24)*Pair[e[1], ec[5]]*Pair[ec[4], k[1]] + 
+            4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
+                ec[4], k[2]])*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]])) - 
+          Pair[e[1], ec[4]]*(-((MH2 - U)*(Pair[e[2], k[1]] + Pair[e[2], 
+                k[4]])*Pair[ec[5], k[2]]) - Pair[e[2], k[3]]*
+             (2*(S + T24)*Pair[ec[5], k[1]] - (S - 3*T24)*Pair[ec[5], k[2]] + 
+              (-3*S + T24)*Pair[ec[5], k[3]]))) + 
+        8*D0i[dd123, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+          MT2]*(4*(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*
+             Pair[ec[5], k[2]] + Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] + 
+              Pair[e[2], k[5]])*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+            2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[3]]*
+             Pair[ec[5], k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*
+             Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + Pair[e[1], k[4]]*
+             Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[2]] + 
+            2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
+             Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 2*Pair[e[1], k[4]]*
+             Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
+            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
+             Pair[ec[5], k[3]]) + Pair[e[1], ec[4]]*
+           (Pair[e[2], k[5]]*((-S34 + T)*Pair[ec[5], k[2]] + (-S + T24)*Pair[
+                ec[5], k[3]]) + Pair[e[2], k[3]]*((-S - S34 + T + T24)*Pair[
+                ec[5], k[2]] + 2*(-S + T24)*Pair[ec[5], k[3]]))) + 
+        4*D0i[dd23, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+          MT2]*(2*Pair[e[1], k[4]]*((-7*MH2 + 3*(S34 + T + U))*
+             Pair[e[2], k[3]] + (-3*MH2 + S34 + T + U)*Pair[e[2], k[5]])*
+           Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*
+           ((-7*MH2 + 3*(S34 + T + U))*Pair[e[2], k[3]] + 
+            (-3*MH2 + S34 + T + U)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
+          2*(MH2 + S + T24 - U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*
+           Pair[ec[5], k[3]] - 2*(MH2 + S + T24 - U)*Pair[e[1], e[2]]*
+           Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+          8*(2*Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] + Pair[e[2], k[5]])*
+             Pair[ec[4], k[1]] + Pair[e[1], k[5]]*(3*Pair[e[2], k[3]] + 
+              Pair[e[2], k[5]])*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             (Pair[e[2], k[5]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
+              Pair[e[2], k[3]]*(4*Pair[ec[4], k[3]] + 3*Pair[ec[4], k[5]])))*
+           Pair[ec[5], k[3]] - Pair[e[1], ec[4]]*(-2*(MH2 + S + T24 - U)*
+             Pair[e[2], k[1]]*Pair[ec[5], k[3]] - Pair[e[2], k[3]]*
+             (2*(MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[1]] + 
+              (MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[2]] + (2*MH2 - 12*S - 
+                4*S34 - 5*T14 - U)*Pair[ec[5], k[3]]) - Pair[e[2], k[5]]*
+             (2*(MH2 + S + T14 + T24)*Pair[ec[5], k[1]] + (MH2 + S + T14 + 
+                T24)*Pair[ec[5], k[2]] + (2*MH2 - 6*S - 4*S34 - 3*T14 - 
+                2*T24 - U)*Pair[ec[5], k[3]]))) + 
+        2*D0i[dd2, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+          MT2]*(-2*Pair[e[1], ec[5]]*((2*S + T14 + 2*T24 + U)*
+             Pair[e[2], k[3]] + (-MH2 + U)*Pair[e[2], k[5]])*
+           Pair[ec[4], k[1]] + 2*Pair[e[2], ec[5]]*
+           ((-4*MH2 + S34 + T + 2*U)*Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+            (S + T24)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             ((-4*MH2 + S34 + T + 2*U)*Pair[ec[4], k[2]] + (S + T24)*Pair[
+                ec[4], k[3]])) - 2*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
+           ((-3*MH2 + S34 + T + U)*Pair[ec[5], k[2]] + 
+            (2*MH2 + S + T24 - 2*U)*Pair[ec[5], k[3]]) - 2*Pair[e[1], k[4]]*
+           (((2*S + T14 + 2*T24 + U)*Pair[e[2], k[3]] + (-MH2 + U)*Pair[e[2], 
+                k[5]])*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*
+             ((-3*MH2 + S34 + T + U)*Pair[ec[5], k[2]] + (2*MH2 + S + T24 - 
+                2*U)*Pair[ec[5], k[3]])) - Pair[e[1], ec[4]]*
+           ((-2*MH2*(S - T24) + S*(S34 + U) - T24*(T + U))*
+             Pair[e[2], ec[5]] + 2*Pair[e[2], k[1]]*((MH2 + S + T14 + T24)*
+               Pair[ec[5], k[2]] - (2*MH2 + S + T24 - 2*U)*Pair[ec[5], 
+                k[3]]) + Pair[e[2], k[5]]*(2*(MH2 - U)*Pair[ec[5], k[1]] - 
+              2*(MH2 - T)*Pair[ec[5], k[2]] + (MH2 + 2*S - U)*Pair[ec[5], 
+                k[3]]) - Pair[e[2], k[3]]*(2*(2*S + T14 + 2*T24 + U)*Pair[
+                ec[5], k[1]] + (3*MH2 + S - 2*T + T14 + 3*T24)*Pair[ec[5], 
+                k[2]] + 2*(-2*MH2 - 3*S + T + T24 + U)*Pair[ec[5], k[3]])) + 
+          4*(-(Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+             Pair[ec[4], k[5]]*Pair[ec[5], k[2]] + 3*Pair[e[1], k[2]]*
+             Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+            Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]] + 3*Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+             Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + Pair[e[1], k[4]]*
              Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
-            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
-             Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], k[1]]*
-             (Pair[e[2], k[3]]*Pair[ec[5], k[2]] - Pair[e[2], k[5]]*Pair[
-                ec[5], k[3]]) + Pair[e[1], k[5]]*Pair[ec[4], k[1]]*
-             (-(Pair[e[2], k[3]]*Pair[ec[5], k[2]]) + Pair[e[2], k[5]]*Pair[
-                ec[5], k[3]]))) - 8*(D0i[dd123, 0, U, T14, MH2 - S - T24 - U, 
-            MH2, 0, MT2, MT2, MT2, MT2]*(Pair[e[1], ec[4]]*
-             ((-S - S34 + T + T24)*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-              Pair[e[2], k[5]]*((S34 - T)*Pair[ec[5], k[2]] + (S - T24)*
-                 Pair[ec[5], k[3]])) + 4*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*
-                Pair[ec[4], k[1]]*Pair[ec[5], k[2]]) - Pair[e[1], k[3]]*Pair[
-                e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-              2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[
-                ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], 
-                k[3]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-               Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[
-                e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
-              Pair[e[1], k[2]]*Pair[ec[4], k[1]]*(2*Pair[e[2], k[3]]*
-                 Pair[ec[5], k[2]] - Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + 
-          D0i[dd122, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-            MT2]*Pair[e[2], k[3]]*(Pair[e[1], ec[4]]*((-S34 + T)*Pair[ec[5], 
-                k[2]] + (-S + T24)*Pair[ec[5], k[3]]) + 
-            4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-              Pair[e[1], k[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-              Pair[e[1], k[4]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
-                Pair[ec[4], k[2]]*Pair[ec[5], k[3]])))) - 
-        8*(D0i[dd222, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-            MT2]*Pair[e[2], k[3]]*((-S34 + T)*Pair[e[1], ec[4]] + 
-            4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
-                ec[4], k[3]]))*Pair[ec[5], k[3]] + 
-          D0i[dd223, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-            MT2]*(-((S34 - T)*Pair[e[1], ec[4]]*(-(Pair[e[2], k[5]]*
-                 Pair[ec[5], k[3]]) + Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + 
-                 Pair[ec[5], k[3]]))) + 4*((Pair[e[1], k[2]] - Pair[e[1], 
-                 k[5]])*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], 
-                k[3]] + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*
-                 Pair[ec[5], k[2]] - Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + 
-              Pair[e[1], k[4]]*(-(Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-                  Pair[ec[5], k[3]]) + Pair[e[2], k[3]]*(Pair[ec[4], k[3]]*
-                   Pair[ec[5], k[2]] + (Pair[ec[4], k[2]] - Pair[ec[4], 
-                     k[5]])*Pair[ec[5], k[3]]))))) - 
-        2*D0i[dd22, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-         (Pair[e[2], ec[5]]*((S34 - T)*(MH2 - U)*Pair[e[1], ec[4]] - 
-            4*(MH2 - U)*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*Pair[ec[4], k[3]])) - 2*Pair[e[2], k[3]]*
-           (2*(S34 + T)*Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + 
-            2*(S34 + T)*Pair[e[1], ec[5]]*Pair[ec[4], k[1]] - 
-            Pair[e[1], ec[4]]*(2*(S34 + T)*Pair[ec[5], k[1]] - 
-              (S34 - 3*T)*Pair[ec[5], k[2]] + (-3*S34 + T)*Pair[ec[5], 
-                k[3]]) + 8*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*Pair[ec[4], k[3]])*(Pair[ec[5], k[1]] - 
-              2*Pair[ec[5], k[3]] - Pair[ec[5], k[4]]))) + 
-        2*D0i[dd33, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-         (-((S34 - T)*(-MH2 + S34 + T + T14)*Pair[e[1], ec[4]]*
-            Pair[e[2], ec[5]]) + 8*(-MH2 + S + T24 + U)*Pair[e[1], k[4]]*
-           Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 8*(-MH2 + S + T24 + U)*
-           Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] + 
-          4*(MH2 - S - T24 - U)*Pair[e[2], ec[5]]*
-           (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             Pair[ec[4], k[3]]) + 32*Pair[e[2], k[5]]*
-           (Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
-             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[ec[4], k[2]] - 
-              Pair[ec[4], k[5]]))*Pair[ec[5], k[2]] - 4*Pair[e[1], ec[4]]*
-           Pair[e[2], k[5]]*((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 
-            2*(S34 - T)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*
-             Pair[ec[5], k[4]])) - 2*D0i[dd12, 0, U, T14, MH2 - S - T24 - U, 
-          MH2, 0, MT2, MT2, MT2, MT2]*((S - T24)*(MH2 - U)*Pair[e[1], ec[4]]*
-           Pair[e[2], ec[5]] + 4*(-MH2 + S + T24 + U)*Pair[e[1], k[4]]*
-           Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + 4*(-MH2 + S + T24 + U)*
-           Pair[e[1], ec[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]] - 
-          4*(MH2 - U)*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-            Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + 16*Pair[e[2], k[3]]*
-           (Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[3]]*
-             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[ec[4], k[2]] + 
-              Pair[ec[4], k[3]]))*Pair[ec[5], k[2]] - 2*Pair[e[1], ec[4]]*
-           Pair[e[2], k[3]]*((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 
-            2*(S + S34 - T - T24)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*
-             Pair[ec[5], k[4]])) + D0i[dd3, 0, U, T14, MH2 - S - T24 - U, 
-          MH2, 0, MT2, MT2, MT2, MT2]*(-((2*S - 3*S34 + 3*T - 2*T24)*
-            (-MH2 + S + T24 + U)*Pair[e[1], ec[4]]*Pair[e[2], ec[5]]) - 
-          4*Pair[e[1], k[4]]*((-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
-            (-MH2 + S34 + T + U)*Pair[e[2], k[5]])*Pair[ec[4], ec[5]] - 
-          4*Pair[e[1], ec[5]]*((-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
-            (-MH2 + S34 + T + U)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
-          4*(MH2 - S - T24 - U)*Pair[e[2], ec[5]]*
-           (2*Pair[e[1], k[2]]*Pair[ec[4], k[1]] - 3*Pair[e[1], k[3]]*
-             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - 
-              3*Pair[ec[4], k[3]])) - 4*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*
-           ((-3*MH2 + 2*S + 2*T24 + 3*U)*Pair[ec[5], k[2]] + 
-            (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) - 4*Pair[e[1], e[2]]*
-           Pair[ec[4], k[1]]*((-3*MH2 + 2*S + 2*T24 + 3*U)*
-             Pair[ec[5], k[2]] + (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) - 
-          8*(Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 2*Pair[e[2], k[5]])*
-             Pair[ec[4], k[1]]*Pair[ec[5], k[2]] - 2*Pair[e[1], k[3]]*
+            2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[3]]*
+             Pair[ec[5], k[3]] + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+             Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[5]]*
+             Pair[e[2], k[3]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[2]] + 
+              Pair[ec[5], k[3]]) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+             (-(Pair[e[2], k[5]]*Pair[ec[5], k[2]]) + 2*Pair[e[2], k[3]]*Pair[
+                ec[5], k[3]]))) - 8*D0i[dd123, 0, U, T14, MH2 - S - T24 - U, 
+          MH2, 0, MT2, MT2, MT2, MT2]*(Pair[e[1], ec[4]]*
+           ((-S - S34 + T + T24)*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*((S34 - T)*Pair[ec[5], k[2]] + (S - T24)*Pair[
+                ec[5], k[3]])) + 4*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[1]]*Pair[ec[5], k[2]]) - Pair[e[1], k[3]]*
              Pair[e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-            2*Pair[e[1], k[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]]*
-             Pair[ec[5], k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-             Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 2*Pair[e[1], k[4]]*
-             Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
-            2*Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-             Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[e[2], k[5]]*
-             Pair[ec[4], k[5]]*Pair[ec[5], k[2]] + Pair[e[1], k[5]]*
-             Pair[e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
-             Pair[ec[5], k[3]]) + 2*Pair[e[1], ec[4]]*
-           (2*Pair[e[2], k[4]]*((MH2 - S - T24 - U)*Pair[ec[5], k[1]] + 
-              (-MH2 + T24 + U)*Pair[ec[5], k[2]]) + Pair[e[2], k[5]]*
-             (2*(T - T24)*Pair[ec[5], k[1]] - 5*(S34 - T)*Pair[ec[5], k[2]] + 
-              2*(-S + S34)*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[1]]*
-             ((-MH2 + S + U)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*Pair[
-                ec[5], k[4]]))) + 2*(D0i[dd13, 0, U, T14, MH2 - S - T24 - U, 
-            MH2, 0, MT2, MT2, MT2, MT2]*((S - T24)*(-MH2 + S + T24 + U)*
-             Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 4*(-MH2 + S + T24 + U)*
-             Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
-            4*(-MH2 + S + T24 + U)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-             Pair[ec[4], k[1]] + 4*(MH2 - S - T24 - U)*Pair[e[2], ec[5]]*
-             (Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
-                ec[4], k[2]]) + 16*Pair[e[2], k[5]]*(2*Pair[e[1], k[2]]*Pair[
-                ec[4], k[1]] - Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - Pair[ec[4], k[5]]))*
-             Pair[ec[5], k[2]] - 2*Pair[e[1], ec[4]]*Pair[e[2], k[5]]*
-             ((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 2*(S + S34 - T - T24)*
-               Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*Pair[ec[5], k[4]])) + 
-          C0i[cc1, U, T14, 0, MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
-             ((S - S34 + T - T24)*Pair[e[1], ec[4]] - 4*(Pair[e[1], k[5]]*
-                 Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[5]])) - 
-            2*Pair[e[2], k[3]]*(-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + 
-                Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + Pair[e[1], ec[4]]*(
-                Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) - 
-        2*(D0i[dd1, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-           (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
-            Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], k[1]] + (S - T24)*Pair[
-                e[2], k[3]] + (-MH2 + U)*Pair[e[2], k[4]]) + 
-            2*(-MH2 + U)*Pair[e[1], e[2]]*Pair[ec[4], k[1]] + 
-            4*Pair[e[2], k[3]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
-          C0i[cc2, U, T14, 0, MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
-             ((-S + S34 - T + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[5]]*
-                 Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[5]])) - 
-            2*Pair[e[2], k[5]]*(-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + 
-                Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + Pair[e[1], ec[4]]*(
-                Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) + 
-        8*D0i[dd003, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-          MT2]*(-4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + Pair[ec[4], k[1]]*
-             (-(Pair[e[1], ec[5]]*Pair[e[2], k[5]]) + Pair[e[1], e[2]]*Pair[
-                ec[5], k[2]]) + Pair[e[1], k[4]]*(-(Pair[e[2], k[5]]*
-                Pair[ec[4], ec[5]]) + Pair[e[2], ec[4]]*Pair[ec[5], k[2]])) + 
-          Pair[e[1], ec[4]]*((S34 - T)*Pair[e[2], ec[5]] + 
-            2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] - 
-              Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) - 
-        4*D0i[dd00, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-         (4*Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
-          4*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
-          4*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] - 
-            2*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             (Pair[ec[4], k[2]] - 2*Pair[ec[4], k[3]])) + 
-          8*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
-          8*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-          Pair[e[1], ec[4]]*((S - 2*S34 + 2*T - T24)*Pair[e[2], ec[5]] - 
-            2*(2*(Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
-              Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) + 
-        C0i[cc0, U, T14, 0, MT2, MT2, MT2]*
-         (4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 2*
-                Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-                (Pair[ec[4], k[2]] + 2*Pair[ec[4], k[5]]))) + 
-            Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
-                Pair[e[2], k[4]]) + Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - 
-                Pair[ec[5], k[3]])) + Pair[e[1], k[4]]*
-             ((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
-              Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]))) + 
-          Pair[e[1], ec[4]]*((3*S - 2*S34 + 2*T - 3*T24)*Pair[e[2], ec[5]] - 
-            2*(Pair[e[2], k[4]]*(-2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
-              Pair[e[2], k[1]]*(Pair[ec[5], k[2]] + 2*Pair[ec[5], k[4]])))) - 
-        D0i[dd2, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-         (4*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
-              (S - S34 - T + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], 
-                k[4]])*Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*
-             ((S34 + T)*Pair[e[1], k[2]]*Pair[ec[4], k[1]] + (-3*MH2 + S + 
-                T24 + 3*U)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*((S34 + T)*Pair[ec[4], k[2]] + 
-                (-3*MH2 + S + T24 + 3*U)*Pair[ec[4], k[3]])) + 
-            Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(-((MH2 + S34 + T - U)*
-                Pair[ec[5], k[2]]) + (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) + 
-            Pair[e[1], k[4]]*(((-MH2 + U)*Pair[e[2], k[1]] + 
-                (S - S34 - T + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], 
-                  k[4]])*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*(
-                -((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + (MH2 - S - T24 - 
-                  U)*Pair[ec[5], k[3]])) + 2*(-(Pair[e[1], k[5]]*
-                Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]]) + 
-              Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] - Pair[e[2], k[5]])*Pair[
-                ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[
-                e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] + 
-              2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[3]]*Pair[
-                ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], 
-                k[3]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-               Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[e[1], k[5]]*Pair[
-                e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-              Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], 
-                k[3]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
-               Pair[ec[5], k[3]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[
-                ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]]*(Pair[e[2], k[5]]*Pair[ec[5], k[3]] + Pair[e[2], k[3]]*
-                 (2*Pair[ec[5], k[2]] + Pair[ec[5], k[3]])))) + 
-          Pair[e[1], ec[4]]*((3*MH2*S34 - 2*S*S34 - 3*MH2*T + 2*T*T24 - 
-              3*S34*U + 3*T*U)*Pair[e[2], ec[5]] - 
-            2*(Pair[e[2], k[3]]*((-5*S34 + 3*T + 2*T24)*Pair[ec[5], k[1]] + 
-                5*(S34 - T)*Pair[ec[5], k[3]] + (2*S + 3*S34 - 5*T)*
-                 Pair[ec[5], k[4]]) + 2*Pair[e[2], k[4]]*((MH2 + T - U)*
-                 Pair[ec[5], k[1]] - (S + T)*Pair[ec[5], k[3]] - 
-                T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[1]]*(S34*Pair[ec[5], 
-                  k[1]] - (S34 + T24)*Pair[ec[5], k[3]] - (MH2 + S34 - U)*
-                 Pair[ec[5], k[4]])))) - D0i[dd0, 0, U, T14, 
-          MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-         (2*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+            2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*
+             Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*
+             Pair[ec[4], k[3]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
+             Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - 
+            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
+             Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], k[1]]*
+             (2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] - Pair[e[2], k[5]]*Pair[
+                ec[5], k[3]]))) - 8*D0i[dd233, 0, U, T14, MH2 - S - T24 - U, 
+          MH2, 0, MT2, MT2, MT2, MT2]*(-((S34 - T)*Pair[e[1], ec[4]]*
+            (Pair[e[2], k[3]]*Pair[ec[5], k[2]] - Pair[e[2], k[5]]*
+              (Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
+          4*(-(Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]]*
+              Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+             Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
+             Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[2]] - 
+            Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
+             Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*
+             Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + Pair[e[1], k[4]]*
+             Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+            Pair[e[1], k[2]]*Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*Pair[ec[5], 
+                k[2]] - Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + 
+            Pair[e[1], k[5]]*Pair[ec[4], k[1]]*(-(Pair[e[2], k[3]]*
+                Pair[ec[5], k[2]]) + Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + 
+        (8*D0i[dd122, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+            MT2] - 8*D0i[dd122, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, 
+            MT2, MT2, MT2])*Pair[e[2], k[3]]*
+         (Pair[e[1], ec[4]]*((-S34 + T)*Pair[ec[5], k[2]] + 
+            (-S + T24)*Pair[ec[5], k[3]]) + 
+          4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+            Pair[e[1], k[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+            Pair[e[1], k[4]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
+              Pair[ec[4], k[2]]*Pair[ec[5], k[3]]))) - 
+        D0i[dd0, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, MT2]*
+         (Pair[e[1], ec[4]]*((-2*MH2*(S - T24) + S*(S34 + U) - T24*(T + U))*
+             Pair[e[2], ec[5]] - 2*(Pair[e[2], k[3]]*((S + T24)*Pair[ec[5], 
+                  k[1]] + T24*Pair[ec[5], k[2]] - S*Pair[ec[5], k[3]]) + 
+              Pair[e[2], k[4]]*((MH2 - U)*Pair[ec[5], k[1]] + (-MH2 + T)*
+                 Pair[ec[5], k[2]] + S*Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*(
+                (-MH2 + U)*Pair[ec[5], k[1]] + (-2*MH2 + S34 + U)*
+                 Pair[ec[5], k[2]] + (MH2 + T24 - U)*Pair[ec[5], k[3]]))) + 
+          2*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
               (S + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*
-             Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*((S34 + T)*Pair[e[1], 
-                k[2]]*Pair[ec[4], k[1]] + (-2*MH2 + S + T24 + 2*U)*Pair[e[1], 
-                k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*((S34 + T)*
-                 Pair[ec[4], k[2]] + (-2*MH2 + S + T24 + 2*U)*Pair[ec[4], 
-                  k[3]])) + Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
-             (-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + (MH2 - S - T24 - 
-                U)*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
-             (((-MH2 + U)*Pair[e[2], k[1]] + (S + T24)*Pair[e[2], k[3]] + 
-                (MH2 - U)*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
-              Pair[e[2], ec[4]]*(-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + 
-                (MH2 - S - T24 - U)*Pair[ec[5], k[3]])) + 
-            2*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*
-                Pair[ec[5], k[2]]) - Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
-                ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[
-                e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
+             Pair[ec[4], k[1]] - Pair[e[2], ec[5]]*((-4*MH2 + S34 + T + 2*U)*
+               Pair[e[1], k[2]]*Pair[ec[4], k[1]] + (S + T24)*Pair[e[1], 
+                k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(
+                (-4*MH2 + S34 + T + 2*U)*Pair[ec[4], k[2]] + (S + T24)*
+                 Pair[ec[4], k[3]])) + Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
+             ((-3*MH2 + S34 + T + U)*Pair[ec[5], k[2]] + (MH2 + S + T24 - 
+                U)*Pair[ec[5], k[3]]) - 2*(Pair[e[1], k[5]]*Pair[e[2], k[3]]*
+               Pair[ec[4], k[1]]*Pair[ec[5], k[2]] - Pair[e[1], k[3]]*Pair[
+                e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] - 
               Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], 
-                k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
-               Pair[ec[5], k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[
-                ec[4], k[2]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
-           ((MH2*S34 - S*S34 - MH2*T + T*T24 - S34*U + T*U)*
-             Pair[e[2], ec[5]] + 2*(Pair[e[2], k[4]]*((-MH2 + S + U)*
-                 Pair[ec[5], k[1]] + (S + T)*Pair[ec[5], k[2]] - 
-                S*Pair[ec[5], k[4]]) - Pair[e[2], k[3]]*(T24*Pair[ec[5], 
-                  k[1]] + (S34 - T)*Pair[ec[5], k[2]] + S*Pair[ec[5], 
-                  k[4]]) + Pair[e[2], k[1]]*(T24*Pair[ec[5], k[1]] + 
-                (S34 + T24)*Pair[ec[5], k[2]] + (MH2 - T24 - U)*Pair[ec[5], 
-                  k[4]])))) - 2*D0i[dd23, 0, U, T14, MH2 - S - T24 - U, MH2, 
-          0, MT2, MT2, MT2, MT2]*
-         (4*(Pair[e[1], k[4]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
-              (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
-            Pair[e[1], ec[5]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
-              (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
-            (2*MH2 - S - T24 - 2*U)*Pair[e[2], ec[5]]*
-             (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
-                ec[4], k[3]]) + 4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - 
-                Pair[ec[4], k[3]]) + (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-               Pair[ec[4], k[3]])*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] - 
-              Pair[e[2], k[5]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
-          Pair[e[1], ec[4]]*((S34 - T)*(S34 + T + T14 - U)*
-             Pair[e[2], ec[5]] - 2*(Pair[e[2], k[5]]*((S34 + T)*Pair[ec[5], 
-                  k[1]] - 2*(S34 - T)*Pair[ec[5], k[2]] - 2*S34*Pair[ec[5], 
-                  k[3]] + 2*T*Pair[ec[5], k[3]] + S34*Pair[ec[5], k[4]] + 
-                T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[3]]*((-MH2 + S + T24 + 
-                  U)*Pair[ec[5], k[1]] + 2*(S34 - T)*Pair[ec[5], k[2]] + 
-                (-MH2 + S + T24 + U)*Pair[ec[5], k[4]])))) - 
-        8*(D0i[dd001, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-            MT2]*(Pair[e[2], ec[5]]*((-S + T24)*Pair[e[1], ec[4]] + 
-              4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-                 Pair[ec[4], k[2]])) - 2*(Pair[e[1], ec[4]]*(Pair[e[2], 
-                 k[1]] + Pair[e[2], k[4]]) - 2*(Pair[e[1], k[4]]*Pair[e[2], 
-                  ec[4]] + Pair[e[1], e[2]]*Pair[ec[4], k[1]]))*
-             Pair[ec[5], k[2]]) + D0i[dd002, 0, U, T14, MH2 - S - T24 - U, 
-            MH2, 0, MT2, MT2, MT2, MT2]*
-           (4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-                Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + Pair[ec[4], k[1]]*(
-                Pair[e[1], ec[5]]*Pair[e[2], k[3]] + Pair[e[1], e[2]]*
-                 Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*(Pair[e[2], k[3]]*
-                 Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + 
-            Pair[e[1], ec[4]]*((-S34 + T)*Pair[e[2], ec[5]] - 
-              2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[3]] + 
-                Pair[e[2], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], 
-                   k[4]]))))))) + Den[S, 0]*
-      ((-8*D0i[dd111, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
-           MT2, MT2] + 8*(D0i[dd111, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, 
-            MT2, MT2, MT2, MT2] + D0i[dd111, MH2, 2*MH2 - S34 - T - U, 0, 
-            MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]))*
-        ((-T + U)*Pair[e[1], e[2]] + 
-         4*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[3]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] - 
-       8*D0i[dd112, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*(-(Pair[e[1], e[2]]*((-T - T14 + T24 + U)*
-             Pair[ec[4], k[3]] + (T - U)*Pair[ec[4], k[5]])) + 
-         4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]) - 
-           Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]] + 
-           Pair[e[1], k[2]]*(Pair[e[2], k[5]]*Pair[ec[4], k[3]] + 
-             Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*Pair[ec[5], k[3]] - 
-       2*D0i[dd12, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*((MH2 - S34 - T - U)*(T + T14 - T24 - U)*
-          Pair[e[1], e[2]]*Pair[ec[4], ec[5]] - 4*(MH2 - S34 - T - U)*
-          (Pair[e[1], k[5]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[5]])*Pair[ec[4], ec[5]] - 4*(-MH2 + S34 + T14 + T24)*
-          Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[3]] + 
-         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-          Pair[ec[5], k[3]] + 16*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
-           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-            (Pair[e[2], k[3]] - Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
-          Pair[ec[5], k[3]] - 2*Pair[e[1], e[2]]*((-MH2 + S34 + T14 + T24)*
-            Pair[ec[4], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[4], k[2]] + 
-           2*(2*T + T14 - T24 - 2*U)*Pair[ec[4], k[5]])*Pair[ec[5], k[3]]) + 
-       2*D0i[dd2, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*Pair[ec[4], k[5]]*
-        (2*(-MH2 + S34 + T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 
-         2*(-MH2 + S34 + T + U)*Pair[e[1], ec[5]]*Pair[e[2], k[1]] + 
-         4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[5]])*Pair[ec[5], k[3]] + Pair[e[1], e[2]]*
-          ((-MH2 + S34 + T + U)*Pair[ec[5], k[1]] + (MH2 - S34 - T - U)*
-            Pair[ec[5], k[2]] + (T + T14 - T24 - U)*Pair[ec[5], k[3]])) - 
-       2*(C0i[cc1, S34, 0, S, MT2, MT2, MT2]*
-          (((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
-             4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-                Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
-            (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
-              Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - Pair[
-                ec[5], k[2]]))) + D0i[dd11, MH2, 2*MH2 - S34 - T - U, 0, 
-           MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-          ((MH2 - S34 - T - U)*(T - U)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
-           4*(MH2 - S34 - T - U)*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
-             Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
-           4*(T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[3]] - 
-           4*(T + U)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[3]] + 
-           16*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[3]])*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*
-            Pair[ec[5], k[3]] + 2*Pair[e[1], e[2]]*
-            (2*(T + U)*Pair[ec[4], k[1]] + (T - 3*U)*Pair[ec[4], k[3]] + 
-             (-3*T + U)*Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) - 
-       4*D0i[dd33, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-         MT2]*(4*(S + T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
-          (Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) - 4*(S + T14 + T24)*
-          Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
-           Pair[ec[4], k[2]]) + 2*(T14 + T24)*Pair[e[1], k[2]]*
-          Pair[e[2], ec[4]]*Pair[ec[5], k[3]] - 2*(T14 + T24)*
-          Pair[e[1], ec[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[3]] - 
-         16*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
-          Pair[ec[5], k[3]] + Pair[e[1], e[2]]*(Pair[ec[4], k[2]]*
-            (2*(S + T14 + T24)*Pair[ec[5], k[1]] - 2*(S + T14 + T24)*
-              Pair[ec[5], k[2]] + (-5*T14 + 3*T24)*Pair[ec[5], k[3]]) + 
-           Pair[ec[4], k[1]]*(2*(S + T14 + T24)*Pair[ec[5], k[1]] - 
-             2*(S + T14 + T24)*Pair[ec[5], k[2]] + (-3*T14 + 5*T24)*
-              Pair[ec[5], k[3]]))) + 
-       (-8*D0i[dd001, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
-           MT2, MT2] + 8*(D0i[dd001, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, 
-            MT2, MT2, MT2, MT2] + D0i[dd001, MH2, 2*MH2 - S34 - T - U, 0, 
-            MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]))*
-        (4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-              Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - Pair[e[2], k[1]]*
-            (Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + Pair[e[1], ec[4]]*
-              Pair[ec[5], k[3]]) + Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
-              Pair[ec[5], k[3]])) + Pair[e[1], e[2]]*
-          ((-T + U)*Pair[ec[4], ec[5]] + 2*(Pair[ec[4], k[3]]*
-              (Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
-             (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], k[3]]))) + 
-       4*(C0i[cc2, 2*MH2 - S34 - T - U, 0, S, MT2, MT2, MT2]*
-          (2*(Pair[e[1], k[2]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
-              Pair[e[2], k[1]])*(Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
-           Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*
-            (Pair[ec[5], k[1]] + Pair[ec[5], k[2]])) + 
-         C0i[cc1, S34, S, 0, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
-            (2*Pair[ec[4], k[1]]*Pair[ec[5], k[1]] - 2*Pair[ec[4], k[2]]*
-              Pair[ec[5], k[2]] + Pair[ec[4], k[5]]*(-Pair[ec[5], k[1]] + 
-               Pair[ec[5], k[2]])) - 2*Pair[e[2], k[1]]*
-            (Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + Pair[e[1], ec[4]]*
-              (Pair[ec[5], k[1]] + Pair[ec[5], k[2]])) + 2*Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
-              (Pair[ec[5], k[1]] + Pair[ec[5], k[2]]))) + 
-         D0i[dd11, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-           MT2]*(2*(-3*MH2 + S34 + T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
-            Pair[ec[4], k[3]] - 2*(-3*MH2 + S34 + T + U)*Pair[e[1], ec[5]]*
-            Pair[e[2], k[1]]*Pair[ec[4], k[3]] + 2*(-MH2 + S34)*
-            Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[3]] + 
-           2*(MH2 - S34)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-            Pair[ec[5], k[3]] + 8*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
-             Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-              (Pair[e[2], k[3]] - Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*
-            Pair[ec[5], k[3]] + Pair[e[1], e[2]]*
-            (-((MH2 - S34)*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[
-                ec[5], k[3]]) + Pair[ec[4], k[3]]*((-3*MH2 + S34 + T + U)*
-                Pair[ec[5], k[1]] + (3*MH2 - S34 - T - U)*Pair[ec[5], k[2]] + 
-               2*(-T + T14 - T24 + U)*Pair[ec[5], k[3]])))) - 
-       8*D0i[dd223, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-         MT2]*((T14 - T24)*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + 
-           Pair[ec[4], k[2]]) + 4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
-           Pair[e[1], k[2]]*Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + 
-           Pair[ec[4], k[2]]))*Pair[ec[5], k[4]] + 
-       (-8*D0i[dd122, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
-           MT2, MT2] + 8*D0i[dd122, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, 
-           MT2, MT2, MT2, MT2])*((-T14 + T24)*Pair[e[1], e[2]] + 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 
-       2*D0i[dd2, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-         MT2]*(2*(MH2 - S34)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] + 
-         2*(-MH2 + S34)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[4]])*Pair[ec[4], k[3]] - Pair[e[1], e[2]]*
-          ((-MH2 + S34)*Pair[ec[4], k[1]] + (MH2 - S34)*Pair[ec[4], k[2]] + 
-           (T14 - T24)*Pair[ec[4], k[3]]))*Pair[ec[5], k[4]] + 
-       8*D0i[dd223, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-         MT2]*((-T14 + T24)*Pair[e[1], e[2]] + 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[4]]))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
-       8*D0i[dd223, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
-         4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - 
-       8*D0i[dd333, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-         MT2]*((-T + U)*Pair[e[1], e[2]] - 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - Pair[e[1], k[5]]*
-            Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]] + 
-             Pair[e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
-       8*D0i[dd233, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*((-2*T - T14 + T24 + 2*U)*Pair[e[1], e[2]] - 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 2*Pair[e[1], k[5]]*
-            Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]] + 
-             2*Pair[e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
-       4*D0i[dd23, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-         MT2]*(-2*(T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
-          (Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) + 2*(T14 + T24)*
-          Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
-           Pair[ec[4], k[2]]) + Pair[e[1], e[2]]*
-          (Pair[ec[4], k[1]]*(-2*(T14 - T24)*Pair[ec[5], k[1]] + 
-             4*T24*Pair[ec[5], k[2]] + (3*T14 - 5*T24)*Pair[ec[5], k[3]]) + 
-           Pair[ec[4], k[2]]*(-4*T14*Pair[ec[5], k[1]] - 2*(T14 - T24)*
-              Pair[ec[5], k[2]] + (5*T14 - 3*T24)*Pair[ec[5], k[3]])) + 
-         8*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
-          (Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - 2*Pair[ec[5], k[4]]) + 
-         2*(T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[4]] - 
-         2*(T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-          Pair[ec[5], k[4]]) + 
-       (8*D0i[dd002, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-           MT2] - 8*D0i[dd002, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, 
-           MT2, MT2, MT2])*(((-T14 + T24)*Pair[e[1], e[2]] + 
-           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-              Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] + 
-         2*(2*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 2*Pair[e[1], ec[4]]*
-            Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[2]]))*Pair[ec[5], k[4]]) + 
-       D0i[dd2, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, MT2]*
-        ((-((MH2 - S34)*(T14 - T24)*Pair[e[1], e[2]]) - 4*(MH2 - S34)*
-            (Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] + 
-         2*((-T14 + T24)*Pair[e[1], e[2]] + 
-           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-              Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
-       8*(D0i[dd333, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-           MT2]*((T14 - T24)*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + 
-             Pair[ec[4], k[2]]) + 4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
-             Pair[e[1], k[2]]*Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + 
-             Pair[ec[4], k[2]]))*Pair[ec[5], k[3]] + 
-         D0i[dd333, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-           MT2, MT2, MT2, MT2]*((-T + U)*Pair[e[1], e[2]] - 
-           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - Pair[e[1], k[5]]*
-              Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]] + Pair[
-                e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]]) - 
-       8*(D0i[dd233, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-           MT2]*(-((T14 - T24)*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + 
-              Pair[ec[4], k[2]])*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]])) - 
-           4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
-            (Pair[ec[5], k[3]] - Pair[ec[5], k[4]])) + 
-         D0i[dd233, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-           MT2]*((-T + T14 - T24 + U)*Pair[e[1], e[2]] - 
-           4*(-2*Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[5]]*
-              Pair[e[2], k[1]] + Pair[e[1], k[2]]*(2*Pair[e[2], k[4]] + Pair[
-                e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]]) - 
-       2*D0i[dd23, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*(-((MH2 - S34 - T14 - T24)*(T + T14 - T24 - U)*
-           Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 4*(MH2 - S34 - T14 - T24)*
-          (Pair[e[1], k[5]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 4*(-MH2 + S34 + T14 + T24)*
-          Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[4]] - 
-         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-          Pair[ec[5], k[4]] + 16*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 
-           2*Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-            (Pair[e[2], k[4]] + 2*Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
-          Pair[ec[5], k[4]] + 2*Pair[e[1], e[2]]*((-MH2 + S34 + T14 + T24)*
-            Pair[ec[4], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[4], k[2]] + 
-           2*(2*T + T14 - T24 - 2*U)*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) - 
-       2*D0i[dd33, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*((MH2 - S - T - U)*(T - U)*Pair[e[1], e[2]]*
-          Pair[ec[4], ec[5]] - 4*(MH2 - S34 - T14 - T24)*
-          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 8*(-MH2 + S34 + T14 + T24)*
-          Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[4]] - 
-         8*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-          Pair[ec[5], k[4]] + 32*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 
-           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-            (Pair[e[2], k[4]] + Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
-          Pair[ec[5], k[4]] + 4*Pair[e[1], e[2]]*((-MH2 + S34 + T14 + T24)*
-            Pair[ec[4], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[4], k[2]] + 
-           2*(T - U)*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) - 
-       8*D0i[dd00, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-         MT2]*((-T14 + T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-            Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 2*Pair[e[1], k[2]]*
-          Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) - 
-         2*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
-           Pair[ec[4], k[2]]) - Pair[e[1], e[2]]*
-          (-(Pair[ec[4], k[2]]*(2*Pair[ec[5], k[1]] + Pair[ec[5], k[3]])) + 
-           Pair[ec[4], k[1]]*(2*Pair[ec[5], k[2]] + Pair[ec[5], k[3]])) - 
-         2*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*(2*Pair[ec[5], k[3]] + 
-           Pair[ec[5], k[4]]) + 2*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-          (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
-       2*D0i[dd33, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-         MT2]*((MH2 - S - T - U)*(T - U)*Pair[e[1], e[2]]*
-          Pair[ec[4], ec[5]] - 4*(MH2 - S34 - T14 - T24)*
-          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 8*(-MH2 + S34 + T14 + T24)*
-          Pair[e[1], k[2]]*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 
-         8*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-          Pair[ec[4], k[5]] + 32*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 
-           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-            (Pair[e[2], k[4]] + Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
-          Pair[ec[5], k[4]] + 4*Pair[e[1], e[2]]*Pair[ec[4], k[5]]*
-          ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[1]] + 
-           (MH2 - S34 - T14 - T24)*Pair[ec[5], k[2]] + 
-           2*(T - U)*Pair[ec[5], k[4]])) + 2*D0i[dd12, MH2, S34, 0, 
-         MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-        ((MH2 - S34)*(T14 - T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
-         4*(MH2 - S34)*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
-           Pair[e[1], k[2]]*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] - 
-         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
-          Pair[ec[4], k[3]] + 4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[5]]*
-          Pair[e[2], k[1]]*Pair[ec[4], k[3]] + 
-         16*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[4]]*
-            Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
-             Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 
-         2*Pair[e[1], e[2]]*Pair[ec[4], k[3]]*((-MH2 + S34 + T14 + T24)*
-            Pair[ec[5], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[5], k[2]] + 
-           2*(T - T14 + T24 - U)*Pair[ec[5], k[4]])) + 
-       2*D0i[dd23, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-         MT2]*((MH2 - S34 - T14 - T24)*(T14 - T24)*Pair[e[1], e[2]]*
-          Pair[ec[4], ec[5]] + 4*(MH2 - S34 - T14 - T24)*
-          (Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 4*(-MH2 + S34 + T14 + T24)*
-          Pair[e[1], k[2]]*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 
-         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-          Pair[ec[4], k[5]] + 16*(-2*Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
-           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-            (2*Pair[e[2], k[4]] + Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
-          Pair[ec[5], k[4]] + 2*Pair[e[1], e[2]]*Pair[ec[4], k[5]]*
-          ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[1]] + 
-           (MH2 - S34 - T14 - T24)*Pair[ec[5], k[2]] + 2*(T - T14 + T24 - U)*
-            Pair[ec[5], k[4]])) + 2*D0i[dd11, MH2, S34, 0, 
-         MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-        (-((MH2 - S34)*(T - U)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
-         4*(MH2 - S34)*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
-           Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
-         4*(T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 
-         4*(T + U)*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]] - 
-         16*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-            Pair[e[2], k[3]])*Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] + 
-           Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + 2*Pair[e[1], e[2]]*
-          Pair[ec[4], k[3]]*(2*(T + U)*Pair[ec[5], k[1]] + 
-           (T - 3*U)*Pair[ec[5], k[3]] + (-3*T + U)*Pair[ec[5], k[4]])) - 
-       8*D0i[dd113, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*(-4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
-           Pair[e[1], k[2]]*Pair[e[2], k[3]])*(Pair[ec[4], k[3]]*
-            (Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + 
-           Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) - (T - U)*Pair[e[1], e[2]]*
-          (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
-            (-Pair[ec[5], k[3]] + Pair[ec[5], k[4]]))) - 
-       4*D0i[dd12, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-         MT2]*(-2*(Pair[ec[4], k[3]]*(-((T14 + T24)*Pair[e[1], k[2]]*Pair[
-                e[2], ec[5]]) + (T14 + T24)*Pair[e[1], ec[5]]*
-              Pair[e[2], k[1]] + 4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
-               Pair[e[1], k[2]]*Pair[e[2], k[4]])*(Pair[ec[5], k[3]] - Pair[
-                ec[5], k[4]])) + (MH2 - S34)*(Pair[e[1], k[2]]*
-              Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*Pair[e[2], k[1]])*
-            Pair[ec[5], k[4]]) + Pair[e[1], e[2]]*
-          (-((MH2 - S34)*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*
-             Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
-            (2*(T14 + T24)*Pair[ec[5], k[1]] + (-3*T14 + T24)*
-              Pair[ec[5], k[3]] + (T14 - 3*T24)*Pair[ec[5], k[4]]))) + 
-       4*D0i[dd13, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-         MT2]*(2*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
-          ((-7*MH2 + 3*(S34 + T + U))*Pair[ec[4], k[3]] + 
-           (-3*MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 2*Pair[e[1], ec[5]]*
-          Pair[e[2], k[1]]*((-7*MH2 + 3*(S34 + T + U))*Pair[ec[4], k[3]] + 
-           (-3*MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 
-         2*(MH2 - S34 + T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*
-          Pair[ec[5], k[3]] + 2*(MH2 - S34 + T14 + T24)*Pair[e[1], ec[4]]*
-          Pair[e[2], k[1]]*Pair[ec[5], k[3]] + 
-         8*(-2*Pair[e[1], k[3]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + 
-             Pair[ec[4], k[5]]) - Pair[e[1], k[5]]*Pair[e[2], k[1]]*
-            (3*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + Pair[e[1], k[2]]*
-            (2*Pair[e[2], k[3]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
-             Pair[e[2], k[5]]*(3*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])))*
-          Pair[ec[5], k[3]] - Pair[e[1], e[2]]*(2*(MH2 - S34 + T14 + T24)*
-            Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + Pair[ec[4], k[5]]*
-            (2*(MH2 + S + T14 + T24)*Pair[ec[5], k[1]] + 
-             (2*MH2 - 3*S - S34 - 6*T14 - 2*T24 - 4*U)*Pair[ec[5], k[3]] - 
-             (MH2 + S + T14 + T24)*Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
-            (2*(MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[1]] + 
-             (2*MH2 - 5*S - S34 - 12*T14 - 4*U)*Pair[ec[5], k[3]] - 
-             (MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[4]]))) + 
-       (8*D0i[dd112, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-           MT2] - 8*D0i[dd112, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, 
-           MT2, MT2, MT2])*Pair[ec[4], k[3]]*
-        (Pair[e[1], e[2]]*((-T14 + T24)*Pair[ec[5], k[3]] + 
-           (-T + U)*Pair[ec[5], k[4]]) + 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[3]]) - 
-           Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[5], k[4]] + 
-           Pair[e[1], k[2]]*(Pair[e[2], k[4]]*Pair[ec[5], k[3]] + 
-             Pair[e[2], k[3]]*Pair[ec[5], k[4]]))) - 
-       4*D0i[dd00, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*(-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
-             Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-              (Pair[e[2], k[3]] - Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] + 
-           Pair[e[2], k[1]]*(2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 
-             Pair[e[1], ec[4]]*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
-            (-2*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] + Pair[e[2], ec[4]]*
-              Pair[ec[5], k[4]])) + Pair[e[1], e[2]]*
-          ((T - T14 + T24 - U)*Pair[ec[4], ec[5]] - 
-           2*(-2*Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
-             (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], k[4]]))) - 
-       8*D0i[dd003, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*(-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
-             Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
-           Pair[e[2], k[1]]*(Pair[e[1], ec[5]]*Pair[ec[4], k[5]] + 
-             Pair[e[1], ec[4]]*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*Pair[ec[4], k[5]] + Pair[e[2], ec[4]]*
-              Pair[ec[5], k[4]])) + Pair[e[1], e[2]]*
-          ((T - U)*Pair[ec[4], ec[5]] + 2*(Pair[ec[4], k[5]]*(Pair[ec[5], 
-                k[1]] - Pair[ec[5], k[2]]) + (Pair[ec[4], k[1]] - Pair[ec[4], 
-                k[2]])*Pair[ec[5], k[4]]))) + 
-       C0i[cc0, S34, S, 0, MT2, MT2, MT2]*
-        (-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) - 2*Pair[e[1], k[5]]*
-              Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[3]] + 2*
-                Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-            Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) - 
-           Pair[e[1], ec[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[4]] + 
-           Pair[e[1], k[2]]*(-(Pair[e[2], ec[5]]*(2*Pair[ec[4], k[3]] + 
-                Pair[ec[4], k[5]])) + Pair[e[2], ec[4]]*Pair[ec[5], k[4]])) + 
-         Pair[e[1], e[2]]*((-T - 2*T14 + 2*T24 + U)*Pair[ec[4], ec[5]] - 
-           2*(-2*Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
-             Pair[ec[4], k[5]]*(-Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
-             (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], k[4]]))) - 
-       8*D0i[dd133, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-         MT2]*((T - U)*Pair[e[1], e[2]]*(Pair[ec[4], k[5]]*
-            (Pair[ec[5], k[3]] - Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
-            Pair[ec[5], k[4]]) + 4*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*
-            Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
-            Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-           Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[3]]*
-            Pair[ec[5], k[4]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
-            Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - Pair[e[1], k[3]]*
-            Pair[e[2], k[1]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
-           Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
-            Pair[ec[5], k[4]] - Pair[e[1], k[4]]*Pair[e[2], k[1]]*
-            (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
-              Pair[ec[5], k[4]]) - Pair[e[1], k[5]]*Pair[e[2], k[1]]*
-            (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
-              Pair[ec[5], k[4]]))) + 8*D0i[dd123, MH2, 2*MH2 - S34 - T - U, 
-         0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-        (-(Pair[e[1], e[2]]*((-T - T14 + T24 + U)*Pair[ec[4], k[3]]*
-             Pair[ec[5], k[4]] + Pair[ec[4], k[5]]*((-2*T - T14 + T24 + 2*U)*
-               Pair[ec[5], k[3]] + (T - U)*Pair[ec[5], k[4]]))) + 
-         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
-             Pair[ec[5], k[3]]) + Pair[e[1], k[2]]*Pair[e[2], k[4]]*
-            Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 2*Pair[e[1], k[2]]*
-            Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-           Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-            Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
-            Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + Pair[e[1], k[2]]*
-            Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - 
-           Pair[e[1], k[5]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[5]]*
-              Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) - 
-       D0i[dd3, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-        ((MH2 - S34 - T14 - T24)*(3*T + 2*T14 - 2*T24 - 3*U)*Pair[e[1], e[2]]*
-          Pair[ec[4], ec[5]] + 4*(MH2 - S34 - T14 - T24)*
-          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - 2*Pair[e[1], k[5]]*
-            Pair[e[2], k[1]] - Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
-             2*Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 4*Pair[e[1], k[2]]*
-          Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-           (-MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 4*Pair[e[1], ec[5]]*
-          Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-           (-MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 4*Pair[e[1], k[2]]*
-          Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-           (-3*MH2 + 3*S34 + 2*(T14 + T24))*Pair[ec[5], k[4]]) + 
-         4*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*
-            Pair[ec[5], k[3]] + (-3*MH2 + 3*S34 + 2*(T14 + T24))*
-            Pair[ec[5], k[4]]) - 2*Pair[e[1], e[2]]*
-          (2*Pair[ec[4], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[2]] + 
-             (-MH2 + S34 + T14)*Pair[ec[5], k[4]]) + 2*Pair[ec[4], k[2]]*
-            ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (MH2 - S34 - T24)*
-              Pair[ec[5], k[4]]) + Pair[ec[4], k[5]]*
-            (-2*(T - T24)*Pair[ec[5], k[1]] - 2*(T14 - U)*Pair[ec[5], k[2]] + 
-             5*(T - U)*Pair[ec[5], k[4]])) + 
-         8*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
-             (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]])) - Pair[e[2], k[1]]*
-            (Pair[e[1], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 
-             2*Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
-           Pair[e[1], k[2]]*(Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
-              (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]]) + 
-             (Pair[e[2], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 2*
-                Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]))) + 
-       D0i[dd3, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*((MH2 - S34 - T14 - T24)*(T - 2*T14 + 2*T24 - U)*
-          Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 4*(MH2 - S34 - T14 - T24)*
-          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - 2*Pair[e[1], k[4]]*
-            Pair[e[2], k[1]] - Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
-             2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 4*Pair[e[1], k[2]]*
-          Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-           (-3*MH2 + S + 2*S34 + 3*T14 + 3*T24)*Pair[ec[4], k[5]]) + 
-         4*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*
-            Pair[ec[4], k[3]] + (-3*MH2 + S + 2*S34 + 3*T14 + 3*T24)*
-            Pair[ec[4], k[5]]) + 4*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*
-          ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-           (MH2 - S34)*Pair[ec[5], k[4]]) - 4*Pair[e[1], ec[4]]*
-          Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-           (MH2 - S34)*Pair[ec[5], k[4]]) + 2*Pair[e[1], e[2]]*
-          (2*Pair[ec[4], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[2]] + 
-             (MH2 - S34 - T14)*Pair[ec[5], k[4]]) + 2*Pair[ec[4], k[2]]*
-            ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (-MH2 + S34 + T24)*
-              Pair[ec[5], k[4]]) + Pair[ec[4], k[5]]*
-            (2*(T - T24)*Pair[ec[5], k[1]] + 2*(T14 - U)*Pair[ec[5], k[2]] + 
-             5*(-T + U)*Pair[ec[5], k[4]])) + 
-         8*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
-             (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]])) - Pair[e[2], k[1]]*
-            (Pair[e[1], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 
-             2*Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
-           Pair[e[1], k[2]]*(Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
-              (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]]) + 
-             (Pair[e[2], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 2*
-                Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]))) + 
-       C0i[cc0, 2*MH2 - S34 - T - U, 0, S, MT2, MT2, MT2]*
-        (-4*((-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-              Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-            Pair[e[2], k[1]]*(Pair[ec[4], k[3]] + 2*Pair[ec[4], k[5]]) - 
-           Pair[e[1], k[2]]*(Pair[e[2], ec[5]]*(Pair[ec[4], k[3]] + 2*
-                Pair[ec[4], k[5]]) + Pair[e[2], ec[4]]*(Pair[ec[5], k[3]] - 
-               Pair[ec[5], k[4]])) + Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-            (Pair[ec[5], k[3]] - Pair[ec[5], k[4]])) + Pair[e[1], e[2]]*
-          ((-T - T14 + T24 + U)*Pair[ec[4], ec[5]] + 
-           2*(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
-             2*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]]) + 
-             2*Pair[ec[4], k[2]]*(-Pair[ec[5], k[2]] + Pair[ec[5], 
-                k[4]])))) + 8*(D0i[dd113, MH2, S34, S, 2*MH2 - S34 - T - U, 
-           0, 0, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
-            ((-2*T + T14 - T24 + 2*U)*Pair[ec[4], k[3]] + 
-             (-T + U)*Pair[ec[4], k[5]]) + 
-           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]) - 
-             Pair[e[1], k[3]]*Pair[e[2], k[1]]*(3*Pair[ec[4], k[3]] + Pair[
-                ec[4], k[5]]) + Pair[e[1], k[2]]*(Pair[e[2], k[5]]*
-                Pair[ec[4], k[3]] + Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 
-                 Pair[ec[4], k[5]]))))*Pair[ec[5], k[3]] + 
-         D0i[dd113, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-           MT2]*(-4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[3]])*(Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] + Pair[
-                ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + Pair[ec[4], k[5]]*
-              Pair[ec[5], k[3]]) - (T - U)*Pair[e[1], e[2]]*
-            (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
-              (-Pair[ec[5], k[3]] + Pair[ec[5], k[4]])))) + 
-       C0i[cc0, S34, 0, S, MT2, MT2, MT2]*
-        (Pair[e[1], e[2]]*((-T14 + T24)*Pair[ec[4], ec[5]] - 
-           2*(-2*Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
-             Pair[ec[4], k[1]]*(2*Pair[ec[5], k[1]] + Pair[ec[5], k[4]]) - 
-             Pair[ec[4], k[2]]*(2*Pair[ec[5], k[2]] + Pair[ec[5], k[4]]))) + 
-         4*((-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-              Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-            Pair[e[2], k[1]]*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]]) + 
-           Pair[e[1], ec[4]]*Pair[e[2], k[1]]*(Pair[ec[5], k[3]] + 
-             2*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]]) + 
-             Pair[e[2], ec[4]]*(Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])))) + 
-       2*D0i[dd13, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-         MT2]*(-4*((2*MH2 - 2*S34 - T14 - T24)*(Pair[e[1], k[3]]*
-              Pair[e[2], k[1]] - Pair[e[1], k[2]]*Pair[e[2], k[3]])*
-            Pair[ec[4], ec[5]] + Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
-            (2*(-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-             (T + U)*Pair[ec[4], k[5]]) - Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-            (2*(-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-             (T + U)*Pair[ec[4], k[5]]) + 
-           4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[3]])*(-(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] + 
-                Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]])) + 
-             2*Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - 
-               Pair[ec[5], k[3]]))) + Pair[e[1], e[2]]*
-          (-((T - U)*(S - S34 + T + U)*Pair[ec[4], ec[5]]) - 
-           2*(Pair[ec[4], k[5]]*((T + U)*Pair[ec[5], k[1]] - (T + U)*
-                Pair[ec[5], k[2]] + 2*(T - U)*(Pair[ec[5], k[3]] - 
-                 Pair[ec[5], k[4]])) - 2*Pair[ec[4], k[3]]*
-              ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (-MH2 + S34 + 
-                 T14 + T24)*Pair[ec[5], k[2]] + 2*(-T + U)*Pair[ec[5], 
-                 k[4]])))) + D0i[dd1, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, 
-         S, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
-          ((-3*MH2*T + 3*S34*T + 2*T*T24 + 3*MH2*U - 3*S34*U - 2*T14*U)*
-            Pair[ec[4], ec[5]] - 2*(-2*Pair[ec[4], k[2]]*((MH2 - S34 + T)*
-                Pair[ec[5], k[1]] + T*Pair[ec[5], k[2]] - (T + T14)*
-                Pair[ec[5], k[3]]) + Pair[ec[4], k[3]]*((3*T + 2*T24 - 5*U)*
-                Pair[ec[5], k[1]] + (5*T - 2*T14 - 3*U)*Pair[ec[5], k[2]] + 5*
-                (-T + U)*Pair[ec[5], k[3]]) + 2*Pair[ec[4], k[1]]*
-              (U*Pair[ec[5], k[1]] + (MH2 - S34 + U)*Pair[ec[5], k[2]] - 
-               (T24 + U)*Pair[ec[5], k[3]]))) + 
-         4*(-(((3*MH2 - 3*S34 - T14 - T24)*Pair[e[1], k[3]]*Pair[e[2], 
-                k[1]] + (T + U)*Pair[e[1], k[4]]*Pair[e[2], k[1]] + 
-              Pair[e[1], k[2]]*((-3*MH2 + 3*S34 + T14 + T24)*Pair[e[2], 
-                  k[3]] - (T + U)*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]]) + 
-           Pair[e[1], ec[5]]*Pair[e[2], k[1]]*((-MH2 + S34)*Pair[ec[4], k[
-                1]] + (-MH2 + S34)*Pair[ec[4], k[2]] + (-T + T14 + T24 - U)*
-              Pair[ec[4], k[3]]) - Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-            ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] - (MH2 - S34 + T + U)*
-              Pair[ec[5], k[4]]) + 2*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*
-              Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
-              Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + 
-             Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[5]]*
-              Pair[ec[5], k[3]] - Pair[e[1], k[4]]*Pair[e[2], k[1]]*
-              (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
-                (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]])) - 
-             2*Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]*
-              Pair[ec[5], k[4]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*
-              Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 2*Pair[e[1], k[2]]*
-              Pair[e[2], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 
-             Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-              Pair[ec[5], k[4]] + Pair[e[1], k[3]]*Pair[e[2], k[1]]*
-              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
-             Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]*
-              (-Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + Pair[e[1], k[2]]*
-            (-(Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
-                (-MH2 + S34)*Pair[ec[4], k[2]] + (-T + T14 + T24 - U)*
-                 Pair[ec[4], k[3]])) + Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + 
-                 T24)*Pair[ec[5], k[3]] - (MH2 - S34 + T + U)*Pair[ec[5], 
-                 k[4]])))) + 8*(D0i[dd002, MH2, 2*MH2 - S34 - T - U, 0, 
-           MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-          (((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
-             4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-                Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] - 2*Pair[ec[4], k[5]]*
-            (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
-              Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - Pair[
-                ec[5], k[2]]))) + D0i[dd003, MH2, S34, S, 2*MH2 - S34 - T - 
-            U, 0, 0, MT2, MT2, MT2, MT2]*((T14 - T24)*Pair[e[1], e[2]]*
-            Pair[ec[4], ec[5]] - 4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + 
-             Pair[e[1], k[2]]*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
-           4*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
-             Pair[ec[4], k[2]]) - 4*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-            (Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) + 4*Pair[e[1], k[2]]*
-            Pair[e[2], ec[4]]*Pair[ec[5], k[3]] - 4*Pair[e[1], ec[4]]*
-            Pair[e[2], k[1]]*Pair[ec[5], k[3]] + 2*Pair[e[1], e[2]]*
-            (Pair[ec[4], k[1]]*(2*Pair[ec[5], k[1]] - Pair[ec[5], k[4]]) + 
-             Pair[ec[4], k[2]]*(-2*Pair[ec[5], k[2]] + Pair[ec[5], k[4]]))) + 
-         D0i[dd003, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-           MT2]*(-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-                Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + Pair[e[2], k[1]]*
-              (Pair[e[1], ec[5]]*Pair[ec[4], k[5]] + Pair[e[1], ec[4]]*
-                Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*(Pair[e[2], ec[5]]*
-                Pair[ec[4], k[5]] + Pair[e[2], ec[4]]*Pair[ec[5], k[4]])) + 
-           Pair[e[1], e[2]]*((T - U)*Pair[ec[4], ec[5]] + 
-             2*(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
-               (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], 
-                 k[4]])))) - 4*(C0i[cc2, S34, S, 0, MT2, MT2, MT2]*
-          Pair[ec[4], k[5]]*(2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 
-           2*Pair[e[1], ec[5]]*Pair[e[2], k[1]] + Pair[e[1], e[2]]*
-            (Pair[ec[5], k[1]] - Pair[ec[5], k[2]])) + 
-         C0i[cc2, S34, 0, S, MT2, MT2, MT2]*
-          (2*(Pair[e[1], k[2]]*Pair[e[2], ec[5]] - Pair[e[1], ec[5]]*
-              Pair[e[2], k[1]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) + 
-           Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
-            (Pair[ec[5], k[1]] - Pair[ec[5], k[2]])) + 
-         D0i[dd00, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
-           MT2]*(4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[5]]*
-                Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
-                 Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + Pair[e[2], k[1]]*
-              (-(Pair[e[1], ec[5]]*Pair[ec[4], k[5]]) + 2*Pair[e[1], ec[4]]*
-                Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*(Pair[e[2], ec[5]]*
-                Pair[ec[4], k[5]] - 2*Pair[e[2], ec[4]]*Pair[ec[5], k[4]])) + 
-           Pair[e[1], e[2]]*((-2*T - T14 + T24 + 2*U)*Pair[ec[4], ec[5]] - 
-             2*(Pair[ec[4], k[5]]*(-Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
-               2*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], 
-                 k[4]])))) + D0i[dd0, MH2, 2*MH2 - S34 - T - U, 0, 
-         MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-        (Pair[e[1], e[2]]*((-(T*T14) + T24*U)*Pair[ec[4], ec[5]] + 
-           2*(-(Pair[ec[4], k[5]]*((MH2 - S34 - 2*(T + U))*Pair[ec[5], 
-                  k[1]] + (-MH2 + S34 + T24 + 2*U)*Pair[ec[5], k[3]] + 
-                T*Pair[ec[5], k[4]])) + Pair[ec[4], k[1]]*
-              ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + (MH2 - S34 - T - 
-                 U)*Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
-              ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (-MH2 + S34 + 
-                 T24 + U)*Pair[ec[5], k[4]]))) + 
-         2*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], k[1]]) - 
-             (T + U)*Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-              ((T14 + T24)*Pair[e[2], k[3]] + (T + U)*Pair[e[2], k[4]]))*
-            Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-            ((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-             (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]]) - Pair[e[1], ec[4]]*
-            Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-             (MH2 - S34 - T - U)*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
-            (-(Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], 
-                  k[3]] + (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]])) + 
-             Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-               (MH2 - S34 - T - U)*Pair[ec[5], k[4]])) + 
-           2*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*Pair[
-                ec[5], k[3]]) + Pair[e[1], k[2]]*Pair[e[2], k[4]]*
-              Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 2*Pair[e[1], k[2]]*
-              Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] - 
-             Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-              Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
-              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + Pair[e[1], k[2]]*
-              Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
-             Pair[e[1], k[5]]*Pair[e[2], k[1]]*(-2*Pair[ec[4], k[5]]*
-                Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) + 
-       8*(D0i[dd133, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-           MT2]*(Pair[e[1], e[2]]*((-T + 2*T14 - 2*T24 + U)*Pair[ec[4], k[
-                3]] + (-T + T14 - T24 + U)*Pair[ec[4], k[5]]) + 
-           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + 
-                Pair[ec[4], k[5]])) - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
-              (3*Pair[ec[4], k[3]] + 2*Pair[ec[4], k[5]]) + Pair[e[1], k[2]]*
-              (Pair[e[2], k[5]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
-               Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 2*Pair[ec[4], 
-                   k[5]]))))*Pair[ec[5], k[3]] + 
-         D0i[dd133, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-           MT2, MT2, MT2, MT2]*((T - U)*Pair[e[1], e[2]]*
-            (Pair[ec[4], k[5]]*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]]) + 
-             Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
-           4*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[5]]*
-              Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
-              Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
-              Pair[e[2], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
-             Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-              Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
-              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + Pair[e[1], k[2]]*
-              Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - 
-             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
-                Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) - 
-             Pair[e[1], k[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
-                Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) - 
-       2*D0i[dd13, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*(-4*((T - T14 - T24 + U)*
-            (Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
-           4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
-              Pair[e[2], k[3]])*(-(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] + 
-                Pair[ec[5], k[2]] - 3*Pair[ec[5], k[3]])) + Pair[ec[4], k[3]]*
-              (Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
-           Pair[e[1], k[2]]*Pair[e[2], ec[4]]*(2*(-MH2 + S34 + T14 + T24)*
-              Pair[ec[5], k[3]] + (T + U)*Pair[ec[5], k[4]]) - 
-           Pair[e[1], ec[4]]*Pair[e[2], k[1]]*(2*(-MH2 + S34 + T14 + T24)*
-              Pair[ec[5], k[3]] + (T + U)*Pair[ec[5], k[4]])) + 
-         Pair[e[1], e[2]]*(-((T - U)*(T - T14 - T24 + U)*Pair[ec[4], 
-              ec[5]]) - 2*(Pair[ec[4], k[2]]*(2*(MH2 - S34 - T14 - T24)*
-                Pair[ec[5], k[3]] - (T + U)*Pair[ec[5], k[4]]) + 
-             Pair[ec[4], k[1]]*(2*(-MH2 + S34 + T14 + T24)*Pair[ec[5], 
-                 k[3]] + (T + U)*Pair[ec[5], k[4]]) + 2*(T - U)*
-              (Pair[ec[4], k[5]]*(2*Pair[ec[5], k[3]] - Pair[ec[5], k[4]]) + 
-               Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) + 
-       D0i[dd0, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, MT2]*
-        (Pair[e[1], e[2]]*((-2*MH2*T14 + S34*T14 + 2*MH2*T24 - S34*T24 - 
-             T*T24 + T14*U)*Pair[ec[4], ec[5]] - 
-           2*(-(Pair[ec[4], k[2]]*((MH2 - S34)*Pair[ec[5], k[1]] + 
-                T14*Pair[ec[5], k[3]] + (MH2 - T)*Pair[ec[5], k[4]])) + 
-             Pair[ec[4], k[3]]*((T14 + T24)*Pair[ec[5], k[1]] - T14*
-                Pair[ec[5], k[3]] - T24*Pair[ec[5], k[4]]) + 
-             Pair[ec[4], k[1]]*((-MH2 + S34)*Pair[ec[5], k[1]] + (MH2 - S34 + 
-                 T24)*Pair[ec[5], k[3]] + (2*MH2 - S34 - U)*Pair[ec[5], 
-                 k[4]]))) + 2*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], 
-                k[1]]) + (-4*MH2 + 2*S34 + T + U)*Pair[e[1], k[4]]*
-              Pair[e[2], k[1]] + Pair[e[1], k[2]]*((T14 + T24)*Pair[e[2], 
-                 k[3]] + (4*MH2 - 2*S34 - T - U)*Pair[e[2], k[4]]))*
-            Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-            ((-MH2 + S34)*Pair[ec[4], k[1]] + (-MH2 + S34)*Pair[ec[4], k[
-                2]] + (T14 + T24)*Pair[ec[4], k[3]]) + Pair[e[1], ec[4]]*
-            Pair[e[2], k[1]]*((MH2 - S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-             (3*MH2 - S34 - T - U)*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + (-MH2 + S34)*
-                Pair[ec[4], k[2]] + (T14 + T24)*Pair[ec[4], k[3]]) + 
-             Pair[e[2], ec[4]]*((MH2 - S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-               (3*MH2 - S34 - T - U)*Pair[ec[5], k[4]])) + 
-           2*(Pair[e[1], k[4]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + Pair[
-                ec[4], k[5]])*Pair[ec[5], k[3]] + Pair[e[2], k[1]]*
-              (Pair[e[1], k[5]]*Pair[ec[4], k[3]] - Pair[e[1], k[3]]*
-                Pair[ec[4], k[5]])*Pair[ec[5], k[4]] - Pair[e[1], k[2]]*
-              (Pair[e[2], k[4]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])*
-                Pair[ec[5], k[3]] + (Pair[e[2], k[5]]*Pair[ec[4], k[3]] - 
-                 Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]])))) - 
-       D0i[dd1, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
-         MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
-          ((MH2*T - S34*T - T^2 + 2*T*T14 - MH2*U + S34*U - 2*T24*U + U^2)*
-            Pair[ec[4], ec[5]] + 2*(Pair[ec[4], k[5]]*(2*(MH2 - S34 - 
-                 2*(T + U))*Pair[ec[5], k[1]] + (-2*MH2 + 2*S34 - 3*T + 
-                 2*T24 + 5*U)*Pair[ec[5], k[3]] + 2*T*Pair[ec[5], k[4]]) + 
-             2*Pair[ec[4], k[3]]*((MH2 - S - T - U)*Pair[ec[5], k[1]] - U*
-                Pair[ec[5], k[3]] + (MH2 - S34 - T24 - U)*Pair[ec[5], 
-                 k[4]]) + 2*Pair[ec[4], k[1]]*((-MH2 + S + 2*(T + U))*
-                Pair[ec[5], k[3]] + (-MH2 + S34 + T + U)*Pair[ec[5], 
-                 k[4]]))) + 4*(((3*MH2 - S - 2*S34 - 3*T - 3*U)*
-              Pair[e[1], k[3]]*Pair[e[2], k[1]] - (T + U)*Pair[e[1], k[5]]*
-              Pair[e[2], k[1]] + Pair[e[1], k[2]]*((-3*MH2 + S + 2*S34 + 
-                 3*T + 3*U)*Pair[e[2], k[3]] + (T + U)*Pair[e[2], k[5]]))*
-            Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-            ((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-             (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]]) - Pair[e[1], ec[4]]*
-            Pair[e[2], k[1]]*((-MH2 + S + 2*(T + U))*Pair[ec[5], k[3]] + 
-             (-MH2 + S34 + T + U)*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
-               (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]]) + Pair[e[2], ec[4]]*
-              ((-MH2 + S + 2*(T + U))*Pair[ec[5], k[3]] + (-MH2 + S34 + T + 
-                 U)*Pair[ec[5], k[4]])) + 
-           2*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[3]]*
-              Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
-              Pair[ec[4], k[3]]*Pair[ec[5], k[3]] - 2*Pair[e[1], k[3]]*
-              Pair[e[2], k[1]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-             2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
-              Pair[ec[5], k[3]] - Pair[e[1], k[2]]*Pair[e[2], k[4]]*
-              Pair[ec[4], k[5]]*Pair[ec[5], k[3]] - 2*Pair[e[1], k[2]]*
-              Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(-Pair[ec[4], k[3]] + Pair[
-                ec[4], k[5]])*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
-              Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
-             Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
-              Pair[ec[5], k[4]] - Pair[e[1], k[2]]*Pair[e[2], k[3]]*
-              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - Pair[e[1], k[5]]*
-              Pair[e[2], k[1]]*(-2*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-               Pair[ec[4], k[3]]*(Pair[ec[5], k[3]] + Pair[ec[5], 
-                  k[4]]))))) - D0i[dd3, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 
-         0, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
-          ((5*MH2*T14 - 3*S34*T14 - T*T14 - 5*MH2*T24 + 3*S34*T24 + 3*T*T24 - 
-             3*T14*U + T24*U)*Pair[ec[4], ec[5]] - 
-           2*(Pair[ec[4], k[3]]*(-2*(T14 + T24)*Pair[ec[5], k[1]] + 
-               (T14 + T24)*Pair[ec[5], k[3]] + 2*T24*Pair[ec[5], k[4]]) + 
-             Pair[ec[4], k[1]]*(2*(-2*MH2 + T + U)*Pair[ec[5], k[1]] + 
-               (2*MH2 - 2*T + T14 - 7*T24)*Pair[ec[5], k[3]] + 2*
-                (-MH2 + S34 + U)*Pair[ec[5], k[4]]) - Pair[ec[4], k[2]]*
-              ((4*MH2 - 2*(T + U))*Pair[ec[5], k[1]] + (-2*MH2 + 2*T - 
-                 7*T14 + T24)*Pair[ec[5], k[3]] + 2*(-3*MH2 + S34 + 2*T + U)*
-                Pair[ec[5], k[4]]))) - 
-         4*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
-             (-5*MH2 + 3*S34 + 2*(T + U))*Pair[e[1], k[4]]*Pair[e[2], k[1]] + 
-             Pair[e[1], k[2]]*((T14 + T24)*Pair[e[2], k[3]] + (5*MH2 - 
-                 3*S34 - 2*(T + U))*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 
-           Pair[e[1], ec[5]]*Pair[e[2], k[1]]*((-2*MH2 + T + U)*
-              Pair[ec[4], k[1]] + (-2*MH2 + T + U)*Pair[ec[4], k[2]] - 
-             (T14 + T24)*Pair[ec[4], k[3]]) + Pair[e[1], ec[4]]*
-            Pair[e[2], k[1]]*(3*(T14 + T24)*Pair[ec[5], k[3]] + 
-             2*(S + T14 + T24)*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*((-2*MH2 + T + U)*Pair[ec[4], k[1]] + 
-               (-2*MH2 + T + U)*Pair[ec[4], k[2]] - (T14 + T24)*Pair[ec[4], 
-                 k[3]]) - Pair[e[2], ec[4]]*(3*(T14 + T24)*Pair[ec[5], 
-                 k[3]] + 2*(S + T14 + T24)*Pair[ec[5], k[4]])) + 
-           2*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
-                Pair[ec[4], k[2]])*(Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
-             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(4*Pair[ec[4], k[1]]*
-                Pair[ec[5], k[3]] + 4*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] - 
-               Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
-              (Pair[e[2], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
-                (Pair[ec[5], k[3]] + Pair[ec[5], k[4]]) + Pair[e[2], k[4]]*
-                (-4*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] - 4*Pair[ec[4], k[2]]*
-                  Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], 
-                   k[4]]))))) - D0i[dd0, MH2, S34, 0, MH2 - S34 - T14 - T24, 
-         0, S, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
-          ((MH2*T - S34*T - T*T24 - MH2*U + S34*U + T14*U)*
-            Pair[ec[4], ec[5]] - 2*(Pair[ec[4], k[2]]*((MH2 - S34 - T14)*
-                Pair[ec[5], k[1]] - T14*Pair[ec[5], k[2]] + (T + T14)*
-                Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
-              (-(T24*Pair[ec[5], k[1]]) + T14*Pair[ec[5], k[2]] + (-T + U)*
-                Pair[ec[5], k[4]]) + Pair[ec[4], k[1]]*(T24*Pair[ec[5], 
-                 k[1]] + (-MH2 + S34 + T24)*Pair[ec[5], k[2]] - (T24 + U)*
-                Pair[ec[5], k[4]]))) + 
-         2*(((2*MH2 - 2*S34 - T14 - T24)*Pair[e[1], k[3]]*Pair[e[2], k[1]] + 
-             (T + U)*Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
-              ((-2*MH2 + 2*S34 + T14 + T24)*Pair[e[2], k[3]] - (T + U)*
-                Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*
-            Pair[e[2], k[1]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
-             (-MH2 + S34)*Pair[ec[4], k[2]] + (T14 + T24)*Pair[ec[4], k[
-                3]]) + Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-            ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] - (MH2 - S34 + T + U)*
-              Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
-            (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + (-MH2 + S34)*
-                Pair[ec[4], k[2]] + (T14 + T24)*Pair[ec[4], k[3]]) - 
-             Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] - 
-               (MH2 - S34 + T + U)*Pair[ec[5], k[4]])) + 
-           2*(-(Pair[e[2], k[1]]*(Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
-                Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) + 
-             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
-                Pair[ec[5], k[3]] - 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
-             Pair[e[1], k[2]]*((Pair[e[2], k[5]]*Pair[ec[4], k[3]] + 
-                 Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
-               Pair[e[2], k[4]]*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) + 
-                 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) - 
-       8*(D0i[dd122, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, 
-           S, MT2, MT2, MT2, MT2]*((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
-           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-              Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-         D0i[dd123, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
-           MT2]*(Pair[e[1], e[2]]*(Pair[ec[4], k[5]]*((-T14 + T24)*
-                Pair[ec[5], k[3]] + (-T + U)*Pair[ec[5], k[4]]) + 
-             Pair[ec[4], k[3]]*(-2*(T14 - T24)*Pair[ec[5], k[3]] + 
-               (-T + T14 - T24 + U)*Pair[ec[5], k[4]])) + 
-           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + 
-                Pair[ec[4], k[5]])*Pair[ec[5], k[3]]) - Pair[e[2], k[1]]*
-              (Pair[e[1], k[5]]*Pair[ec[4], k[3]] + Pair[e[1], k[3]]*
-                (2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]))*Pair[ec[5], k[
-                4]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]]*
-                (2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])*Pair[ec[5], k[3]] + 
-               (Pair[e[2], k[5]]*Pair[ec[4], k[3]] + Pair[e[2], k[3]]*
-                  (2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]))*Pair[ec[5], 
-                 k[4]]))) + D0i[dd123, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, 
-           S, MT2, MT2, MT2, MT2]*(-(Pair[e[1], e[2]]*
-             ((-T + T14 - T24 + U)*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
-              Pair[ec[4], k[5]]*((T14 - T24)*Pair[ec[5], k[3]] + 
-                (T - U)*Pair[ec[5], k[4]]))) + 
-           4*(-(Pair[e[2], k[1]]*(Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
-                Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) - 
-             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
-                Pair[ec[5], k[3]] + 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
-             Pair[e[1], k[2]]*((Pair[e[2], k[5]]*Pair[ec[4], k[3]] + 
-                 Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
-               Pair[e[2], k[4]]*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) + 
-       2*(C0i[cc1, 2*MH2 - S34 - T - U, 0, S, MT2, MT2, MT2]*
-          (((T14 - T24)*Pair[e[1], e[2]] - 4*(-(Pair[e[1], k[4]]*Pair[e[2], 
-                  k[1]]) + Pair[e[1], k[2]]*Pair[e[2], k[4]]))*
-            Pair[ec[4], ec[5]] + 2*(2*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
-             2*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + Pair[e[1], e[2]]*
-              (Pair[ec[4], k[1]] - Pair[ec[4], k[2]]))*Pair[ec[5], k[3]]) + 
-         D0i[dd1, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, MT2]*
-          (-(Pair[e[1], e[2]]*((2*MH2*T14 - S34*T14 - 2*MH2*T24 + S34*T24 + 
-                T*T24 - T14*U)*Pair[ec[4], ec[5]] + Pair[ec[4], k[5]]*(
-                -2*(MH2 - S34)*Pair[ec[5], k[1]] + (-MH2 + S34 - 2*T14)*
-                 Pair[ec[5], k[3]] + 2*(-MH2 + T)*Pair[ec[5], k[4]]) + 
-              2*Pair[ec[4], k[1]]*((2*MH2 - 2*S34 + T14 + T24)*Pair[ec[5], 
-                  k[3]] + (MH2 + S + T14 + T24)*Pair[ec[5], k[4]]) + 
-              Pair[ec[4], k[3]]*(2*(S + S34 + 2*(T14 + T24))*Pair[ec[5], 
-                  k[1]] + 2*(-2*MH2 + S34 + T - 3*T14 + T24)*Pair[ec[5], 
-                  k[3]] - (3*MH2 + S - 2*T + T14 + 3*T24)*Pair[ec[5], 
-                  k[4]]))) + 2*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], 
-                  k[1]]) + (-4*MH2 + 2*S34 + T + U)*Pair[e[1], k[4]]*
-                Pair[e[2], k[1]] + Pair[e[1], k[2]]*((T14 + T24)*Pair[e[2], 
-                   k[3]] + (4*MH2 - 2*S34 - T - U)*Pair[e[2], k[4]]))*
-              Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
-              ((S + S34 + 2*(T14 + T24))*Pair[ec[4], k[3]] + (-MH2 + S34)*
-                Pair[ec[4], k[5]]) + Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
-              ((2*MH2 - 2*S34 + T14 + T24)*Pair[ec[5], k[3]] + (3*MH2 - S34 - 
-                 T - U)*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
-              (Pair[e[2], ec[5]]*((S + S34 + 2*(T14 + T24))*Pair[ec[4], 
-                   k[3]] + (-MH2 + S34)*Pair[ec[4], k[5]]) + Pair[e[2], 
-                 ec[4]]*((2*MH2 - 2*S34 + T14 + T24)*Pair[ec[5], k[3]] + 
-                 (3*MH2 - S34 - T - U)*Pair[ec[5], k[4]])) + 
-             2*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]*
-                 Pair[ec[5], k[3]]) + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*
-                Pair[ec[4], k[3]]*Pair[ec[5], k[3]] - 3*Pair[e[1], k[2]]*
-                Pair[e[2], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + 
-               Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-                Pair[ec[5], k[3]] - Pair[e[1], k[2]]*Pair[e[2], k[4]]*
-                Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[4]]*
-                Pair[e[2], k[1]]*(3*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])*
-                Pair[ec[5], k[3]] + Pair[e[1], k[5]]*Pair[e[2], k[1]]*
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - Pair[e[1], k[2]]*
-                Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
-               Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
-                Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
-                (2*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + Pair[ec[4], k[5]]*
-                  Pair[ec[5], k[4]]))))))))/(MW*SW) + 
-  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu2, Glu5, Glu4, 0, 0]]*
-    (-(Den[T14, 0]*((8*D0i[dd112, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, 
-            MT2, MT2, MT2, MT2] - 8*D0i[dd112, 0, U, T14, MH2 - S - T24 - U, 
-            MH2, 0, MT2, MT2, MT2, MT2])*Pair[e[2], k[3]]*
-         ((-S + T24)*Pair[e[1], ec[4]] + 
-          4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
-        (8*D0i[dd001, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-            MT2] - 8*D0i[dd001, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, 
-            MT2, MT2, MT2])*(Pair[e[2], ec[5]]*
-           ((-S + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]])) - 
-          2*(Pair[e[1], ec[4]]*(Pair[e[2], k[1]] + Pair[e[2], k[4]]) - 
-            2*(Pair[e[1], k[4]]*Pair[e[2], ec[4]] + Pair[e[1], e[2]]*Pair[
-                ec[4], k[1]]))*Pair[ec[5], k[2]]) + 
-        D0i[dd1, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, MT2]*
-         (Pair[e[2], ec[5]]*((S - T24)*(MH2 - U)*Pair[e[1], ec[4]] - 
-            4*(MH2 - U)*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*Pair[ec[4], k[2]])) + 2*Pair[e[2], k[3]]*
-           ((-S + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
-           Pair[ec[5], k[2]]) + 8*(D0i[dd113, 0, U, T14, MH2 - S - T24 - U, 
-            MH2, 0, MT2, MT2, MT2, MT2]*Pair[e[2], k[5]]*
-           ((-S + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
-           Pair[ec[5], k[2]] + D0i[dd113, 0, U, 0, 2*MH2 - S34 - T - U, MH2, 
-            T14, MT2, MT2, MT2, MT2]*(-((S - T24)*Pair[e[1], ec[4]]*
-              (Pair[e[2], k[1]] - Pair[e[2], k[4]])) + 
-            4*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*(Pair[e[1], k[2]]*Pair[
-                ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
-           Pair[ec[5], k[2]]) + (8*D0i[dd222, 0, U, 0, 2*MH2 - S34 - T - U, 
-            MH2, T14, MT2, MT2, MT2, MT2] - 8*D0i[dd222, 0, U, T14, 
-            MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2])*Pair[e[2], k[3]]*
-         ((-S34 + T)*Pair[e[1], ec[4]] + 
-          4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             Pair[ec[4], k[3]]))*Pair[ec[5], k[3]] + 
-        8*D0i[dd223, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-          MT2]*(Pair[e[1], ec[4]]*((-S - 2*S34 + 2*T + T24)*
-             Pair[e[2], k[3]] + (-S34 + T)*Pair[e[2], k[5]]) + 
-          4*(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]] + 
-            Pair[e[1], k[3]]*(3*Pair[e[2], k[3]] + Pair[e[2], k[5]])*
-             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[e[2], k[5]]*Pair[
-                ec[4], k[3]] + Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 
-                Pair[ec[4], k[5]]))))*Pair[ec[5], k[3]] + 
-        8*D0i[dd233, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-          MT2]*(Pair[e[1], ec[4]]*((-2*S - S34 + T + 2*T24)*
-             Pair[e[2], k[3]] + (-S - S34 + T + T24)*Pair[e[2], k[5]]) + 
-          4*(Pair[e[1], k[5]]*(2*Pair[e[2], k[3]] + Pair[e[2], k[5]])*
-             Pair[ec[4], k[1]] + Pair[e[1], k[3]]*(3*Pair[e[2], k[3]] + 
-              2*Pair[e[2], k[5]])*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             (Pair[e[2], k[5]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
-              Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 2*Pair[ec[4], k[5]]))))*
-         Pair[ec[5], k[3]] + 8*(D0i[dd333, 0, U, T14, MH2 - S - T24 - U, MH2, 
-            0, MT2, MT2, MT2, MT2]*Pair[e[2], k[5]]*
-           ((-S34 + T)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]] - Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*(Pair[ec[4], k[2]] - Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[2]] + D0i[dd333, 0, U, 0, 2*MH2 - S34 - T - U, MH2, 
-            T14, MT2, MT2, MT2, MT2]*(-((S - T24)*Pair[e[1], ec[4]]*
-              (Pair[e[2], k[1]] - Pair[e[2], k[4]])) + 
-            4*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*(Pair[e[1], k[2]]*Pair[
-                ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*
-           Pair[ec[5], k[3]]) + 4*D0i[dd12, 0, U, 0, 2*MH2 - S34 - T - U, 
-          MH2, T14, MT2, MT2, MT2, MT2]*
-         (-2*(MH2 - U)*(Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
-            Pair[e[1], e[2]]*Pair[ec[4], k[1]])*Pair[ec[5], k[2]] + 
-          2*Pair[e[2], k[3]]*(-((S + T24)*Pair[e[1], k[4]]*Pair[ec[4], ec[
-                5]]) - (S + T24)*Pair[e[1], ec[5]]*Pair[ec[4], k[1]] + 
-            4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
-                ec[4], k[2]])*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]])) - 
-          Pair[e[1], ec[4]]*(-((MH2 - U)*(Pair[e[2], k[1]] + Pair[e[2], 
-                k[4]])*Pair[ec[5], k[2]]) - Pair[e[2], k[3]]*
-             (2*(S + T24)*Pair[ec[5], k[1]] - (S - 3*T24)*Pair[ec[5], k[2]] + 
-              (-3*S + T24)*Pair[ec[5], k[3]]))) + 
-        8*D0i[dd123, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-          MT2]*(4*(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*
-             Pair[ec[5], k[2]] + Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] + 
-              Pair[e[2], k[5]])*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-            2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[3]]*
-             Pair[ec[5], k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*
-             Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + Pair[e[1], k[4]]*
-             Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[2]] + 
-            2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*
-             Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
-             Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 2*Pair[e[1], k[4]]*
-             Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
-            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
-             Pair[ec[5], k[3]]) + Pair[e[1], ec[4]]*
-           (Pair[e[2], k[5]]*((-S34 + T)*Pair[ec[5], k[2]] + (-S + T24)*Pair[
-                ec[5], k[3]]) + Pair[e[2], k[3]]*((-S - S34 + T + T24)*Pair[
-                ec[5], k[2]] + 2*(-S + T24)*Pair[ec[5], k[3]]))) + 
-        4*D0i[dd23, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-          MT2]*(2*Pair[e[1], k[4]]*((-7*MH2 + 3*(S34 + T + U))*
-             Pair[e[2], k[3]] + (-3*MH2 + S34 + T + U)*Pair[e[2], k[5]])*
-           Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*
-           ((-7*MH2 + 3*(S34 + T + U))*Pair[e[2], k[3]] + 
-            (-3*MH2 + S34 + T + U)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
-          2*(MH2 + S + T24 - U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*
-           Pair[ec[5], k[3]] - 2*(MH2 + S + T24 - U)*Pair[e[1], e[2]]*
-           Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-          8*(2*Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] + Pair[e[2], k[5]])*
-             Pair[ec[4], k[1]] + Pair[e[1], k[5]]*(3*Pair[e[2], k[3]] + 
-              Pair[e[2], k[5]])*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             (Pair[e[2], k[5]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
-              Pair[e[2], k[3]]*(4*Pair[ec[4], k[3]] + 3*Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[3]] - Pair[e[1], ec[4]]*(-2*(MH2 + S + T24 - U)*
-             Pair[e[2], k[1]]*Pair[ec[5], k[3]] - Pair[e[2], k[3]]*
-             (2*(MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[1]] + 
-              (MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[2]] + (2*MH2 - 12*S - 
-                4*S34 - 5*T14 - U)*Pair[ec[5], k[3]]) - Pair[e[2], k[5]]*
-             (2*(MH2 + S + T14 + T24)*Pair[ec[5], k[1]] + (MH2 + S + T14 + 
-                T24)*Pair[ec[5], k[2]] + (2*MH2 - 6*S - 4*S34 - 3*T14 - 
-                2*T24 - U)*Pair[ec[5], k[3]]))) + 
-        2*D0i[dd2, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-          MT2]*(-2*Pair[e[1], ec[5]]*((2*S + T14 + 2*T24 + U)*
-             Pair[e[2], k[3]] + (-MH2 + U)*Pair[e[2], k[5]])*
-           Pair[ec[4], k[1]] + 2*Pair[e[2], ec[5]]*
-           ((-4*MH2 + S34 + T + 2*U)*Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-            (S + T24)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-             ((-4*MH2 + S34 + T + 2*U)*Pair[ec[4], k[2]] + (S + T24)*Pair[
-                ec[4], k[3]])) - 2*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
-           ((-3*MH2 + S34 + T + U)*Pair[ec[5], k[2]] + 
-            (2*MH2 + S + T24 - 2*U)*Pair[ec[5], k[3]]) - 2*Pair[e[1], k[4]]*
-           (((2*S + T14 + 2*T24 + U)*Pair[e[2], k[3]] + (-MH2 + U)*Pair[e[2], 
-                k[5]])*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*
-             ((-3*MH2 + S34 + T + U)*Pair[ec[5], k[2]] + (2*MH2 + S + T24 - 
-                2*U)*Pair[ec[5], k[3]])) - Pair[e[1], ec[4]]*
-           ((-2*MH2*(S - T24) + S*(S34 + U) - T24*(T + U))*
-             Pair[e[2], ec[5]] + 2*Pair[e[2], k[1]]*((MH2 + S + T14 + T24)*
-               Pair[ec[5], k[2]] - (2*MH2 + S + T24 - 2*U)*Pair[ec[5], 
-                k[3]]) + Pair[e[2], k[5]]*(2*(MH2 - U)*Pair[ec[5], k[1]] - 
-              2*(MH2 - T)*Pair[ec[5], k[2]] + (MH2 + 2*S - U)*Pair[ec[5], 
-                k[3]]) - Pair[e[2], k[3]]*(2*(2*S + T14 + 2*T24 + U)*Pair[
-                ec[5], k[1]] + (3*MH2 + S - 2*T + T14 + 3*T24)*Pair[ec[5], 
-                k[2]] + 2*(-2*MH2 - 3*S + T + T24 + U)*Pair[ec[5], k[3]])) + 
-          4*(-(Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
-              Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-             Pair[ec[4], k[5]]*Pair[ec[5], k[2]] + 3*Pair[e[1], k[2]]*
-             Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-            Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]]*
-             Pair[ec[5], k[3]] + 3*Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-             Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + Pair[e[1], k[4]]*
-             Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
-            2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[3]]*
-             Pair[ec[5], k[3]] + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-             Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[5]]*
-             Pair[e[2], k[3]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[2]] + 
-              Pair[ec[5], k[3]]) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
-             (-(Pair[e[2], k[5]]*Pair[ec[5], k[2]]) + 2*Pair[e[2], k[3]]*Pair[
-                ec[5], k[3]]))) - 8*D0i[dd123, 0, U, T14, MH2 - S - T24 - U, 
-          MH2, 0, MT2, MT2, MT2, MT2]*(Pair[e[1], ec[4]]*
-           ((-S - S34 + T + T24)*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-            Pair[e[2], k[5]]*((S34 - T)*Pair[ec[5], k[2]] + (S - T24)*Pair[
-                ec[5], k[3]])) + 4*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*
-              Pair[ec[4], k[1]]*Pair[ec[5], k[2]]) - Pair[e[1], k[3]]*
-             Pair[e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-            2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*
-             Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*
-             Pair[ec[4], k[3]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
-             Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - 
-            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
-             Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], k[1]]*
-             (2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] - Pair[e[2], k[5]]*Pair[
-                ec[5], k[3]]))) - 8*D0i[dd233, 0, U, T14, MH2 - S - T24 - U, 
-          MH2, 0, MT2, MT2, MT2, MT2]*(-((S34 - T)*Pair[e[1], ec[4]]*
-            (Pair[e[2], k[3]]*Pair[ec[5], k[2]] - Pair[e[2], k[5]]*
-              (Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
-          4*(-(Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]]*
-              Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-             Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
-             Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[2]] - 
-            Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
-             Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*
-             Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + Pair[e[1], k[4]]*
-             Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-            Pair[e[1], k[2]]*Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*Pair[ec[5], 
-                k[2]] - Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + 
-            Pair[e[1], k[5]]*Pair[ec[4], k[1]]*(-(Pair[e[2], k[3]]*
-                Pair[ec[5], k[2]]) + Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + 
-        (8*D0i[dd122, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-            MT2] - 8*D0i[dd122, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, 
-            MT2, MT2, MT2])*Pair[e[2], k[3]]*
-         (Pair[e[1], ec[4]]*((-S34 + T)*Pair[ec[5], k[2]] + 
-            (-S + T24)*Pair[ec[5], k[3]]) + 
-          4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-            Pair[e[1], k[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-            Pair[e[1], k[4]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
-              Pair[ec[4], k[2]]*Pair[ec[5], k[3]]))) - 
-        D0i[dd0, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, MT2]*
-         (Pair[e[1], ec[4]]*((-2*MH2*(S - T24) + S*(S34 + U) - T24*(T + U))*
-             Pair[e[2], ec[5]] - 2*(Pair[e[2], k[3]]*((S + T24)*Pair[ec[5], 
-                  k[1]] + T24*Pair[ec[5], k[2]] - S*Pair[ec[5], k[3]]) + 
-              Pair[e[2], k[4]]*((MH2 - U)*Pair[ec[5], k[1]] + (-MH2 + T)*
-                 Pair[ec[5], k[2]] + S*Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*(
-                (-MH2 + U)*Pair[ec[5], k[1]] + (-2*MH2 + S34 + U)*
-                 Pair[ec[5], k[2]] + (MH2 + T24 - U)*Pair[ec[5], k[3]]))) + 
-          2*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
-              (S + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*
-             Pair[ec[4], k[1]] - Pair[e[2], ec[5]]*((-4*MH2 + S34 + T + 2*U)*
-               Pair[e[1], k[2]]*Pair[ec[4], k[1]] + (S + T24)*Pair[e[1], 
-                k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(
-                (-4*MH2 + S34 + T + 2*U)*Pair[ec[4], k[2]] + (S + T24)*
-                 Pair[ec[4], k[3]])) + Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
-             ((-3*MH2 + S34 + T + U)*Pair[ec[5], k[2]] + (MH2 + S + T24 - 
-                U)*Pair[ec[5], k[3]]) - 2*(Pair[e[1], k[5]]*Pair[e[2], k[3]]*
-               Pair[ec[4], k[1]]*Pair[ec[5], k[2]] - Pair[e[1], k[3]]*Pair[
-                e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] - 
-              Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], 
-                k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
-               Pair[ec[5], k[2]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[
-                ec[4], k[1]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], 
-                k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 2*Pair[e[1], 
-                k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
-              Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], 
-                k[3]]) + Pair[e[1], k[4]]*(((-MH2 + U)*Pair[e[2], k[1]] + 
-                (S + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*Pair[
-                ec[4], ec[5]] + Pair[e[2], ec[4]]*((-3*MH2 + S34 + T + U)*
-                 Pair[ec[5], k[2]] + (MH2 + S + T24 - U)*Pair[ec[5], 
-                  k[3]])))) - 8*D0i[dd223, 0, U, T14, MH2 - S - T24 - U, MH2, 
-          0, MT2, MT2, MT2, MT2]*(-((S34 - T)*Pair[e[1], ec[4]]*
-            (-(Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[2], k[3]]*
-              (Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
-          4*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[3]]*
-             Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + Pair[e[1], k[3]]*
-             Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] - 
-              Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
-             (-(Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[3]]) + 
-              Pair[e[2], k[3]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
-                (Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*Pair[ec[5], 
-                  k[3]])))) + D0i[dd3, 0, U, 0, 2*MH2 - S34 - T - U, MH2, 
-          T14, MT2, MT2, MT2, MT2]*(Pair[e[1], ec[4]]*
-           ((5*MH2*(S - T24) - S*(3*S34 + T + 3*U) + T24*(S34 + 3*(T + U)))*
-             Pair[e[2], ec[5]] - 2*(Pair[e[2], k[1]]*(2*(-2*MH2 + S34 + T)*
-                 Pair[ec[5], k[1]] + 2*(MH2 - S34 - U)*Pair[ec[5], k[2]] + 
-                (2*MH2 + S - 2*T - 7*T24)*Pair[ec[5], k[3]]) + 
-              Pair[e[2], k[3]]*(-2*(S + T24)*Pair[ec[5], k[1]] - 
-                2*T24*Pair[ec[5], k[2]] + (S + T24)*Pair[ec[5], k[3]]) + 
-              Pair[e[2], k[4]]*((4*MH2 - 2*(S34 + T))*Pair[ec[5], k[1]] + 
-                (6*MH2 - 2*(S34 + 2*T + U))*Pair[ec[5], k[2]] + 
-                (-2*MH2 - 7*S + 2*T + T24)*Pair[ec[5], k[3]]))) + 
-          4*(Pair[e[1], ec[5]]*((-2*MH2 + S34 + T)*Pair[e[2], k[1]] - 
-              (S + T24)*Pair[e[2], k[3]] + (2*MH2 - S34 - T)*Pair[e[2], 
-                k[4]])*Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*
-             ((-5*MH2 + 2*S34 + 2*T + 3*U)*Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]] + (S + T24)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*((-5*MH2 + 2*S34 + 2*T + 3*U)*Pair[ec[4], 
-                  k[2]] + (S + T24)*Pair[ec[4], k[3]])) + Pair[e[1], e[2]]*
-             Pair[ec[4], k[1]]*(2*(S + T14 + T24)*Pair[ec[5], k[2]] - 
-              3*(S + T24)*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
-             (((-2*MH2 + S34 + T)*Pair[e[2], k[1]] - (S + T24)*Pair[e[2], 
-                  k[3]] + (2*MH2 - S34 - T)*Pair[e[2], k[4]])*Pair[ec[4], 
-                ec[5]] + Pair[e[2], ec[4]]*(2*(S + T14 + T24)*Pair[ec[5], 
-                  k[2]] - 3*(S + T24)*Pair[ec[5], k[3]])) + 
-            2*(-(Pair[e[1], k[3]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*
-                Pair[ec[4], k[1]]*(Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
-              Pair[e[1], k[2]]*Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*
-                 Pair[ec[5], k[2]] + 4*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*
+                k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
+               Pair[ec[5], k[2]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[
+                ec[4], k[1]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], 
+                k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 2*Pair[e[1], 
+                k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
+              Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], 
+                k[3]]) + Pair[e[1], k[4]]*(((-MH2 + U)*Pair[e[2], k[1]] + 
+                (S + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*Pair[
+                ec[4], ec[5]] + Pair[e[2], ec[4]]*((-3*MH2 + S34 + T + U)*
+                 Pair[ec[5], k[2]] + (MH2 + S + T24 - U)*Pair[ec[5], 
+                  k[3]])))) - 8*D0i[dd223, 0, U, T14, MH2 - S - T24 - U, MH2, 
+          0, MT2, MT2, MT2, MT2]*(-((S34 - T)*Pair[e[1], ec[4]]*
+            (-(Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[2], k[3]]*
+              (Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
+          4*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[3]]*
+             Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + Pair[e[1], k[3]]*
+             Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] - 
+              Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
+             (-(Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[3]]) + 
+              Pair[e[2], k[3]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
+                (Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*Pair[ec[5], 
+                  k[3]])))) + D0i[dd3, 0, U, 0, 2*MH2 - S34 - T - U, MH2, 
+          T14, MT2, MT2, MT2, MT2]*(Pair[e[1], ec[4]]*
+           ((5*MH2*(S - T24) - S*(3*S34 + T + 3*U) + T24*(S34 + 3*(T + U)))*
+             Pair[e[2], ec[5]] - 2*(Pair[e[2], k[1]]*(2*(-2*MH2 + S34 + T)*
+                 Pair[ec[5], k[1]] + 2*(MH2 - S34 - U)*Pair[ec[5], k[2]] + 
+                (2*MH2 + S - 2*T - 7*T24)*Pair[ec[5], k[3]]) + 
+              Pair[e[2], k[3]]*(-2*(S + T24)*Pair[ec[5], k[1]] - 
+                2*T24*Pair[ec[5], k[2]] + (S + T24)*Pair[ec[5], k[3]]) + 
+              Pair[e[2], k[4]]*((4*MH2 - 2*(S34 + T))*Pair[ec[5], k[1]] + 
+                (6*MH2 - 2*(S34 + 2*T + U))*Pair[ec[5], k[2]] + 
+                (-2*MH2 - 7*S + 2*T + T24)*Pair[ec[5], k[3]]))) + 
+          4*(Pair[e[1], ec[5]]*((-2*MH2 + S34 + T)*Pair[e[2], k[1]] - 
+              (S + T24)*Pair[e[2], k[3]] + (2*MH2 - S34 - T)*Pair[e[2], 
+                k[4]])*Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*
+             ((-5*MH2 + 2*S34 + 2*T + 3*U)*Pair[e[1], k[2]]*Pair[ec[4], 
+                k[1]] + (S + T24)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*((-5*MH2 + 2*S34 + 2*T + 3*U)*Pair[ec[4], 
+                  k[2]] + (S + T24)*Pair[ec[4], k[3]])) + Pair[e[1], e[2]]*
+             Pair[ec[4], k[1]]*(2*(S + T14 + T24)*Pair[ec[5], k[2]] - 
+              3*(S + T24)*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
+             (((-2*MH2 + S34 + T)*Pair[e[2], k[1]] - (S + T24)*Pair[e[2], 
+                  k[3]] + (2*MH2 - S34 - T)*Pair[e[2], k[4]])*Pair[ec[4], 
+                ec[5]] + Pair[e[2], ec[4]]*(2*(S + T14 + T24)*Pair[ec[5], 
+                  k[2]] - 3*(S + T24)*Pair[ec[5], k[3]])) + 
+            2*(-(Pair[e[1], k[3]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*
+                Pair[ec[4], k[1]]*(Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
+              Pair[e[1], k[2]]*Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*
+                 Pair[ec[5], k[2]] + 4*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*
                  Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*(Pair[e[2], k[3]]*
                  Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - (Pair[e[2], k[1]] - 
                   Pair[e[2], k[4]])*(Pair[ec[4], k[3]]*(Pair[ec[5], k[2]] - 
                     Pair[ec[5], k[3]]) - 4*Pair[ec[4], k[2]]*Pair[ec[5], 
-                    k[3]]))))) + 8*(D0i[dd133, 0, U, T14, MH2 - S - T24 - U, 
-            MH2, 0, MT2, MT2, MT2, MT2]*Pair[e[2], k[5]]*
-           ((-S - S34 + T + T24)*Pair[e[1], ec[4]] + 
+                    k[3]]))))) - 8*D0i[dd00, 0, U, 0, 2*MH2 - S34 - T - U, 
+          MH2, T14, MT2, MT2, MT2, MT2]*
+         (2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
+             (Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
+              Pair[e[1], e[2]]*(Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]])) + 
+            Pair[e[1], k[4]]*((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[
+                ec[4], ec[5]] + Pair[e[2], ec[4]]*(Pair[ec[5], k[2]] - 
+                2*Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
+           ((S - T24)*Pair[e[2], ec[5]] + Pair[e[2], k[4]]*
+             (2*Pair[ec[5], k[1]] + Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*
+             (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]]))) + 
+        8*(D0i[dd133, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
+            MT2]*Pair[e[2], k[5]]*((-S - S34 + T + T24)*Pair[e[1], ec[4]] + 
             4*(2*Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*Pair[
                 ec[4], k[1]] + Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - 
                 Pair[ec[4], k[5]])))*Pair[ec[5], k[2]] + 
@@ -4355,10 +3182,51 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
               Pair[ec[4], k[3]]))*Pair[ec[5], k[2]] - 2*Pair[e[1], ec[4]]*
            Pair[e[2], k[3]]*((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 
             2*(S + S34 - T - T24)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*
-             Pair[ec[5], k[4]])) - 4*D0i[dd13, 0, U, 0, 2*MH2 - S34 - T - U, 
-          MH2, T14, MT2, MT2, MT2, MT2]*(2*(S + T24)*Pair[e[1], k[4]]*
-           (Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
-          2*(S + T24)*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*
+             Pair[ec[5], k[4]])) + 2*D0i[dd13, 0, U, T14, MH2 - S - T24 - U, 
+          MH2, 0, MT2, MT2, MT2, MT2]*((S - T24)*(-MH2 + S + T24 + U)*
+           Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 4*(-MH2 + S + T24 + U)*
+           Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+          4*(-MH2 + S + T24 + U)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+           Pair[ec[4], k[1]] + 4*(MH2 - S - T24 - U)*Pair[e[2], ec[5]]*
+           (Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             Pair[ec[4], k[2]]) + 16*Pair[e[2], k[5]]*
+           (2*Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
+             Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - 
+              Pair[ec[4], k[5]]))*Pair[ec[5], k[2]] - 2*Pair[e[1], ec[4]]*
+           Pair[e[2], k[5]]*((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 
+            2*(S + S34 - T - T24)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*
+             Pair[ec[5], k[4]])) - 8*C0i[cc2, U, 0, T14, MT2, MT2, MT2]*
+         (Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
+              Pair[e[2], k[4]]) + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - 
+              Pair[ec[5], k[4]])) + Pair[e[1], k[4]]*
+           ((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
+            Pair[e[2], ec[4]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) - 
+          Pair[e[1], ec[4]]*(Pair[e[2], k[1]]*Pair[ec[5], k[1]] - 
+            Pair[e[2], k[4]]*Pair[ec[5], k[4]])) + 
+        2*C0i[cc1, U, T14, 0, MT2, MT2, MT2]*
+         (Pair[e[2], ec[5]]*((S - S34 + T - T24)*Pair[e[1], ec[4]] - 
+            4*(Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
+                ec[4], k[5]])) - 2*Pair[e[2], k[3]]*
+           (-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[
+                ec[4], k[1]]) + Pair[e[1], ec[4]]*(Pair[ec[5], k[1]] + 
+              Pair[ec[5], k[4]]))) - 2*C0i[cc2, U, T14, 0, MT2, MT2, MT2]*
+         (Pair[e[2], ec[5]]*((-S + S34 - T + T24)*Pair[e[1], ec[4]] + 
+            4*(Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
+                ec[4], k[5]])) - 2*Pair[e[2], k[5]]*
+           (-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[
+                ec[4], k[1]]) + Pair[e[1], ec[4]]*(Pair[ec[5], k[1]] + 
+              Pair[ec[5], k[4]]))) - 4*C0i[cc1, U, 0, T14, MT2, MT2, MT2]*
+         (2*Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*Pair[e[2], k[3]] + 
+            Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
+          2*Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + 
+            Pair[e[2], ec[4]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) - 
+          Pair[e[1], ec[4]]*(2*Pair[e[2], k[1]]*Pair[ec[5], k[1]] - 
+            2*Pair[e[2], k[4]]*Pair[ec[5], k[4]] - Pair[e[2], k[5]]*
+             (Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))) - 
+        4*D0i[dd13, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+          MT2]*(2*(S + T24)*Pair[e[1], k[4]]*(Pair[e[2], k[1]] - 
+            Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 2*(S + T24)*
+           Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*
            Pair[ec[4], k[1]] + 2*(S + T24)*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*
            Pair[ec[5], k[2]] + 2*(S + T24)*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
            Pair[ec[5], k[2]] - 8*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*
@@ -4429,221 +3297,1361 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
              (2*(T - T24)*Pair[ec[5], k[1]] - 5*(S34 - T)*Pair[ec[5], k[2]] + 
               2*(-S + S34)*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[1]]*
              ((-MH2 + S + U)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*Pair[
-                ec[5], k[4]]))) - 8*(D0i[dd00, 0, U, 0, 2*MH2 - S34 - T - U, 
-            MH2, T14, MT2, MT2, MT2, MT2]*
-           (2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-                Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*(
-                Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
-                Pair[e[1], e[2]]*(Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]])) + 
-              Pair[e[1], k[4]]*((Pair[e[2], k[1]] - Pair[e[2], k[4]])*
-                 Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*(Pair[ec[5], k[2]] - 
-                  2*Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
-             ((S - T24)*Pair[e[2], ec[5]] + Pair[e[2], k[4]]*(
-                2*Pair[ec[5], k[1]] + Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*(
-                Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]]))) + 
-          C0i[cc2, U, 0, T14, MT2, MT2, MT2]*(Pair[ec[4], k[1]]*
-             (Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
-              Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
-            Pair[e[1], k[4]]*((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[
-                ec[4], ec[5]] + Pair[e[2], ec[4]]*(Pair[ec[5], k[1]] - 
-                Pair[ec[5], k[4]])) - Pair[e[1], ec[4]]*
-             (Pair[e[2], k[1]]*Pair[ec[5], k[1]] - Pair[e[2], k[4]]*Pair[
-                ec[5], k[4]]))) + 2*(D0i[dd13, 0, U, T14, MH2 - S - T24 - U, 
-            MH2, 0, MT2, MT2, MT2, MT2]*((S - T24)*(-MH2 + S + T24 + U)*
-             Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 4*(-MH2 + S + T24 + U)*
-             Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
-            4*(-MH2 + S + T24 + U)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-             Pair[ec[4], k[1]] + 4*(MH2 - S - T24 - U)*Pair[e[2], ec[5]]*
-             (Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
-                ec[4], k[2]]) + 16*Pair[e[2], k[5]]*(2*Pair[e[1], k[2]]*Pair[
-                ec[4], k[1]] - Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - Pair[ec[4], k[5]]))*
-             Pair[ec[5], k[2]] - 2*Pair[e[1], ec[4]]*Pair[e[2], k[5]]*
-             ((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 2*(S + S34 - T - T24)*
-               Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*Pair[ec[5], k[4]])) + 
-          C0i[cc1, U, T14, 0, MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
-             ((S - S34 + T - T24)*Pair[e[1], ec[4]] - 4*(Pair[e[1], k[5]]*
-                 Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[5]])) - 
-            2*Pair[e[2], k[3]]*(-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + 
-                Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + Pair[e[1], ec[4]]*(
-                Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) - 
-        2*(D0i[dd1, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-           (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
-            Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], k[1]] + (S - T24)*Pair[
-                e[2], k[3]] + (-MH2 + U)*Pair[e[2], k[4]]) + 
-            2*(-MH2 + U)*Pair[e[1], e[2]]*Pair[ec[4], k[1]] + 
-            4*Pair[e[2], k[3]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
-          C0i[cc2, U, T14, 0, MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
-             ((-S + S34 - T + T24)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[5]]*
-                 Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[5]])) - 
-            2*Pair[e[2], k[5]]*(-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + 
-                Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + Pair[e[1], ec[4]]*(
-                Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) + 
-        (8*D0i[dd002, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-            MT2] - 8*D0i[dd002, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, 
-            MT2, MT2, MT2])*(4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[
-                ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + 
-            Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*Pair[e[2], k[3]] + 
-              Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
-             (Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*Pair[
-                ec[5], k[3]])) + Pair[e[1], ec[4]]*
-           ((-S34 + T)*Pair[e[2], ec[5]] - 2*((Pair[e[2], k[1]] + 
-                Pair[e[2], k[4]])*Pair[ec[5], k[3]] + Pair[e[2], k[3]]*(
-                Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) + 
-        C0i[cc0, U, 0, T14, MT2, MT2, MT2]*
-         (4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-               Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-                (Pair[ec[4], k[2]] + Pair[ec[4], k[5]]))) + 
-            Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
-              Pair[e[1], e[2]]*(3*Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]])) + 
-            Pair[e[1], k[4]]*(Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
-              Pair[e[2], ec[4]]*(3*Pair[ec[5], k[2]] - 2*Pair[ec[5], 
-                  k[3]]))) + Pair[e[1], ec[4]]*((2*S - S34 + T - 2*T24)*
-             Pair[e[2], ec[5]] - 2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*(
-                3*Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + 
-              Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) + 
-        C0i[cc0, U, T14, 0, MT2, MT2, MT2]*
-         (4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 2*
-                Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
-                (Pair[ec[4], k[2]] + 2*Pair[ec[4], k[5]]))) + 
-            Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
-                Pair[e[2], k[4]]) + Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - 
-                Pair[ec[5], k[3]])) + Pair[e[1], k[4]]*
-             ((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
-              Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]))) + 
-          Pair[e[1], ec[4]]*((3*S - 2*S34 + 2*T - 3*T24)*Pair[e[2], ec[5]] - 
-            2*(Pair[e[2], k[4]]*(-2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
-              Pair[e[2], k[1]]*(Pair[ec[5], k[2]] + 2*Pair[ec[5], k[4]])))) - 
-        D0i[dd2, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-         (4*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
-              (S - S34 - T + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], 
-                k[4]])*Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*
-             ((S34 + T)*Pair[e[1], k[2]]*Pair[ec[4], k[1]] + (-3*MH2 + S + 
-                T24 + 3*U)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-              Pair[e[1], k[4]]*((S34 + T)*Pair[ec[4], k[2]] + 
-                (-3*MH2 + S + T24 + 3*U)*Pair[ec[4], k[3]])) + 
-            Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(-((MH2 + S34 + T - U)*
-                Pair[ec[5], k[2]]) + (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) + 
-            Pair[e[1], k[4]]*(((-MH2 + U)*Pair[e[2], k[1]] + 
-                (S - S34 - T + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], 
-                  k[4]])*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*(
-                -((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + (MH2 - S - T24 - 
-                  U)*Pair[ec[5], k[3]])) + 2*(-(Pair[e[1], k[5]]*
-                Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]]) + 
-              Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] - Pair[e[2], k[5]])*Pair[
-                ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[
-                e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] + 
-              2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[3]]*Pair[
-                ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], 
-                k[3]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
-               Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[e[1], k[5]]*Pair[
-                e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-              Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], 
-                k[3]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
-               Pair[ec[5], k[3]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[
-                ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]]*(Pair[e[2], k[5]]*Pair[ec[5], k[3]] + Pair[e[2], k[3]]*
-                 (2*Pair[ec[5], k[2]] + Pair[ec[5], k[3]])))) + 
-          Pair[e[1], ec[4]]*((3*MH2*S34 - 2*S*S34 - 3*MH2*T + 2*T*T24 - 
-              3*S34*U + 3*T*U)*Pair[e[2], ec[5]] - 
-            2*(Pair[e[2], k[3]]*((-5*S34 + 3*T + 2*T24)*Pair[ec[5], k[1]] + 
-                5*(S34 - T)*Pair[ec[5], k[3]] + (2*S + 3*S34 - 5*T)*
-                 Pair[ec[5], k[4]]) + 2*Pair[e[2], k[4]]*((MH2 + T - U)*
-                 Pair[ec[5], k[1]] - (S + T)*Pair[ec[5], k[3]] - 
-                T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[1]]*(S34*Pair[ec[5], 
-                  k[1]] - (S34 + T24)*Pair[ec[5], k[3]] - (MH2 + S34 - U)*
-                 Pair[ec[5], k[4]])))) - D0i[dd0, 0, U, T14, 
-          MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-         (2*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
-              (S + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*
-             Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*((S34 + T)*Pair[e[1], 
-                k[2]]*Pair[ec[4], k[1]] + (-2*MH2 + S + T24 + 2*U)*Pair[e[1], 
-                k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*((S34 + T)*
-                 Pair[ec[4], k[2]] + (-2*MH2 + S + T24 + 2*U)*Pair[ec[4], 
-                  k[3]])) + Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
-             (-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + (MH2 - S - T24 - 
-                U)*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
-             (((-MH2 + U)*Pair[e[2], k[1]] + (S + T24)*Pair[e[2], k[3]] + 
-                (MH2 - U)*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
-              Pair[e[2], ec[4]]*(-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + 
-                (MH2 - S - T24 - U)*Pair[ec[5], k[3]])) + 
-            2*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*
-                Pair[ec[5], k[2]]) - Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
-                ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[
-                e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
-              Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], 
-                k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
-               Pair[ec[5], k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[
-                ec[4], k[2]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], 
-                k[1]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
-           ((MH2*S34 - S*S34 - MH2*T + T*T24 - S34*U + T*U)*
-             Pair[e[2], ec[5]] + 2*(Pair[e[2], k[4]]*((-MH2 + S + U)*
-                 Pair[ec[5], k[1]] + (S + T)*Pair[ec[5], k[2]] - 
-                S*Pair[ec[5], k[4]]) - Pair[e[2], k[3]]*(T24*Pair[ec[5], 
-                  k[1]] + (S34 - T)*Pair[ec[5], k[2]] + S*Pair[ec[5], 
-                  k[4]]) + Pair[e[2], k[1]]*(T24*Pair[ec[5], k[1]] + 
-                (S34 + T24)*Pair[ec[5], k[2]] + (MH2 - T24 - U)*Pair[ec[5], 
-                  k[4]])))) - 2*D0i[dd23, 0, U, T14, MH2 - S - T24 - U, MH2, 
-          0, MT2, MT2, MT2, MT2]*
-         (4*(Pair[e[1], k[4]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
-              (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
-            Pair[e[1], ec[5]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
-              (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
-            (2*MH2 - S - T24 - 2*U)*Pair[e[2], ec[5]]*
-             (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
-                ec[4], k[3]]) + 4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - 
-                Pair[ec[4], k[3]]) + (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-               Pair[ec[4], k[3]])*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] - 
-              Pair[e[2], k[5]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
-          Pair[e[1], ec[4]]*((S34 - T)*(S34 + T + T14 - U)*
-             Pair[e[2], ec[5]] - 2*(Pair[e[2], k[5]]*((S34 + T)*Pair[ec[5], 
-                  k[1]] - 2*(S34 - T)*Pair[ec[5], k[2]] - 2*S34*Pair[ec[5], 
-                  k[3]] + 2*T*Pair[ec[5], k[3]] + S34*Pair[ec[5], k[4]] + 
-                T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[3]]*((-MH2 + S + T24 + 
-                  U)*Pair[ec[5], k[1]] + 2*(S34 - T)*Pair[ec[5], k[2]] + 
-                (-MH2 + S + T24 + U)*Pair[ec[5], k[4]])))) + 
-        8*(D0i[dd003, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
-            MT2]*(4*(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
-                Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*(
-                Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
-                Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*(
-                (Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
-                Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + Pair[e[1], ec[4]]*
-             ((-S + T24)*Pair[e[2], ec[5]] - 2*(Pair[e[2], k[1]]*
-                 (2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + Pair[e[2], k[4]]*
-                 (Pair[ec[5], k[2]] - 2*Pair[ec[5], k[4]])))) + 
-          D0i[dd003, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
-            MT2]*(-4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
-                Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + Pair[ec[4], k[1]]*(
-                -(Pair[e[1], ec[5]]*Pair[e[2], k[5]]) + Pair[e[1], e[2]]*
-                 Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*(-(Pair[e[2], k[5]]*
-                  Pair[ec[4], ec[5]]) + Pair[e[2], ec[4]]*Pair[ec[5], 
-                  k[2]])) + Pair[e[1], ec[4]]*((S34 - T)*Pair[e[2], ec[5]] + 
-              2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] - 
-                Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], 
-                   k[4]]))))) - 4*(C0i[cc1, U, 0, T14, MT2, MT2, MT2]*
-           (2*Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*Pair[e[2], k[3]] + 
-              Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
-            2*Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + 
-              Pair[e[2], ec[4]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) - 
-            Pair[e[1], ec[4]]*(2*Pair[e[2], k[1]]*Pair[ec[5], k[1]] - 
-              2*Pair[e[2], k[4]]*Pair[ec[5], k[4]] - Pair[e[2], k[5]]*(
-                Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))) + 
-          D0i[dd00, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
-           (4*Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
-            4*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
-            4*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] - 
-              2*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(
-                Pair[ec[4], k[2]] - 2*Pair[ec[4], k[3]])) + 
-            8*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
-            8*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
-            Pair[e[1], ec[4]]*((S - 2*S34 + 2*T - T24)*Pair[e[2], ec[5]] - 
-              2*(2*(Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
-                Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], 
-                   k[4]]))))))) + Den[S, 0]*
-      ((-8*D0i[dd111, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
+                ec[5], k[4]]))) + (8*D0i[dd002, 0, U, 0, 2*MH2 - S34 - T - U, 
+            MH2, T14, MT2, MT2, MT2, MT2] - 8*D0i[dd002, 0, U, T14, 
+            MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2])*
+         (4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + Pair[ec[4], k[1]]*
+             (Pair[e[1], ec[5]]*Pair[e[2], k[3]] + Pair[e[1], e[2]]*Pair[
+                ec[5], k[3]]) + Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[
+                ec[4], ec[5]] + Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + 
+          Pair[e[1], ec[4]]*((-S34 + T)*Pair[e[2], ec[5]] - 
+            2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[3]] + 
+              Pair[e[2], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) - 
+        4*D0i[dd00, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+         (4*Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+          4*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
+          4*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] - 
+            2*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             (Pair[ec[4], k[2]] - 2*Pair[ec[4], k[3]])) + 
+          8*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+          8*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+          Pair[e[1], ec[4]]*((S - 2*S34 + 2*T - T24)*Pair[e[2], ec[5]] - 
+            2*(2*(Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+              Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) + 
+        C0i[cc0, U, 0, T14, MT2, MT2, MT2]*
+         (4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+               Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+                (Pair[ec[4], k[2]] + Pair[ec[4], k[5]]))) + 
+            Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+              Pair[e[1], e[2]]*(3*Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]])) + 
+            Pair[e[1], k[4]]*(Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+              Pair[e[2], ec[4]]*(3*Pair[ec[5], k[2]] - 2*Pair[ec[5], 
+                  k[3]]))) + Pair[e[1], ec[4]]*((2*S - S34 + T - 2*T24)*
+             Pair[e[2], ec[5]] - 2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*(
+                3*Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + 
+              Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) - 
+        C0i[cc0, U, T14, 0, MT2, MT2, MT2]*
+         (-4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 2*
+                Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+                (Pair[ec[4], k[2]] + 2*Pair[ec[4], k[5]]))) + 
+            Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
+                Pair[e[2], k[4]]) + Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - 
+                Pair[ec[5], k[3]])) + Pair[e[1], k[4]]*
+             ((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
+              Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]))) + 
+          Pair[e[1], ec[4]]*((-3*S + 2*S34 - 2*T + 3*T24)*Pair[e[2], ec[5]] + 
+            2*(Pair[e[2], k[4]]*(-2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
+              Pair[e[2], k[1]]*(Pair[ec[5], k[2]] + 2*Pair[ec[5], k[4]])))) - 
+        D0i[dd2, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+         (4*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+              (S - S34 - T + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], 
+                k[4]])*Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*
+             ((S34 + T)*Pair[e[1], k[2]]*Pair[ec[4], k[1]] + (-3*MH2 + S + 
+                T24 + 3*U)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*((S34 + T)*Pair[ec[4], k[2]] + 
+                (-3*MH2 + S + T24 + 3*U)*Pair[ec[4], k[3]])) + 
+            Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(-((MH2 + S34 + T - U)*
+                Pair[ec[5], k[2]]) + (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) + 
+            Pair[e[1], k[4]]*(((-MH2 + U)*Pair[e[2], k[1]] + 
+                (S - S34 - T + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], 
+                  k[4]])*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*(
+                -((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + (MH2 - S - T24 - 
+                  U)*Pair[ec[5], k[3]])) + 2*(-(Pair[e[1], k[5]]*
+                Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]]) + 
+              Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] - Pair[e[2], k[5]])*Pair[
+                ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[
+                e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] + 
+              2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[3]]*Pair[
+                ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], 
+                k[3]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+               Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[e[1], k[5]]*Pair[
+                e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+              Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], 
+                k[3]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
+               Pair[ec[5], k[3]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[
+                ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], 
+                k[1]]*(Pair[e[2], k[5]]*Pair[ec[5], k[3]] + Pair[e[2], k[3]]*
+                 (2*Pair[ec[5], k[2]] + Pair[ec[5], k[3]])))) + 
+          Pair[e[1], ec[4]]*((3*MH2*S34 - 2*S*S34 - 3*MH2*T + 2*T*T24 - 
+              3*S34*U + 3*T*U)*Pair[e[2], ec[5]] - 
+            2*(Pair[e[2], k[3]]*((-5*S34 + 3*T + 2*T24)*Pair[ec[5], k[1]] + 
+                5*(S34 - T)*Pair[ec[5], k[3]] + (2*S + 3*S34 - 5*T)*
+                 Pair[ec[5], k[4]]) + 2*Pair[e[2], k[4]]*((MH2 + T - U)*
+                 Pair[ec[5], k[1]] - (S + T)*Pair[ec[5], k[3]] - 
+                T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[1]]*(S34*Pair[ec[5], 
+                  k[1]] - (S34 + T24)*Pair[ec[5], k[3]] - (MH2 + S34 - U)*
+                 Pair[ec[5], k[4]])))) - D0i[dd0, 0, U, T14, 
+          MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+         (2*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+              (S + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*
+             Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*((S34 + T)*Pair[e[1], 
+                k[2]]*Pair[ec[4], k[1]] + (-2*MH2 + S + T24 + 2*U)*Pair[e[1], 
+                k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*((S34 + T)*
+                 Pair[ec[4], k[2]] + (-2*MH2 + S + T24 + 2*U)*Pair[ec[4], 
+                  k[3]])) + Pair[e[1], e[2]]*Pair[ec[4], k[1]]*
+             (-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + (MH2 - S - T24 - 
+                U)*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
+             (((-MH2 + U)*Pair[e[2], k[1]] + (S + T24)*Pair[e[2], k[3]] + 
+                (MH2 - U)*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
+              Pair[e[2], ec[4]]*(-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + 
+                (MH2 - S - T24 - U)*Pair[ec[5], k[3]])) + 
+            2*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*
+                Pair[ec[5], k[2]]) - Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
+                ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[
+                e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
+              Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], 
+                k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
+               Pair[ec[5], k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[
+                ec[4], k[2]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], 
+                k[1]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
+           ((MH2*S34 - S*S34 - MH2*T + T*T24 - S34*U + T*U)*
+             Pair[e[2], ec[5]] + 2*(Pair[e[2], k[4]]*((-MH2 + S + U)*
+                 Pair[ec[5], k[1]] + (S + T)*Pair[ec[5], k[2]] - 
+                S*Pair[ec[5], k[4]]) - Pair[e[2], k[3]]*(T24*Pair[ec[5], 
+                  k[1]] + (S34 - T)*Pair[ec[5], k[2]] + S*Pair[ec[5], 
+                  k[4]]) + Pair[e[2], k[1]]*(T24*Pair[ec[5], k[1]] + 
+                (S34 + T24)*Pair[ec[5], k[2]] + (MH2 - T24 - U)*Pair[ec[5], 
+                  k[4]])))) - 2*D0i[dd23, 0, U, T14, MH2 - S - T24 - U, MH2, 
+          0, MT2, MT2, MT2, MT2]*
+         (4*(Pair[e[1], k[4]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
+              (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
+            Pair[e[1], ec[5]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
+              (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
+            (2*MH2 - S - T24 - 2*U)*Pair[e[2], ec[5]]*
+             (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[
+                ec[4], k[3]]) + 4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - 
+                Pair[ec[4], k[3]]) + (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+               Pair[ec[4], k[3]])*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] - 
+              Pair[e[2], k[5]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
+          Pair[e[1], ec[4]]*((S34 - T)*(S34 + T + T14 - U)*
+             Pair[e[2], ec[5]] - 2*(Pair[e[2], k[5]]*((S34 + T)*Pair[ec[5], 
+                  k[1]] - 2*(S34 - T)*Pair[ec[5], k[2]] - 2*S34*Pair[ec[5], 
+                  k[3]] + 2*T*Pair[ec[5], k[3]] + S34*Pair[ec[5], k[4]] + 
+                T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[3]]*((-MH2 + S + T24 + 
+                  U)*Pair[ec[5], k[1]] + 2*(S34 - T)*Pair[ec[5], k[2]] + 
+                (-MH2 + S + T24 + U)*Pair[ec[5], k[4]])))) + 
+        8*(D0i[dd003, 0, U, 0, 2*MH2 - S34 - T - U, MH2, T14, MT2, MT2, MT2, 
+            MT2]*(4*(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+                Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*(
+                Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
+                Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*(
+                (Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
+                Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + Pair[e[1], ec[4]]*
+             ((-S + T24)*Pair[e[2], ec[5]] - 2*(Pair[e[2], k[1]]*
+                 (2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + Pair[e[2], k[4]]*
+                 (Pair[ec[5], k[2]] - 2*Pair[ec[5], k[4]])))) + 
+          D0i[dd003, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
+            MT2]*(-4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+                Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + Pair[ec[4], k[1]]*(
+                -(Pair[e[1], ec[5]]*Pair[e[2], k[5]]) + Pair[e[1], e[2]]*
+                 Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*(-(Pair[e[2], k[5]]*
+                  Pair[ec[4], ec[5]]) + Pair[e[2], ec[4]]*Pair[ec[5], 
+                  k[2]])) + Pair[e[1], ec[4]]*((S34 - T)*Pair[e[2], ec[5]] + 
+              2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] - 
+                Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], 
+                   k[4]]))))))) + Den[S, 0]*
+      (-8*D0i[dd002, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, 
+         S, MT2, MT2, MT2, MT2]*(((T + T14 - T24 - U)*Pair[e[1], e[2]] + 
+           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
+          (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
+            Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - 
+             Pair[ec[5], k[2]]))) + 
+       (-8*D0i[dd111, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
+           MT2, MT2] + 8*(D0i[dd111, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, 
+            MT2, MT2, MT2, MT2] + D0i[dd111, MH2, 2*MH2 - S34 - T - U, 0, 
+            MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]))*
+        ((-T + U)*Pair[e[1], e[2]] + 
+         4*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+            Pair[e[2], k[3]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] - 
+       8*D0i[dd112, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*(-(Pair[e[1], e[2]]*((-T - T14 + T24 + U)*
+             Pair[ec[4], k[3]] + (T - U)*Pair[ec[4], k[5]])) + 
+         4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]) - 
+           Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]] + 
+           Pair[e[1], k[2]]*(Pair[e[2], k[5]]*Pair[ec[4], k[3]] + 
+             Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*Pair[ec[5], k[3]] - 
+       2*D0i[dd12, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*((MH2 - S34 - T - U)*(T + T14 - T24 - U)*
+          Pair[e[1], e[2]]*Pair[ec[4], ec[5]] - 4*(MH2 - S34 - T - U)*
+          (Pair[e[1], k[5]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[5]])*Pair[ec[4], ec[5]] - 4*(-MH2 + S34 + T14 + T24)*
+          Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[3]] + 
+         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+          Pair[ec[5], k[3]] + 16*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
+           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+            (Pair[e[2], k[3]] - Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
+          Pair[ec[5], k[3]] - 2*Pair[e[1], e[2]]*((-MH2 + S34 + T14 + T24)*
+            Pair[ec[4], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[4], k[2]] + 
+           2*(2*T + T14 - T24 - 2*U)*Pair[ec[4], k[5]])*Pair[ec[5], k[3]]) + 
+       2*D0i[dd2, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*Pair[ec[4], k[5]]*
+        (2*(-MH2 + S34 + T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 
+         2*(-MH2 + S34 + T + U)*Pair[e[1], ec[5]]*Pair[e[2], k[1]] + 
+         4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+            Pair[e[2], k[5]])*Pair[ec[5], k[3]] + Pair[e[1], e[2]]*
+          ((-MH2 + S34 + T + U)*Pair[ec[5], k[1]] + (MH2 - S34 - T - U)*
+            Pair[ec[5], k[2]] + (T + T14 - T24 - U)*Pair[ec[5], k[3]])) - 
+       2*(C0i[cc1, S34, 0, S, MT2, MT2, MT2]*
+          (((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
+             4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+                Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
+            (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
+              Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - Pair[
+                ec[5], k[2]]))) + D0i[dd11, MH2, 2*MH2 - S34 - T - U, 0, 
+           MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
+          ((MH2 - S34 - T - U)*(T - U)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
+           4*(MH2 - S34 - T - U)*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
+             Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
+           4*(T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[3]] - 
+           4*(T + U)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[3]] + 
+           16*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[3]])*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*
+            Pair[ec[5], k[3]] + 2*Pair[e[1], e[2]]*
+            (2*(T + U)*Pair[ec[4], k[1]] + (T - 3*U)*Pair[ec[4], k[3]] + 
+             (-3*T + U)*Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) - 
+       4*D0i[dd33, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+         MT2]*(4*(S + T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) - 4*(S + T14 + T24)*
+          Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
+           Pair[ec[4], k[2]]) + 2*(T14 + T24)*Pair[e[1], k[2]]*
+          Pair[e[2], ec[4]]*Pair[ec[5], k[3]] - 2*(T14 + T24)*
+          Pair[e[1], ec[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[3]] - 
+         16*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
+          Pair[ec[5], k[3]] + Pair[e[1], e[2]]*(Pair[ec[4], k[2]]*
+            (2*(S + T14 + T24)*Pair[ec[5], k[1]] - 2*(S + T14 + T24)*
+              Pair[ec[5], k[2]] + (-5*T14 + 3*T24)*Pair[ec[5], k[3]]) + 
+           Pair[ec[4], k[1]]*(2*(S + T14 + T24)*Pair[ec[5], k[1]] - 
+             2*(S + T14 + T24)*Pair[ec[5], k[2]] + (-3*T14 + 5*T24)*
+              Pair[ec[5], k[3]]))) + 
+       (-8*D0i[dd001, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
+           MT2, MT2] + 8*(D0i[dd001, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, 
+            MT2, MT2, MT2, MT2] + D0i[dd001, MH2, 2*MH2 - S34 - T - U, 0, 
+            MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]))*
+        (4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - Pair[e[2], k[1]]*
+            (Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + Pair[e[1], ec[4]]*
+              Pair[ec[5], k[3]]) + Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
+              Pair[ec[5], k[3]])) + Pair[e[1], e[2]]*
+          ((-T + U)*Pair[ec[4], ec[5]] + 2*(Pair[ec[4], k[3]]*
+              (Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
+             (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], k[3]]))) + 
+       4*(C0i[cc2, 2*MH2 - S34 - T - U, 0, S, MT2, MT2, MT2]*
+          (2*(Pair[e[1], k[2]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
+              Pair[e[2], k[1]])*(Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
+           Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*
+            (Pair[ec[5], k[1]] + Pair[ec[5], k[2]])) + 
+         C0i[cc1, S34, S, 0, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
+            (2*Pair[ec[4], k[1]]*Pair[ec[5], k[1]] - 2*Pair[ec[4], k[2]]*
+              Pair[ec[5], k[2]] + Pair[ec[4], k[5]]*(-Pair[ec[5], k[1]] + 
+               Pair[ec[5], k[2]])) - 2*Pair[e[2], k[1]]*
+            (Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + Pair[e[1], ec[4]]*
+              (Pair[ec[5], k[1]] + Pair[ec[5], k[2]])) + 2*Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
+              (Pair[ec[5], k[1]] + Pair[ec[5], k[2]]))) + 
+         D0i[dd11, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+           MT2]*(2*(-3*MH2 + S34 + T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
+            Pair[ec[4], k[3]] - 2*(-3*MH2 + S34 + T + U)*Pair[e[1], ec[5]]*
+            Pair[e[2], k[1]]*Pair[ec[4], k[3]] + 2*(-MH2 + S34)*
+            Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[3]] + 
+           2*(MH2 - S34)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+            Pair[ec[5], k[3]] + 8*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
+             Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+              (Pair[e[2], k[3]] - Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*
+            Pair[ec[5], k[3]] + Pair[e[1], e[2]]*
+            (-((MH2 - S34)*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[
+                ec[5], k[3]]) + Pair[ec[4], k[3]]*((-3*MH2 + S34 + T + U)*
+                Pair[ec[5], k[1]] + (3*MH2 - S34 - T - U)*Pair[ec[5], k[2]] + 
+               2*(-T + T14 - T24 + U)*Pair[ec[5], k[3]])))) - 
+       8*D0i[dd223, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+         MT2]*((T14 - T24)*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + 
+           Pair[ec[4], k[2]]) + 4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
+           Pair[e[1], k[2]]*Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + 
+           Pair[ec[4], k[2]]))*Pair[ec[5], k[4]] + 
+       (-8*D0i[dd122, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
+           MT2, MT2] + 8*D0i[dd122, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, 
+           MT2, MT2, MT2, MT2])*((-T14 + T24)*Pair[e[1], e[2]] + 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+            Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 
+       2*D0i[dd2, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+         MT2]*(2*(MH2 - S34)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] + 
+         2*(-MH2 + S34)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+            Pair[e[2], k[4]])*Pair[ec[4], k[3]] - Pair[e[1], e[2]]*
+          ((-MH2 + S34)*Pair[ec[4], k[1]] + (MH2 - S34)*Pair[ec[4], k[2]] + 
+           (T14 - T24)*Pair[ec[4], k[3]]))*Pair[ec[5], k[4]] + 
+       8*D0i[dd223, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+         MT2]*((-T14 + T24)*Pair[e[1], e[2]] + 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+            Pair[e[2], k[4]]))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
+       8*D0i[dd223, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
+         4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+            Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - 
+       8*D0i[dd333, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+         MT2]*((-T + U)*Pair[e[1], e[2]] - 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - Pair[e[1], k[5]]*
+            Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]] + 
+             Pair[e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
+       8*D0i[dd233, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*((-2*T - T14 + T24 + 2*U)*Pair[e[1], e[2]] - 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 2*Pair[e[1], k[5]]*
+            Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]] + 
+             2*Pair[e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
+       4*D0i[dd23, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+         MT2]*(-2*(T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) + 2*(T14 + T24)*
+          Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
+           Pair[ec[4], k[2]]) + Pair[e[1], e[2]]*
+          (Pair[ec[4], k[1]]*(-2*(T14 - T24)*Pair[ec[5], k[1]] + 
+             4*T24*Pair[ec[5], k[2]] + (3*T14 - 5*T24)*Pair[ec[5], k[3]]) + 
+           Pair[ec[4], k[2]]*(-4*T14*Pair[ec[5], k[1]] - 2*(T14 - T24)*
+              Pair[ec[5], k[2]] + (5*T14 - 3*T24)*Pair[ec[5], k[3]])) + 
+         8*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
+          (Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - 2*Pair[ec[5], k[4]]) + 
+         2*(T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[4]] - 
+         2*(T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+          Pair[ec[5], k[4]]) + 
+       (8*D0i[dd002, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+           MT2] - 8*D0i[dd002, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, 
+           MT2, MT2, MT2])*(((-T14 + T24)*Pair[e[1], e[2]] + 
+           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] + 
+         2*(2*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 2*Pair[e[1], ec[4]]*
+            Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+             Pair[ec[4], k[2]]))*Pair[ec[5], k[4]]) + 
+       D0i[dd2, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, MT2]*
+        ((-((MH2 - S34)*(T14 - T24)*Pair[e[1], e[2]]) - 4*(MH2 - S34)*
+            (Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] + 
+         2*((-T14 + T24)*Pair[e[1], e[2]] + 
+           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
+       8*(D0i[dd333, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+           MT2]*((T14 - T24)*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + 
+             Pair[ec[4], k[2]]) + 4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
+             Pair[e[1], k[2]]*Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + 
+             Pair[ec[4], k[2]]))*Pair[ec[5], k[3]] + 
+         D0i[dd333, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+           MT2, MT2, MT2, MT2]*((-T + U)*Pair[e[1], e[2]] - 
+           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - Pair[e[1], k[5]]*
+              Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]] + Pair[
+                e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]]) - 
+       8*(D0i[dd233, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+           MT2]*(-((T14 - T24)*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + 
+              Pair[ec[4], k[2]])*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]])) - 
+           4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[4]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
+            (Pair[ec[5], k[3]] - Pair[ec[5], k[4]])) + 
+         D0i[dd233, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+           MT2]*((-T + T14 - T24 + U)*Pair[e[1], e[2]] - 
+           4*(-2*Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[5]]*
+              Pair[e[2], k[1]] + Pair[e[1], k[2]]*(2*Pair[e[2], k[4]] + Pair[
+                e[2], k[5]])))*Pair[ec[4], k[5]]*Pair[ec[5], k[4]]) - 
+       2*D0i[dd23, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*(-((MH2 - S34 - T14 - T24)*(T + T14 - T24 - U)*
+           Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 4*(MH2 - S34 - T14 - T24)*
+          (Pair[e[1], k[5]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 4*(-MH2 + S34 + T14 + T24)*
+          Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[4]] - 
+         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+          Pair[ec[5], k[4]] + 16*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 
+           2*Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+            (Pair[e[2], k[4]] + 2*Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
+          Pair[ec[5], k[4]] + 2*Pair[e[1], e[2]]*((-MH2 + S34 + T14 + T24)*
+            Pair[ec[4], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[4], k[2]] + 
+           2*(2*T + T14 - T24 - 2*U)*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) - 
+       2*D0i[dd33, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*((MH2 - S - T - U)*(T - U)*Pair[e[1], e[2]]*
+          Pair[ec[4], ec[5]] - 4*(MH2 - S34 - T14 - T24)*
+          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 8*(-MH2 + S34 + T14 + T24)*
+          Pair[e[1], k[2]]*Pair[e[2], ec[4]]*Pair[ec[5], k[4]] - 
+         8*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+          Pair[ec[5], k[4]] + 32*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 
+           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+            (Pair[e[2], k[4]] + Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
+          Pair[ec[5], k[4]] + 4*Pair[e[1], e[2]]*((-MH2 + S34 + T14 + T24)*
+            Pair[ec[4], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[4], k[2]] + 
+           2*(T - U)*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) - 
+       8*D0i[dd00, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+         MT2]*((-T14 + T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+            Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 2*Pair[e[1], k[2]]*
+          Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) - 
+         2*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
+           Pair[ec[4], k[2]]) - Pair[e[1], e[2]]*
+          (-(Pair[ec[4], k[2]]*(2*Pair[ec[5], k[1]] + Pair[ec[5], k[3]])) + 
+           Pair[ec[4], k[1]]*(2*Pair[ec[5], k[2]] + Pair[ec[5], k[3]])) - 
+         2*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*(2*Pair[ec[5], k[3]] + 
+           Pair[ec[5], k[4]]) + 2*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+          (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+       2*D0i[dd33, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+         MT2]*((MH2 - S - T - U)*(T - U)*Pair[e[1], e[2]]*
+          Pair[ec[4], ec[5]] - 4*(MH2 - S34 - T14 - T24)*
+          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 8*(-MH2 + S34 + T14 + T24)*
+          Pair[e[1], k[2]]*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 
+         8*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+          Pair[ec[4], k[5]] + 32*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) - 
+           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+            (Pair[e[2], k[4]] + Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
+          Pair[ec[5], k[4]] + 4*Pair[e[1], e[2]]*Pair[ec[4], k[5]]*
+          ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[1]] + 
+           (MH2 - S34 - T14 - T24)*Pair[ec[5], k[2]] + 
+           2*(T - U)*Pair[ec[5], k[4]])) + 2*D0i[dd12, MH2, S34, 0, 
+         MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
+        ((MH2 - S34)*(T14 - T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
+         4*(MH2 - S34)*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
+           Pair[e[1], k[2]]*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] - 
+         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
+          Pair[ec[4], k[3]] + 4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[5]]*
+          Pair[e[2], k[1]]*Pair[ec[4], k[3]] + 
+         16*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[4]]*
+            Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
+             Pair[e[2], k[4]]))*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 
+         2*Pair[e[1], e[2]]*Pair[ec[4], k[3]]*((-MH2 + S34 + T14 + T24)*
+            Pair[ec[5], k[1]] + (MH2 - S34 - T14 - T24)*Pair[ec[5], k[2]] + 
+           2*(T - T14 + T24 - U)*Pair[ec[5], k[4]])) + 
+       2*D0i[dd23, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+         MT2]*((MH2 - S34 - T14 - T24)*(T14 - T24)*Pair[e[1], e[2]]*
+          Pair[ec[4], ec[5]] + 4*(MH2 - S34 - T14 - T24)*
+          (Pair[e[1], k[4]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 4*(-MH2 + S34 + T14 + T24)*
+          Pair[e[1], k[2]]*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 
+         4*(-MH2 + S34 + T14 + T24)*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+          Pair[ec[4], k[5]] + 16*(-2*Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
+           Pair[e[1], k[5]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+            (2*Pair[e[2], k[4]] + Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*
+          Pair[ec[5], k[4]] + 2*Pair[e[1], e[2]]*Pair[ec[4], k[5]]*
+          ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[1]] + 
+           (MH2 - S34 - T14 - T24)*Pair[ec[5], k[2]] + 2*(T - T14 + T24 - U)*
+            Pair[ec[5], k[4]])) + 2*D0i[dd11, MH2, S34, 0, 
+         MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
+        (-((MH2 - S34)*(T - U)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
+         4*(MH2 - S34)*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
+           Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
+         4*(T + U)*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 
+         4*(T + U)*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]] - 
+         16*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+            Pair[e[2], k[3]])*Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] + 
+           Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + 2*Pair[e[1], e[2]]*
+          Pair[ec[4], k[3]]*(2*(T + U)*Pair[ec[5], k[1]] + 
+           (T - 3*U)*Pair[ec[5], k[3]] + (-3*T + U)*Pair[ec[5], k[4]])) - 
+       8*D0i[dd113, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*(-4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
+           Pair[e[1], k[2]]*Pair[e[2], k[3]])*(Pair[ec[4], k[3]]*
+            (Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + 
+           Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) - (T - U)*Pair[e[1], e[2]]*
+          (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
+            (-Pair[ec[5], k[3]] + Pair[ec[5], k[4]]))) - 
+       4*D0i[dd12, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+         MT2]*(-2*(Pair[ec[4], k[3]]*(-((T14 + T24)*Pair[e[1], k[2]]*Pair[
+                e[2], ec[5]]) + (T14 + T24)*Pair[e[1], ec[5]]*
+              Pair[e[2], k[1]] + 4*(Pair[e[1], k[4]]*Pair[e[2], k[1]] - 
+               Pair[e[1], k[2]]*Pair[e[2], k[4]])*(Pair[ec[5], k[3]] - Pair[
+                ec[5], k[4]])) + (MH2 - S34)*(Pair[e[1], k[2]]*
+              Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*Pair[e[2], k[1]])*
+            Pair[ec[5], k[4]]) + Pair[e[1], e[2]]*
+          (-((MH2 - S34)*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*
+             Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
+            (2*(T14 + T24)*Pair[ec[5], k[1]] + (-3*T14 + T24)*
+              Pair[ec[5], k[3]] + (T14 - 3*T24)*Pair[ec[5], k[4]]))) + 
+       4*D0i[dd13, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+         MT2]*(2*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
+          ((-7*MH2 + 3*(S34 + T + U))*Pair[ec[4], k[3]] + 
+           (-3*MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 2*Pair[e[1], ec[5]]*
+          Pair[e[2], k[1]]*((-7*MH2 + 3*(S34 + T + U))*Pair[ec[4], k[3]] + 
+           (-3*MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 
+         2*(MH2 - S34 + T14 + T24)*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*
+          Pair[ec[5], k[3]] + 2*(MH2 - S34 + T14 + T24)*Pair[e[1], ec[4]]*
+          Pair[e[2], k[1]]*Pair[ec[5], k[3]] + 
+         8*(-2*Pair[e[1], k[3]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + 
+             Pair[ec[4], k[5]]) - Pair[e[1], k[5]]*Pair[e[2], k[1]]*
+            (3*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + Pair[e[1], k[2]]*
+            (2*Pair[e[2], k[3]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
+             Pair[e[2], k[5]]*(3*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])))*
+          Pair[ec[5], k[3]] - Pair[e[1], e[2]]*(2*(MH2 - S34 + T14 + T24)*
+            Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + Pair[ec[4], k[5]]*
+            (2*(MH2 + S + T14 + T24)*Pair[ec[5], k[1]] + 
+             (2*MH2 - 3*S - S34 - 6*T14 - 2*T24 - 4*U)*Pair[ec[5], k[3]] - 
+             (MH2 + S + T14 + T24)*Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
+            (2*(MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[1]] + 
+             (2*MH2 - 5*S - S34 - 12*T14 - 4*U)*Pair[ec[5], k[3]] - 
+             (MH2 + 3*(S + T14 + T24))*Pair[ec[5], k[4]]))) + 
+       (8*D0i[dd112, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+           MT2] - 8*D0i[dd112, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, 
+           MT2, MT2, MT2])*Pair[ec[4], k[3]]*
+        (Pair[e[1], e[2]]*((-T14 + T24)*Pair[ec[5], k[3]] + 
+           (-T + U)*Pair[ec[5], k[4]]) + 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[3]]) - 
+           Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[5], k[4]] + 
+           Pair[e[1], k[2]]*(Pair[e[2], k[4]]*Pair[ec[5], k[3]] + 
+             Pair[e[2], k[3]]*Pair[ec[5], k[4]]))) - 
+       4*D0i[dd00, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*(-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
+             Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+              (Pair[e[2], k[3]] - Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] + 
+           Pair[e[2], k[1]]*(2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 
+             Pair[e[1], ec[4]]*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
+            (-2*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] + Pair[e[2], ec[4]]*
+              Pair[ec[5], k[4]])) + Pair[e[1], e[2]]*
+          ((T - T14 + T24 - U)*Pair[ec[4], ec[5]] - 
+           2*(-2*Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
+             (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], k[4]]))) - 
+       8*D0i[dd003, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*(-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
+             Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
+           Pair[e[2], k[1]]*(Pair[e[1], ec[5]]*Pair[ec[4], k[5]] + 
+             Pair[e[1], ec[4]]*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*Pair[ec[4], k[5]] + Pair[e[2], ec[4]]*
+              Pair[ec[5], k[4]])) + Pair[e[1], e[2]]*
+          ((T - U)*Pair[ec[4], ec[5]] + 2*(Pair[ec[4], k[5]]*(Pair[ec[5], 
+                k[1]] - Pair[ec[5], k[2]]) + (Pair[ec[4], k[1]] - Pair[ec[4], 
+                k[2]])*Pair[ec[5], k[4]]))) + 
+       C0i[cc0, S34, S, 0, MT2, MT2, MT2]*
+        (-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) - 2*Pair[e[1], k[5]]*
+              Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[3]] + 2*
+                Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+            Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) - 
+           Pair[e[1], ec[4]]*Pair[e[2], k[1]]*Pair[ec[5], k[4]] + 
+           Pair[e[1], k[2]]*(-(Pair[e[2], ec[5]]*(2*Pair[ec[4], k[3]] + 
+                Pair[ec[4], k[5]])) + Pair[e[2], ec[4]]*Pair[ec[5], k[4]])) + 
+         Pair[e[1], e[2]]*((-T - 2*T14 + 2*T24 + U)*Pair[ec[4], ec[5]] - 
+           2*(-2*Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
+             Pair[ec[4], k[5]]*(-Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
+             (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], k[4]]))) - 
+       8*D0i[dd133, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+         MT2]*((T - U)*Pair[e[1], e[2]]*(Pair[ec[4], k[5]]*
+            (Pair[ec[5], k[3]] - Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
+            Pair[ec[5], k[4]]) + 4*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*
+            Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
+            Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+           Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[3]]*
+            Pair[ec[5], k[4]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
+            Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - Pair[e[1], k[3]]*
+            Pair[e[2], k[1]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
+           Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
+            Pair[ec[5], k[4]] - Pair[e[1], k[4]]*Pair[e[2], k[1]]*
+            (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
+              Pair[ec[5], k[4]]) - Pair[e[1], k[5]]*Pair[e[2], k[1]]*
+            (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
+              Pair[ec[5], k[4]]))) + 8*D0i[dd123, MH2, 2*MH2 - S34 - T - U, 
+         0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
+        (-(Pair[e[1], e[2]]*((-T - T14 + T24 + U)*Pair[ec[4], k[3]]*
+             Pair[ec[5], k[4]] + Pair[ec[4], k[5]]*((-2*T - T14 + T24 + 2*U)*
+               Pair[ec[5], k[3]] + (T - U)*Pair[ec[5], k[4]]))) + 
+         4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
+             Pair[ec[5], k[3]]) + Pair[e[1], k[2]]*Pair[e[2], k[4]]*
+            Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 2*Pair[e[1], k[2]]*
+            Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+           Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+            Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
+            Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + Pair[e[1], k[2]]*
+            Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - 
+           Pair[e[1], k[5]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[5]]*
+              Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) - 
+       D0i[dd3, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
+        ((MH2 - S34 - T14 - T24)*(3*T + 2*T14 - 2*T24 - 3*U)*Pair[e[1], e[2]]*
+          Pair[ec[4], ec[5]] + 4*(MH2 - S34 - T14 - T24)*
+          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - 2*Pair[e[1], k[5]]*
+            Pair[e[2], k[1]] - Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
+             2*Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 4*Pair[e[1], k[2]]*
+          Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+           (-MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 4*Pair[e[1], ec[5]]*
+          Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+           (-MH2 + S34 + T + U)*Pair[ec[4], k[5]]) - 4*Pair[e[1], k[2]]*
+          Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+           (-3*MH2 + 3*S34 + 2*(T14 + T24))*Pair[ec[5], k[4]]) + 
+         4*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*
+            Pair[ec[5], k[3]] + (-3*MH2 + 3*S34 + 2*(T14 + T24))*
+            Pair[ec[5], k[4]]) - 2*Pair[e[1], e[2]]*
+          (2*Pair[ec[4], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[2]] + 
+             (-MH2 + S34 + T14)*Pair[ec[5], k[4]]) + 2*Pair[ec[4], k[2]]*
+            ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (MH2 - S34 - T24)*
+              Pair[ec[5], k[4]]) + Pair[ec[4], k[5]]*
+            (-2*(T - T24)*Pair[ec[5], k[1]] - 2*(T14 - U)*Pair[ec[5], k[2]] + 
+             5*(T - U)*Pair[ec[5], k[4]])) + 
+         8*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
+             (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]])) - Pair[e[2], k[1]]*
+            (Pair[e[1], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 
+             2*Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
+           Pair[e[1], k[2]]*(Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
+              (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]]) + 
+             (Pair[e[2], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 2*
+                Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]))) + 
+       D0i[dd3, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*((MH2 - S34 - T14 - T24)*(T - 2*T14 + 2*T24 - U)*
+          Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 4*(MH2 - S34 - T14 - T24)*
+          (Pair[e[1], k[3]]*Pair[e[2], k[1]] - 2*Pair[e[1], k[4]]*
+            Pair[e[2], k[1]] - Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
+             2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 4*Pair[e[1], k[2]]*
+          Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+           (-3*MH2 + S + 2*S34 + 3*T14 + 3*T24)*Pair[ec[4], k[5]]) + 
+         4*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*
+            Pair[ec[4], k[3]] + (-3*MH2 + S + 2*S34 + 3*T14 + 3*T24)*
+            Pair[ec[4], k[5]]) + 4*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*
+          ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+           (MH2 - S34)*Pair[ec[5], k[4]]) - 4*Pair[e[1], ec[4]]*
+          Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+           (MH2 - S34)*Pair[ec[5], k[4]]) + 2*Pair[e[1], e[2]]*
+          (2*Pair[ec[4], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[2]] + 
+             (MH2 - S34 - T14)*Pair[ec[5], k[4]]) + 2*Pair[ec[4], k[2]]*
+            ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (-MH2 + S34 + T24)*
+              Pair[ec[5], k[4]]) + Pair[ec[4], k[5]]*
+            (2*(T - T24)*Pair[ec[5], k[1]] + 2*(T14 - U)*Pair[ec[5], k[2]] + 
+             5*(-T + U)*Pair[ec[5], k[4]])) + 
+         8*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
+             (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]])) - Pair[e[2], k[1]]*
+            (Pair[e[1], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 
+             2*Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
+           Pair[e[1], k[2]]*(Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
+              (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]]) + 
+             (Pair[e[2], k[4]]*(Pair[ec[4], k[3]] - 2*Pair[ec[4], k[5]]) + 2*
+                Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]))) + 
+       C0i[cc0, 2*MH2 - S34 - T - U, 0, S, MT2, MT2, MT2]*
+        (-4*((-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+            Pair[e[2], k[1]]*(Pair[ec[4], k[3]] + 2*Pair[ec[4], k[5]]) - 
+           Pair[e[1], k[2]]*(Pair[e[2], ec[5]]*(Pair[ec[4], k[3]] + 2*
+                Pair[ec[4], k[5]]) + Pair[e[2], ec[4]]*(Pair[ec[5], k[3]] - 
+               Pair[ec[5], k[4]])) + Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+            (Pair[ec[5], k[3]] - Pair[ec[5], k[4]])) + Pair[e[1], e[2]]*
+          ((-T - T14 + T24 + U)*Pair[ec[4], ec[5]] + 
+           2*(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
+             2*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]]) + 
+             2*Pair[ec[4], k[2]]*(-Pair[ec[5], k[2]] + Pair[ec[5], 
+                k[4]])))) + 8*(D0i[dd113, MH2, S34, S, 2*MH2 - S34 - T - U, 
+           0, 0, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
+            ((-2*T + T14 - T24 + 2*U)*Pair[ec[4], k[3]] + 
+             (-T + U)*Pair[ec[4], k[5]]) + 
+           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]) - 
+             Pair[e[1], k[3]]*Pair[e[2], k[1]]*(3*Pair[ec[4], k[3]] + Pair[
+                ec[4], k[5]]) + Pair[e[1], k[2]]*(Pair[e[2], k[5]]*
+                Pair[ec[4], k[3]] + Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 
+                 Pair[ec[4], k[5]]))))*Pair[ec[5], k[3]] + 
+         D0i[dd113, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+           MT2]*(-4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[3]])*(Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] + Pair[
+                ec[5], k[2]] - 2*Pair[ec[5], k[3]]) + Pair[ec[4], k[5]]*
+              Pair[ec[5], k[3]]) - (T - U)*Pair[e[1], e[2]]*
+            (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
+              (-Pair[ec[5], k[3]] + Pair[ec[5], k[4]])))) + 
+       C0i[cc0, S34, 0, S, MT2, MT2, MT2]*
+        (Pair[e[1], e[2]]*((-T14 + T24)*Pair[ec[4], ec[5]] - 
+           2*(-2*Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
+             Pair[ec[4], k[1]]*(2*Pair[ec[5], k[1]] + Pair[ec[5], k[4]]) - 
+             Pair[ec[4], k[2]]*(2*Pair[ec[5], k[2]] + Pair[ec[5], k[4]]))) + 
+         4*((-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+            Pair[e[2], k[1]]*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]]) + 
+           Pair[e[1], ec[4]]*Pair[e[2], k[1]]*(Pair[ec[5], k[3]] + 
+             2*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]]) + 
+             Pair[e[2], ec[4]]*(Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])))) + 
+       2*D0i[dd13, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+         MT2]*(-4*((2*MH2 - 2*S34 - T14 - T24)*(Pair[e[1], k[3]]*
+              Pair[e[2], k[1]] - Pair[e[1], k[2]]*Pair[e[2], k[3]])*
+            Pair[ec[4], ec[5]] + Pair[e[1], k[2]]*Pair[e[2], ec[5]]*
+            (2*(-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+             (T + U)*Pair[ec[4], k[5]]) - Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+            (2*(-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+             (T + U)*Pair[ec[4], k[5]]) + 
+           4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[3]])*(-(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] + 
+                Pair[ec[5], k[2]] - 2*Pair[ec[5], k[3]])) + 
+             2*Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - 
+               Pair[ec[5], k[3]]))) + Pair[e[1], e[2]]*
+          (-((T - U)*(S - S34 + T + U)*Pair[ec[4], ec[5]]) - 
+           2*(Pair[ec[4], k[5]]*((T + U)*Pair[ec[5], k[1]] - (T + U)*
+                Pair[ec[5], k[2]] + 2*(T - U)*(Pair[ec[5], k[3]] - 
+                 Pair[ec[5], k[4]])) - 2*Pair[ec[4], k[3]]*
+              ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (-MH2 + S34 + 
+                 T14 + T24)*Pair[ec[5], k[2]] + 2*(-T + U)*Pair[ec[5], 
+                 k[4]])))) + D0i[dd1, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, 
+         S, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
+          ((-3*MH2*T + 3*S34*T + 2*T*T24 + 3*MH2*U - 3*S34*U - 2*T14*U)*
+            Pair[ec[4], ec[5]] - 2*(-2*Pair[ec[4], k[2]]*((MH2 - S34 + T)*
+                Pair[ec[5], k[1]] + T*Pair[ec[5], k[2]] - (T + T14)*
+                Pair[ec[5], k[3]]) + Pair[ec[4], k[3]]*((3*T + 2*T24 - 5*U)*
+                Pair[ec[5], k[1]] + (5*T - 2*T14 - 3*U)*Pair[ec[5], k[2]] + 5*
+                (-T + U)*Pair[ec[5], k[3]]) + 2*Pair[ec[4], k[1]]*
+              (U*Pair[ec[5], k[1]] + (MH2 - S34 + U)*Pair[ec[5], k[2]] - 
+               (T24 + U)*Pair[ec[5], k[3]]))) + 
+         4*(-(((3*MH2 - 3*S34 - T14 - T24)*Pair[e[1], k[3]]*Pair[e[2], 
+                k[1]] + (T + U)*Pair[e[1], k[4]]*Pair[e[2], k[1]] + 
+              Pair[e[1], k[2]]*((-3*MH2 + 3*S34 + T14 + T24)*Pair[e[2], 
+                  k[3]] - (T + U)*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]]) + 
+           Pair[e[1], ec[5]]*Pair[e[2], k[1]]*((-MH2 + S34)*Pair[ec[4], k[
+                1]] + (-MH2 + S34)*Pair[ec[4], k[2]] + (-T + T14 + T24 - U)*
+              Pair[ec[4], k[3]]) - Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+            ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] - (MH2 - S34 + T + U)*
+              Pair[ec[5], k[4]]) + 2*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*
+              Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[5]]*
+              Pair[ec[5], k[3]] - Pair[e[1], k[4]]*Pair[e[2], k[1]]*
+              (Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*
+                (Pair[ec[5], k[3]] - 2*Pair[ec[5], k[4]])) - 
+             2*Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[4]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 2*Pair[e[1], k[2]]*
+              Pair[e[2], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - 
+             Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[4]] + Pair[e[1], k[3]]*Pair[e[2], k[1]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
+             Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]*
+              (-Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + Pair[e[1], k[2]]*
+            (-(Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
+                (-MH2 + S34)*Pair[ec[4], k[2]] + (-T + T14 + T24 - U)*
+                 Pair[ec[4], k[3]])) + Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + 
+                 T24)*Pair[ec[5], k[3]] - (MH2 - S34 + T + U)*Pair[ec[5], 
+                 k[4]])))) + 8*(D0i[dd003, MH2, S34, S, 2*MH2 - S34 - T - U, 
+           0, 0, MT2, MT2, MT2, MT2]*((T14 - T24)*Pair[e[1], e[2]]*
+            Pair[ec[4], ec[5]] - 4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + 
+             Pair[e[1], k[2]]*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
+           4*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
+             Pair[ec[4], k[2]]) - 4*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+            (Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) + 4*Pair[e[1], k[2]]*
+            Pair[e[2], ec[4]]*Pair[ec[5], k[3]] - 4*Pair[e[1], ec[4]]*
+            Pair[e[2], k[1]]*Pair[ec[5], k[3]] + 2*Pair[e[1], e[2]]*
+            (Pair[ec[4], k[1]]*(2*Pair[ec[5], k[1]] - Pair[ec[5], k[4]]) + 
+             Pair[ec[4], k[2]]*(-2*Pair[ec[5], k[2]] + Pair[ec[5], k[4]]))) + 
+         D0i[dd003, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+           MT2]*(-4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+                Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + Pair[e[2], k[1]]*
+              (Pair[e[1], ec[5]]*Pair[ec[4], k[5]] + Pair[e[1], ec[4]]*
+                Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*(Pair[e[2], ec[5]]*
+                Pair[ec[4], k[5]] + Pair[e[2], ec[4]]*Pair[ec[5], k[4]])) + 
+           Pair[e[1], e[2]]*((T - U)*Pair[ec[4], ec[5]] + 
+             2*(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[2]]) + 
+               (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], 
+                 k[4]])))) - 4*(C0i[cc2, S34, S, 0, MT2, MT2, MT2]*
+          Pair[ec[4], k[5]]*(2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 
+           2*Pair[e[1], ec[5]]*Pair[e[2], k[1]] + Pair[e[1], e[2]]*
+            (Pair[ec[5], k[1]] - Pair[ec[5], k[2]])) + 
+         C0i[cc2, S34, 0, S, MT2, MT2, MT2]*
+          (2*(Pair[e[1], k[2]]*Pair[e[2], ec[5]] - Pair[e[1], ec[5]]*
+              Pair[e[2], k[1]])*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) + 
+           Pair[e[1], e[2]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
+            (Pair[ec[5], k[1]] - Pair[ec[5], k[2]])) + 
+         D0i[dd00, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, 
+           MT2]*(4*((-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[5]]*
+                Pair[e[2], k[1]] + Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 
+                 Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + Pair[e[2], k[1]]*
+              (-(Pair[e[1], ec[5]]*Pair[ec[4], k[5]]) + 2*Pair[e[1], ec[4]]*
+                Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*(Pair[e[2], ec[5]]*
+                Pair[ec[4], k[5]] - 2*Pair[e[2], ec[4]]*Pair[ec[5], k[4]])) + 
+           Pair[e[1], e[2]]*((-2*T - T14 + T24 + 2*U)*Pair[ec[4], ec[5]] - 
+             2*(Pair[ec[4], k[5]]*(-Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
+               2*(Pair[ec[4], k[1]] - Pair[ec[4], k[2]])*Pair[ec[5], 
+                 k[4]])))) + D0i[dd0, MH2, 2*MH2 - S34 - T - U, 0, 
+         MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
+        (Pair[e[1], e[2]]*((-(T*T14) + T24*U)*Pair[ec[4], ec[5]] + 
+           2*(-(Pair[ec[4], k[5]]*((MH2 - S34 - 2*(T + U))*Pair[ec[5], 
+                  k[1]] + (-MH2 + S34 + T24 + 2*U)*Pair[ec[5], k[3]] + 
+                T*Pair[ec[5], k[4]])) + Pair[ec[4], k[1]]*
+              ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + (MH2 - S34 - T - 
+                 U)*Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
+              ((MH2 - S34 - T14 - T24)*Pair[ec[5], k[1]] + (-MH2 + S34 + 
+                 T24 + U)*Pair[ec[5], k[4]]))) + 
+         2*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], k[1]]) - 
+             (T + U)*Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+              ((T14 + T24)*Pair[e[2], k[3]] + (T + U)*Pair[e[2], k[4]]))*
+            Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+            ((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+             (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]]) - Pair[e[1], ec[4]]*
+            Pair[e[2], k[1]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+             (MH2 - S34 - T - U)*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
+            (-(Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], 
+                  k[3]] + (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]])) + 
+             Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+               (MH2 - S34 - T - U)*Pair[ec[5], k[4]])) + 
+           2*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*Pair[
+                ec[5], k[3]]) + Pair[e[1], k[2]]*Pair[e[2], k[4]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 2*Pair[e[1], k[2]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] - 
+             Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + Pair[e[1], k[2]]*
+              Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + 
+             Pair[e[1], k[5]]*Pair[e[2], k[1]]*(-2*Pair[ec[4], k[5]]*
+                Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) + 
+       8*(D0i[dd133, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+           MT2]*(Pair[e[1], e[2]]*((-T + 2*T14 - 2*T24 + U)*Pair[ec[4], k[
+                3]] + (-T + T14 - T24 + U)*Pair[ec[4], k[5]]) + 
+           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + 
+                Pair[ec[4], k[5]])) - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
+              (3*Pair[ec[4], k[3]] + 2*Pair[ec[4], k[5]]) + Pair[e[1], k[2]]*
+              (Pair[e[2], k[5]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]) + 
+               Pair[e[2], k[3]]*(3*Pair[ec[4], k[3]] + 2*Pair[ec[4], 
+                   k[5]]))))*Pair[ec[5], k[3]] + 
+         D0i[dd133, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+           MT2, MT2, MT2, MT2]*((T - U)*Pair[e[1], e[2]]*
+            (Pair[ec[4], k[5]]*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]]) + 
+             Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
+           4*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[5]]*
+              Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
+              Pair[e[2], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
+             Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] + Pair[e[1], k[2]]*
+              Pair[e[2], k[3]]*Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - 
+             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
+                Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) - 
+             Pair[e[1], k[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
+                Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) - 
+       2*D0i[dd13, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*(-4*((T - T14 - T24 + U)*
+            (Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + 
+           4*(Pair[e[1], k[3]]*Pair[e[2], k[1]] - Pair[e[1], k[2]]*
+              Pair[e[2], k[3]])*(-(Pair[ec[4], k[5]]*(Pair[ec[5], k[1]] + 
+                Pair[ec[5], k[2]] - 3*Pair[ec[5], k[3]])) + Pair[ec[4], k[3]]*
+              (Pair[ec[5], k[1]] + Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
+           Pair[e[1], k[2]]*Pair[e[2], ec[4]]*(2*(-MH2 + S34 + T14 + T24)*
+              Pair[ec[5], k[3]] + (T + U)*Pair[ec[5], k[4]]) - 
+           Pair[e[1], ec[4]]*Pair[e[2], k[1]]*(2*(-MH2 + S34 + T14 + T24)*
+              Pair[ec[5], k[3]] + (T + U)*Pair[ec[5], k[4]])) + 
+         Pair[e[1], e[2]]*(-((T - U)*(T - T14 - T24 + U)*Pair[ec[4], 
+              ec[5]]) - 2*(Pair[ec[4], k[2]]*(2*(MH2 - S34 - T14 - T24)*
+                Pair[ec[5], k[3]] - (T + U)*Pair[ec[5], k[4]]) + 
+             Pair[ec[4], k[1]]*(2*(-MH2 + S34 + T14 + T24)*Pair[ec[5], 
+                 k[3]] + (T + U)*Pair[ec[5], k[4]]) + 2*(T - U)*
+              (Pair[ec[4], k[5]]*(2*Pair[ec[5], k[3]] - Pair[ec[5], k[4]]) + 
+               Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) + 
+       D0i[dd0, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, MT2]*
+        (Pair[e[1], e[2]]*((-2*MH2*T14 + S34*T14 + 2*MH2*T24 - S34*T24 - 
+             T*T24 + T14*U)*Pair[ec[4], ec[5]] - 
+           2*(-(Pair[ec[4], k[2]]*((MH2 - S34)*Pair[ec[5], k[1]] + 
+                T14*Pair[ec[5], k[3]] + (MH2 - T)*Pair[ec[5], k[4]])) + 
+             Pair[ec[4], k[3]]*((T14 + T24)*Pair[ec[5], k[1]] - T14*
+                Pair[ec[5], k[3]] - T24*Pair[ec[5], k[4]]) + 
+             Pair[ec[4], k[1]]*((-MH2 + S34)*Pair[ec[5], k[1]] + (MH2 - S34 + 
+                 T24)*Pair[ec[5], k[3]] + (2*MH2 - S34 - U)*Pair[ec[5], 
+                 k[4]]))) + 2*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], 
+                k[1]]) + (-4*MH2 + 2*S34 + T + U)*Pair[e[1], k[4]]*
+              Pair[e[2], k[1]] + Pair[e[1], k[2]]*((T14 + T24)*Pair[e[2], 
+                 k[3]] + (4*MH2 - 2*S34 - T - U)*Pair[e[2], k[4]]))*
+            Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+            ((-MH2 + S34)*Pair[ec[4], k[1]] + (-MH2 + S34)*Pair[ec[4], k[
+                2]] + (T14 + T24)*Pair[ec[4], k[3]]) + Pair[e[1], ec[4]]*
+            Pair[e[2], k[1]]*((MH2 - S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+             (3*MH2 - S34 - T - U)*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + (-MH2 + S34)*
+                Pair[ec[4], k[2]] + (T14 + T24)*Pair[ec[4], k[3]]) + 
+             Pair[e[2], ec[4]]*((MH2 - S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+               (3*MH2 - S34 - T - U)*Pair[ec[5], k[4]])) + 
+           2*(Pair[e[1], k[4]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + Pair[
+                ec[4], k[5]])*Pair[ec[5], k[3]] + Pair[e[2], k[1]]*
+              (Pair[e[1], k[5]]*Pair[ec[4], k[3]] - Pair[e[1], k[3]]*
+                Pair[ec[4], k[5]])*Pair[ec[5], k[4]] - Pair[e[1], k[2]]*
+              (Pair[e[2], k[4]]*(2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])*
+                Pair[ec[5], k[3]] + (Pair[e[2], k[5]]*Pair[ec[4], k[3]] - 
+                 Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]])))) - 
+       D0i[dd1, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, S, 
+         MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
+          ((MH2*T - S34*T - T^2 + 2*T*T14 - MH2*U + S34*U - 2*T24*U + U^2)*
+            Pair[ec[4], ec[5]] + 2*(Pair[ec[4], k[5]]*(2*(MH2 - S34 - 
+                 2*(T + U))*Pair[ec[5], k[1]] + (-2*MH2 + 2*S34 - 3*T + 
+                 2*T24 + 5*U)*Pair[ec[5], k[3]] + 2*T*Pair[ec[5], k[4]]) + 
+             2*Pair[ec[4], k[3]]*((MH2 - S - T - U)*Pair[ec[5], k[1]] - U*
+                Pair[ec[5], k[3]] + (MH2 - S34 - T24 - U)*Pair[ec[5], 
+                 k[4]]) + 2*Pair[ec[4], k[1]]*((-MH2 + S + 2*(T + U))*
+                Pair[ec[5], k[3]] + (-MH2 + S34 + T + U)*Pair[ec[5], 
+                 k[4]]))) + 4*(((3*MH2 - S - 2*S34 - 3*T - 3*U)*
+              Pair[e[1], k[3]]*Pair[e[2], k[1]] - (T + U)*Pair[e[1], k[5]]*
+              Pair[e[2], k[1]] + Pair[e[1], k[2]]*((-3*MH2 + S + 2*S34 + 
+                 3*T + 3*U)*Pair[e[2], k[3]] + (T + U)*Pair[e[2], k[5]]))*
+            Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+            ((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+             (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]]) - Pair[e[1], ec[4]]*
+            Pair[e[2], k[1]]*((-MH2 + S + 2*(T + U))*Pair[ec[5], k[3]] + 
+             (-MH2 + S34 + T + U)*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*((-MH2 + S34 + T14 + T24)*Pair[ec[4], k[3]] + 
+               (MH2 - S34 - 2*(T + U))*Pair[ec[4], k[5]]) + Pair[e[2], ec[4]]*
+              ((-MH2 + S + 2*(T + U))*Pair[ec[5], k[3]] + (-MH2 + S34 + T + 
+                 U)*Pair[ec[5], k[4]])) + 
+           2*(Pair[e[1], k[2]]*Pair[e[2], k[4]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[e[2], k[5]]*
+              Pair[ec[4], k[3]]*Pair[ec[5], k[3]] - 2*Pair[e[1], k[3]]*
+              Pair[e[2], k[1]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+             2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
+              Pair[ec[5], k[3]] - Pair[e[1], k[2]]*Pair[e[2], k[4]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[3]] - 2*Pair[e[1], k[2]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(-Pair[ec[4], k[3]] + Pair[
+                ec[4], k[5]])*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
+             Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], k[5]]*
+              Pair[ec[5], k[4]] - Pair[e[1], k[2]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[4]] - Pair[e[1], k[5]]*
+              Pair[e[2], k[1]]*(-2*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+               Pair[ec[4], k[3]]*(Pair[ec[5], k[3]] + Pair[ec[5], 
+                  k[4]]))))) - D0i[dd3, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 
+         0, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
+          ((5*MH2*T14 - 3*S34*T14 - T*T14 - 5*MH2*T24 + 3*S34*T24 + 3*T*T24 - 
+             3*T14*U + T24*U)*Pair[ec[4], ec[5]] - 
+           2*(Pair[ec[4], k[3]]*(-2*(T14 + T24)*Pair[ec[5], k[1]] + 
+               (T14 + T24)*Pair[ec[5], k[3]] + 2*T24*Pair[ec[5], k[4]]) + 
+             Pair[ec[4], k[1]]*(2*(-2*MH2 + T + U)*Pair[ec[5], k[1]] + 
+               (2*MH2 - 2*T + T14 - 7*T24)*Pair[ec[5], k[3]] + 2*
+                (-MH2 + S34 + U)*Pair[ec[5], k[4]]) - Pair[ec[4], k[2]]*
+              ((4*MH2 - 2*(T + U))*Pair[ec[5], k[1]] + (-2*MH2 + 2*T - 
+                 7*T14 + T24)*Pair[ec[5], k[3]] + 2*(-3*MH2 + S34 + 2*T + U)*
+                Pair[ec[5], k[4]]))) - 
+         4*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
+             (-5*MH2 + 3*S34 + 2*(T + U))*Pair[e[1], k[4]]*Pair[e[2], k[1]] + 
+             Pair[e[1], k[2]]*((T14 + T24)*Pair[e[2], k[3]] + (5*MH2 - 
+                 3*S34 - 2*(T + U))*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 
+           Pair[e[1], ec[5]]*Pair[e[2], k[1]]*((-2*MH2 + T + U)*
+              Pair[ec[4], k[1]] + (-2*MH2 + T + U)*Pair[ec[4], k[2]] - 
+             (T14 + T24)*Pair[ec[4], k[3]]) + Pair[e[1], ec[4]]*
+            Pair[e[2], k[1]]*(3*(T14 + T24)*Pair[ec[5], k[3]] + 
+             2*(S + T14 + T24)*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*((-2*MH2 + T + U)*Pair[ec[4], k[1]] + 
+               (-2*MH2 + T + U)*Pair[ec[4], k[2]] - (T14 + T24)*Pair[ec[4], 
+                 k[3]]) - Pair[e[2], ec[4]]*(3*(T14 + T24)*Pair[ec[5], 
+                 k[3]] + 2*(S + T14 + T24)*Pair[ec[5], k[4]])) + 
+           2*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
+                Pair[ec[4], k[2]])*(Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(4*Pair[ec[4], k[1]]*
+                Pair[ec[5], k[3]] + 4*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] - 
+               Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
+              (Pair[e[2], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]])*
+                (Pair[ec[5], k[3]] + Pair[ec[5], k[4]]) + Pair[e[2], k[4]]*
+                (-4*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] - 4*Pair[ec[4], k[2]]*
+                  Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*Pair[ec[5], 
+                   k[4]]))))) - D0i[dd0, MH2, S34, 0, MH2 - S34 - T14 - T24, 
+         0, S, MT2, MT2, MT2, MT2]*(Pair[e[1], e[2]]*
+          ((MH2*T - S34*T - T*T24 - MH2*U + S34*U + T14*U)*
+            Pair[ec[4], ec[5]] - 2*(Pair[ec[4], k[2]]*((MH2 - S34 - T14)*
+                Pair[ec[5], k[1]] - T14*Pair[ec[5], k[2]] + (T + T14)*
+                Pair[ec[5], k[4]]) + Pair[ec[4], k[3]]*
+              (-(T24*Pair[ec[5], k[1]]) + T14*Pair[ec[5], k[2]] + (-T + U)*
+                Pair[ec[5], k[4]]) + Pair[ec[4], k[1]]*(T24*Pair[ec[5], 
+                 k[1]] + (-MH2 + S34 + T24)*Pair[ec[5], k[2]] - (T24 + U)*
+                Pair[ec[5], k[4]]))) + 
+         2*(((2*MH2 - 2*S34 - T14 - T24)*Pair[e[1], k[3]]*Pair[e[2], k[1]] + 
+             (T + U)*Pair[e[1], k[4]]*Pair[e[2], k[1]] + Pair[e[1], k[2]]*
+              ((-2*MH2 + 2*S34 + T14 + T24)*Pair[e[2], k[3]] - (T + U)*
+                Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*
+            Pair[e[2], k[1]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
+             (-MH2 + S34)*Pair[ec[4], k[2]] + (T14 + T24)*Pair[ec[4], k[
+                3]]) + Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+            ((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] - (MH2 - S34 + T + U)*
+              Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*
+            (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + (-MH2 + S34)*
+                Pair[ec[4], k[2]] + (T14 + T24)*Pair[ec[4], k[3]]) - 
+             Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + T24)*Pair[ec[5], k[3]] - 
+               (MH2 - S34 + T + U)*Pair[ec[5], k[4]])) + 
+           2*(-(Pair[e[2], k[1]]*(Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
+                Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) + 
+             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
+                Pair[ec[5], k[3]] - 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
+             Pair[e[1], k[2]]*((Pair[e[2], k[5]]*Pair[ec[4], k[3]] + 
+                 Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
+               Pair[e[2], k[4]]*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) + 
+                 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) - 
+       8*(D0i[dd122, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, 
+           S, MT2, MT2, MT2, MT2]*((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
+           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[5]]))*Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+         D0i[dd123, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, 
+           MT2]*(Pair[e[1], e[2]]*(Pair[ec[4], k[5]]*((-T14 + T24)*
+                Pair[ec[5], k[3]] + (-T + U)*Pair[ec[5], k[4]]) + 
+             Pair[ec[4], k[3]]*(-2*(T14 - T24)*Pair[ec[5], k[3]] + 
+               (-T + T14 - T24 + U)*Pair[ec[5], k[4]])) + 
+           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]*(2*Pair[ec[4], k[3]] + 
+                Pair[ec[4], k[5]])*Pair[ec[5], k[3]]) - Pair[e[2], k[1]]*
+              (Pair[e[1], k[5]]*Pair[ec[4], k[3]] + Pair[e[1], k[3]]*
+                (2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]))*Pair[ec[5], k[
+                4]] + Pair[e[1], k[2]]*(Pair[e[2], k[4]]*
+                (2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])*Pair[ec[5], k[3]] + 
+               (Pair[e[2], k[5]]*Pair[ec[4], k[3]] + Pair[e[2], k[3]]*
+                  (2*Pair[ec[4], k[3]] + Pair[ec[4], k[5]]))*Pair[ec[5], 
+                 k[4]]))) + D0i[dd123, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, 
+           S, MT2, MT2, MT2, MT2]*(-(Pair[e[1], e[2]]*
+             ((-T + T14 - T24 + U)*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
+              Pair[ec[4], k[5]]*((T14 - T24)*Pair[ec[5], k[3]] + 
+                (T - U)*Pair[ec[5], k[4]]))) + 
+           4*(-(Pair[e[2], k[1]]*(Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
+                Pair[e[1], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]]) - 
+             Pair[e[1], k[4]]*Pair[e[2], k[1]]*(Pair[ec[4], k[5]]*
+                Pair[ec[5], k[3]] + 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]) + 
+             Pair[e[1], k[2]]*((Pair[e[2], k[5]]*Pair[ec[4], k[3]] + 
+                 Pair[e[2], k[3]]*Pair[ec[4], k[5]])*Pair[ec[5], k[4]] + 
+               Pair[e[2], k[4]]*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+                 2*Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) + 
+       2*(C0i[cc1, 2*MH2 - S34 - T - U, 0, S, MT2, MT2, MT2]*
+          (((T14 - T24)*Pair[e[1], e[2]] - 4*(-(Pair[e[1], k[4]]*Pair[e[2], 
+                  k[1]]) + Pair[e[1], k[2]]*Pair[e[2], k[4]]))*
+            Pair[ec[4], ec[5]] + 2*(2*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
+             2*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + Pair[e[1], e[2]]*
+              (Pair[ec[4], k[1]] - Pair[ec[4], k[2]]))*Pair[ec[5], k[3]]) + 
+         D0i[dd1, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, MT2, MT2, MT2, MT2]*
+          (-(Pair[e[1], e[2]]*((2*MH2*T14 - S34*T14 - 2*MH2*T24 + S34*T24 + 
+                T*T24 - T14*U)*Pair[ec[4], ec[5]] + Pair[ec[4], k[5]]*(
+                -2*(MH2 - S34)*Pair[ec[5], k[1]] + (-MH2 + S34 - 2*T14)*
+                 Pair[ec[5], k[3]] + 2*(-MH2 + T)*Pair[ec[5], k[4]]) + 
+              2*Pair[ec[4], k[1]]*((2*MH2 - 2*S34 + T14 + T24)*Pair[ec[5], 
+                  k[3]] + (MH2 + S + T14 + T24)*Pair[ec[5], k[4]]) + 
+              Pair[ec[4], k[3]]*(2*(S + S34 + 2*(T14 + T24))*Pair[ec[5], 
+                  k[1]] + 2*(-2*MH2 + S34 + T - 3*T14 + T24)*Pair[ec[5], 
+                  k[3]] - (3*MH2 + S - 2*T + T14 + 3*T24)*Pair[ec[5], 
+                  k[4]]))) + 2*((-((T14 + T24)*Pair[e[1], k[3]]*Pair[e[2], 
+                  k[1]]) + (-4*MH2 + 2*S34 + T + U)*Pair[e[1], k[4]]*
+                Pair[e[2], k[1]] + Pair[e[1], k[2]]*((T14 + T24)*Pair[e[2], 
+                   k[3]] + (4*MH2 - 2*S34 - T - U)*Pair[e[2], k[4]]))*
+              Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[1]]*
+              ((S + S34 + 2*(T14 + T24))*Pair[ec[4], k[3]] + (-MH2 + S34)*
+                Pair[ec[4], k[5]]) + Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+              ((2*MH2 - 2*S34 + T14 + T24)*Pair[ec[5], k[3]] + (3*MH2 - S34 - 
+                 T - U)*Pair[ec[5], k[4]]) - Pair[e[1], k[2]]*
+              (Pair[e[2], ec[5]]*((S + S34 + 2*(T14 + T24))*Pair[ec[4], 
+                   k[3]] + (-MH2 + S34)*Pair[ec[4], k[5]]) + Pair[e[2], 
+                 ec[4]]*((2*MH2 - 2*S34 + T14 + T24)*Pair[ec[5], k[3]] + 
+                 (3*MH2 - S34 - T - U)*Pair[ec[5], k[4]])) + 
+             2*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]*Pair[ec[4], k[3]]*
+                 Pair[ec[5], k[3]]) + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]]*
+                Pair[ec[4], k[3]]*Pair[ec[5], k[3]] - 3*Pair[e[1], k[2]]*
+                Pair[e[2], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + 
+               Pair[e[1], k[2]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+                Pair[ec[5], k[3]] - Pair[e[1], k[2]]*Pair[e[2], k[4]]*
+                Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[4]]*
+                Pair[e[2], k[1]]*(3*Pair[ec[4], k[3]] + Pair[ec[4], k[5]])*
+                Pair[ec[5], k[3]] + Pair[e[1], k[5]]*Pair[e[2], k[1]]*
+                Pair[ec[4], k[3]]*Pair[ec[5], k[4]] - Pair[e[1], k[2]]*
+                Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[4]] + 
+               Pair[e[1], k[2]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
+                Pair[ec[5], k[4]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*
+                (2*Pair[ec[4], k[3]]*Pair[ec[5], k[3]] + Pair[ec[4], k[5]]*
+                  Pair[ec[5], k[4]]))))))))/(MW*SW) + 
+  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu4, Glu5, Glu2, 0, 0]]*
+    (Den[T14, 0]*(-(D0i[dd3, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, 
+          MT2, MT2]*(-((2*S - 3*S34 + 3*T - 2*T24)*(-MH2 + S + T24 + U)*
+            Pair[e[1], ec[4]]*Pair[e[2], ec[5]]) - 4*Pair[e[1], k[4]]*
+           ((-MH2 + S + T24 + U)*Pair[e[2], k[3]] + (-MH2 + S34 + T + U)*
+             Pair[e[2], k[5]])*Pair[ec[4], ec[5]] - 4*Pair[e[1], ec[5]]*
+           ((-MH2 + S + T24 + U)*Pair[e[2], k[3]] + (-MH2 + S34 + T + U)*
+             Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 4*(MH2 - S - T24 - U)*
+           Pair[e[2], ec[5]]*(2*Pair[e[1], k[2]]*Pair[ec[4], k[1]] - 
+            3*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             (2*Pair[ec[4], k[2]] - 3*Pair[ec[4], k[3]])) - 
+          4*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*((-3*MH2 + 2*S + 2*T24 + 3*U)*
+             Pair[ec[5], k[2]] + (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) - 
+          4*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*((-3*MH2 + 2*S + 2*T24 + 3*U)*
+             Pair[ec[5], k[2]] + (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) - 
+          8*(Pair[e[1], k[2]]*(Pair[e[2], k[3]] - 2*Pair[e[2], k[5]])*
+             Pair[ec[4], k[1]]*Pair[ec[5], k[2]] - 2*Pair[e[1], k[3]]*
+             Pair[e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+            2*Pair[e[1], k[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]]*
+             Pair[ec[5], k[2]] + Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+             Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 2*Pair[e[1], k[4]]*
+             Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
+            2*Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+             Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[e[2], k[5]]*
+             Pair[ec[4], k[5]]*Pair[ec[5], k[2]] + Pair[e[1], k[5]]*
+             Pair[e[2], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
+             Pair[ec[5], k[3]]) + 2*Pair[e[1], ec[4]]*
+           (2*Pair[e[2], k[4]]*((MH2 - S - T24 - U)*Pair[ec[5], k[1]] + 
+              (-MH2 + T24 + U)*Pair[ec[5], k[2]]) + Pair[e[2], k[5]]*
+             (2*(T - T24)*Pair[ec[5], k[1]] - 5*(S34 - T)*Pair[ec[5], k[2]] + 
+              2*(-S + S34)*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[1]]*
+             ((-MH2 + S + U)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*Pair[
+                ec[5], k[4]])))) - 
+       2*(D0i[dd33, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (-((S34 - T)*(-MH2 + S34 + T + T14)*Pair[e[1], ec[4]]*
+             Pair[e[2], ec[5]]) + 8*(-MH2 + S + T24 + U)*Pair[e[1], k[4]]*
+            Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 8*(-MH2 + S + T24 + U)*
+            Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] + 
+           4*(MH2 - S - T24 - U)*Pair[e[2], ec[5]]*
+            (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+              Pair[ec[4], k[3]]) + 32*Pair[e[2], k[5]]*
+            (Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
+              Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[ec[4], k[2]] - Pair[
+                ec[4], k[5]]))*Pair[ec[5], k[2]] - 4*Pair[e[1], ec[4]]*
+            Pair[e[2], k[5]]*((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 
+             2*(S34 - T)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*
+              Pair[ec[5], k[4]])) + D0i[dd13, 0, U, T14, MH2 - S - T24 - U, 
+           MH2, 0, MT2, MT2, MT2, MT2]*((S - T24)*(-MH2 + S + T24 + U)*
+            Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 4*(-MH2 + S + T24 + U)*
+            Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+           4*(-MH2 + S + T24 + U)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+            Pair[ec[4], k[1]] + 4*(MH2 - S - T24 - U)*Pair[e[2], ec[5]]*
+            (Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+              Pair[ec[4], k[2]]) + 16*Pair[e[2], k[5]]*
+            (2*Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
+              Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - 
+               Pair[ec[4], k[5]]))*Pair[ec[5], k[2]] - 2*Pair[e[1], ec[4]]*
+            Pair[e[2], k[5]]*((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 
+             2*(S + S34 - T - T24)*Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*
+              Pair[ec[5], k[4]])) + C0i[cc1, U, T14, 0, MT2, MT2, MT2]*
+          (Pair[e[2], ec[5]]*((S - S34 + T - T24)*Pair[e[1], ec[4]] - 
+             4*(Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+                Pair[ec[4], k[5]])) - 2*Pair[e[2], k[3]]*
+            (-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+                Pair[ec[4], k[1]]) + Pair[e[1], ec[4]]*(Pair[ec[5], k[1]] + 
+               Pair[ec[5], k[4]])))) + 4*D0i[dd00, 0, U, T14, 
+         MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+        (4*Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+         4*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
+         4*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] - 
+           2*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+            (Pair[ec[4], k[2]] - 2*Pair[ec[4], k[3]])) + 
+         8*Pair[e[1], k[4]]*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+         8*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+         Pair[e[1], ec[4]]*((S - 2*S34 + 2*T - T24)*Pair[e[2], ec[5]] - 
+           2*(2*(Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+             Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))) + 
+       C0i[cc0, U, T14, 0, MT2, MT2, MT2]*
+        (-4*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+              2*Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(
+                Pair[ec[4], k[2]] + 2*Pair[ec[4], k[5]]))) + 
+           Pair[ec[4], k[1]]*(Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[
+                e[2], k[4]]) + Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - Pair[
+                ec[5], k[3]])) + Pair[e[1], k[4]]*
+            ((Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
+             Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]))) + 
+         Pair[e[1], ec[4]]*((-3*S + 2*S34 - 2*T + 3*T24)*Pair[e[2], ec[5]] + 
+           2*(Pair[e[2], k[4]]*(-2*Pair[ec[5], k[1]] + Pair[ec[5], k[2]]) + 
+             Pair[e[2], k[1]]*(Pair[ec[5], k[2]] + 2*Pair[ec[5], k[4]])))) + 
+       D0i[dd2, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+        (4*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+             (S - S34 - T + T24)*Pair[e[2], k[3]] + (MH2 - U)*
+              Pair[e[2], k[4]])*Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*
+            ((S34 + T)*Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+             (-3*MH2 + S + T24 + 3*U)*Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+             Pair[e[1], k[4]]*((S34 + T)*Pair[ec[4], k[2]] + (-3*MH2 + S + 
+                 T24 + 3*U)*Pair[ec[4], k[3]])) + Pair[e[1], e[2]]*
+            Pair[ec[4], k[1]]*(-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + 
+             (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*
+            (((-MH2 + U)*Pair[e[2], k[1]] + (S - S34 - T + T24)*Pair[e[2], 
+                 k[3]] + (MH2 - U)*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
+             Pair[e[2], ec[4]]*(-((MH2 + S34 + T - U)*Pair[ec[5], k[2]]) + 
+               (MH2 - S - T24 - U)*Pair[ec[5], k[3]])) + 
+           2*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[
+                ec[5], k[2]]) + Pair[e[1], k[3]]*(2*Pair[e[2], k[3]] - Pair[
+                e[2], k[5]])*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+             2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[2]]*
+              Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[3]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[3]]*Pair[ec[5], k[2]] - 
+             Pair[e[1], k[4]]*Pair[e[2], k[3]]*Pair[ec[4], k[5]]*
+              Pair[ec[5], k[2]] - Pair[e[1], k[5]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + Pair[e[1], k[4]]*
+              Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[2]]*
+              Pair[ec[5], k[3]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + Pair[e[1], k[2]]*
+              Pair[ec[4], k[1]]*(Pair[e[2], k[5]]*Pair[ec[5], k[3]] + 
+               Pair[e[2], k[3]]*(2*Pair[ec[5], k[2]] + Pair[ec[5], 
+                  k[3]])))) + Pair[e[1], ec[4]]*
+          ((3*MH2*S34 - 2*S*S34 - 3*MH2*T + 2*T*T24 - 3*S34*U + 3*T*U)*
+            Pair[e[2], ec[5]] - 2*(Pair[e[2], k[3]]*((-5*S34 + 3*T + 2*T24)*
+                Pair[ec[5], k[1]] + 5*(S34 - T)*Pair[ec[5], k[3]] + 
+               (2*S + 3*S34 - 5*T)*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[4]]*
+              ((MH2 + T - U)*Pair[ec[5], k[1]] - (S + T)*Pair[ec[5], k[3]] - 
+               T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[1]]*
+              (S34*Pair[ec[5], k[1]] - (S34 + T24)*Pair[ec[5], k[3]] - 
+               (MH2 + S34 - U)*Pair[ec[5], k[4]])))) + 
+       D0i[dd0, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+        (2*(Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+             (S + T24)*Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*
+            Pair[ec[4], k[1]] + Pair[e[2], ec[5]]*((S34 + T)*Pair[e[1], k[2]]*
+              Pair[ec[4], k[1]] + (-2*MH2 + S + T24 + 2*U)*Pair[e[1], k[3]]*
+              Pair[ec[4], k[1]] + Pair[e[1], k[4]]*((S34 + T)*Pair[ec[4], 
+                 k[2]] + (-2*MH2 + S + T24 + 2*U)*Pair[ec[4], k[3]])) + 
+           Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(-((MH2 + S34 + T - U)*Pair[
+                ec[5], k[2]]) + (MH2 - S - T24 - U)*Pair[ec[5], k[3]]) + 
+           Pair[e[1], k[4]]*(((-MH2 + U)*Pair[e[2], k[1]] + (S + T24)*
+                Pair[e[2], k[3]] + (MH2 - U)*Pair[e[2], k[4]])*
+              Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*(-((MH2 + S34 + T - U)*
+                 Pair[ec[5], k[2]]) + (MH2 - S - T24 - U)*Pair[ec[5], 
+                 k[3]])) + 2*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], 
+                k[1]]*Pair[ec[5], k[2]]) - Pair[e[1], k[3]]*Pair[e[2], k[5]]*
+              Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*
+              Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
+             Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[2]] + Pair[e[1], k[4]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[2]]*Pair[ec[4], k[1]]*(2*Pair[e[2], k[3]]*
+                Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + 
+         Pair[e[1], ec[4]]*((MH2*S34 - S*S34 - MH2*T + T*T24 - S34*U + T*U)*
+            Pair[e[2], ec[5]] + 2*(Pair[e[2], k[4]]*((-MH2 + S + U)*
+                Pair[ec[5], k[1]] + (S + T)*Pair[ec[5], k[2]] - S*
+                Pair[ec[5], k[4]]) - Pair[e[2], k[3]]*(T24*Pair[ec[5], 
+                 k[1]] + (S34 - T)*Pair[ec[5], k[2]] + S*Pair[ec[5], k[4]]) + 
+             Pair[e[2], k[1]]*(T24*Pair[ec[5], k[1]] + (S34 + T24)*
+                Pair[ec[5], k[2]] + (MH2 - T24 - U)*Pair[ec[5], k[4]])))) + 
+       8*(D0i[dd112, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
+           MT2]*Pair[e[2], k[3]]*((-S + T24)*Pair[e[1], ec[4]] + 
+           4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+              Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
+         D0i[dd001, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (Pair[e[2], ec[5]]*((-S + T24)*Pair[e[1], ec[4]] + 
+             4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+                Pair[ec[4], k[2]])) - 2*(Pair[e[1], ec[4]]*(Pair[e[2], 
+                k[1]] + Pair[e[2], k[4]]) - 2*(Pair[e[1], k[4]]*Pair[e[2], 
+                 ec[4]] + Pair[e[1], e[2]]*Pair[ec[4], k[1]]))*
+            Pair[ec[5], k[2]]) + D0i[dd222, 0, U, T14, MH2 - S - T24 - U, 
+           MH2, 0, MT2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+          ((-S34 + T)*Pair[e[1], ec[4]] + 
+           4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+              Pair[ec[4], k[3]]))*Pair[ec[5], k[3]] + 
+         D0i[dd123, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (Pair[e[1], ec[4]]*((-S - S34 + T + T24)*Pair[e[2], k[3]]*
+              Pair[ec[5], k[2]] + Pair[e[2], k[5]]*((S34 - T)*Pair[ec[5], 
+                 k[2]] + (S - T24)*Pair[ec[5], k[3]])) + 
+           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[
+                ec[5], k[2]]) - Pair[e[1], k[3]]*Pair[e[2], k[5]]*
+              Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 2*Pair[e[1], k[4]]*
+              Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
+             Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[2]]*Pair[ec[4], k[1]]*(2*Pair[e[2], k[3]]*
+                Pair[ec[5], k[2]] - Pair[e[2], k[5]]*Pair[ec[5], k[3]]))) + 
+         D0i[dd233, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (-((S34 - T)*Pair[e[1], ec[4]]*(Pair[e[2], k[3]]*Pair[ec[5], 
+                k[2]] - Pair[e[2], k[5]]*(Pair[ec[5], k[2]] + Pair[ec[5], 
+                 k[3]]))) + 4*(-(Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
+                ec[4], k[1]]*Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*
+              Pair[e[2], k[3]]*Pair[ec[4], k[2]]*Pair[ec[5], k[2]] - 
+             Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+              Pair[ec[5], k[2]] - Pair[e[1], k[4]]*Pair[e[2], k[3]]*
+              Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[e[1], k[4]]*
+              Pair[e[2], k[5]]*Pair[ec[4], k[2]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[4]]*Pair[e[2], k[5]]*Pair[ec[4], k[5]]*
+              Pair[ec[5], k[3]] + Pair[e[1], k[2]]*Pair[ec[4], k[1]]*
+              (Pair[e[2], k[3]]*Pair[ec[5], k[2]] - Pair[e[2], k[5]]*
+                Pair[ec[5], k[3]]) + Pair[e[1], k[5]]*Pair[ec[4], k[1]]*
+              (-(Pair[e[2], k[3]]*Pair[ec[5], k[2]]) + Pair[e[2], k[5]]*
+                Pair[ec[5], k[3]]))) + D0i[dd122, 0, U, T14, 
+           MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+          (Pair[e[1], ec[4]]*((-S34 + T)*Pair[ec[5], k[2]] + 
+             (-S + T24)*Pair[ec[5], k[3]]) + 
+           4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+             Pair[e[1], k[2]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[4]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
+               Pair[ec[4], k[2]]*Pair[ec[5], k[3]]))) + 
+         D0i[dd223, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (-((S34 - T)*Pair[e[1], ec[4]]*(-(Pair[e[2], k[5]]*Pair[ec[5], 
+                 k[3]]) + Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], 
+                 k[3]]))) + 4*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+              Pair[e[2], k[3]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+             Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[e[2], k[3]]*
+                Pair[ec[5], k[2]] - Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + 
+             Pair[e[1], k[4]]*(-(Pair[e[2], k[5]]*Pair[ec[4], k[3]]*
+                 Pair[ec[5], k[3]]) + Pair[e[2], k[3]]*(Pair[ec[4], k[3]]*
+                  Pair[ec[5], k[2]] + (Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+                  Pair[ec[5], k[3]])))) + D0i[dd002, 0, U, T14, 
+           MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+               Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + Pair[ec[4], k[1]]*
+              (Pair[e[1], ec[5]]*Pair[e[2], k[3]] + Pair[e[1], e[2]]*
+                Pair[ec[5], k[3]]) + Pair[e[1], k[4]]*(Pair[e[2], k[3]]*
+                Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + 
+           Pair[e[1], ec[4]]*((-S34 + T)*Pair[e[2], ec[5]] - 
+             2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[3]] + 
+               Pair[e[2], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))))) - 
+       8*(D0i[dd113, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, 
+           MT2]*Pair[e[2], k[5]]*((-S + T24)*Pair[e[1], ec[4]] + 
+           4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+              Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
+         D0i[dd333, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          Pair[e[2], k[5]]*((-S34 + T)*Pair[e[1], ec[4]] + 
+           4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
+              Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[ec[4], k[2]] - Pair[
+                ec[4], k[5]])))*Pair[ec[5], k[2]] + 
+         D0i[dd133, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          Pair[e[2], k[5]]*((-S - S34 + T + T24)*Pair[e[1], ec[4]] + 
+           4*(2*Pair[e[1], k[2]]*Pair[ec[4], k[1]] - Pair[e[1], k[5]]*
+              Pair[ec[4], k[1]] + Pair[e[1], k[4]]*(2*Pair[ec[4], k[2]] - 
+               Pair[ec[4], k[5]])))*Pair[ec[5], k[2]] + 
+         D0i[dd003, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (-4*(Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+               Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + Pair[ec[4], k[1]]*
+              (-(Pair[e[1], ec[5]]*Pair[e[2], k[5]]) + Pair[e[1], e[2]]*
+                Pair[ec[5], k[2]]) + Pair[e[1], k[4]]*(-(Pair[e[2], k[5]]*
+                 Pair[ec[4], ec[5]]) + Pair[e[2], ec[4]]*Pair[ec[5], 
+                 k[2]])) + Pair[e[1], ec[4]]*((S34 - T)*Pair[e[2], ec[5]] + 
+             2*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] - 
+               Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))))) + 
+       2*(D0i[dd1, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
+           Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+             (S - T24)*Pair[e[2], k[3]] + (-MH2 + U)*Pair[e[2], k[4]]) + 
+           2*(-MH2 + U)*Pair[e[1], e[2]]*Pair[ec[4], k[1]] + 
+           4*Pair[e[2], k[3]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+             Pair[e[1], k[4]]*Pair[ec[4], k[2]]))*Pair[ec[5], k[2]] + 
+         D0i[dd22, 0, U, T14, MH2 - S - T24 - U, MH2, 0, MT2, MT2, MT2, MT2]*
+          (Pair[e[2], ec[5]]*((S34 - T)*(MH2 - U)*Pair[e[1], ec[4]] - 
+             4*(MH2 - U)*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], 
+                 k[4]]*Pair[ec[4], k[3]])) - 2*Pair[e[2], k[3]]*
+            (2*(S34 + T)*Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + 
+             2*(S34 + T)*Pair[e[1], ec[5]]*Pair[ec[4], k[1]] - 
+             Pair[e[1], ec[4]]*(2*(S34 + T)*Pair[ec[5], k[1]] - (S34 - 3*T)*
+                Pair[ec[5], k[2]] + (-3*S34 + T)*Pair[ec[5], k[3]]) + 
+             8*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+                Pair[ec[4], k[3]])*(Pair[ec[5], k[1]] - 2*Pair[ec[5], k[3]] - 
+               Pair[ec[5], k[4]]))) + D0i[dd12, 0, U, T14, MH2 - S - T24 - U, 
+           MH2, 0, MT2, MT2, MT2, MT2]*((S - T24)*(MH2 - U)*Pair[e[1], ec[4]]*
+            Pair[e[2], ec[5]] + 4*(-MH2 + S + T24 + U)*Pair[e[1], k[4]]*
+            Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + 4*(-MH2 + S + T24 + U)*
+            Pair[e[1], ec[5]]*Pair[e[2], k[3]]*Pair[ec[4], k[1]] - 
+           4*(MH2 - U)*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[
+                1]] + Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + 
+           16*Pair[e[2], k[3]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+             Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+              (Pair[ec[4], k[2]] + Pair[ec[4], k[3]]))*Pair[ec[5], k[2]] - 
+           2*Pair[e[1], ec[4]]*Pair[e[2], k[3]]*((-MH2 + S + T24 + U)*
+              Pair[ec[5], k[1]] + 2*(S + S34 - T - T24)*Pair[ec[5], k[2]] + 
+             (-MH2 + S + T24 + U)*Pair[ec[5], k[4]])) + 
+         C0i[cc2, U, T14, 0, MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
+            ((-S + S34 - T + T24)*Pair[e[1], ec[4]] + 
+             4*(Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+                Pair[ec[4], k[5]])) - 2*Pair[e[2], k[5]]*
+            (-2*(Pair[e[1], k[4]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+                Pair[ec[4], k[1]]) + Pair[e[1], ec[4]]*(Pair[ec[5], k[1]] + 
+               Pair[ec[5], k[4]]))) + D0i[dd23, 0, U, T14, MH2 - S - T24 - U, 
+           MH2, 0, MT2, MT2, MT2, MT2]*
+          (4*(Pair[e[1], k[4]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
+               (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
+             Pair[e[1], ec[5]]*(2*(-MH2 + S + T24 + U)*Pair[e[2], k[3]] + 
+               (S34 + T)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
+             (2*MH2 - S - T24 - 2*U)*Pair[e[2], ec[5]]*(Pair[e[1], k[3]]*
+                Pair[ec[4], k[1]] + Pair[e[1], k[4]]*Pair[ec[4], k[3]]) + 
+             4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) + 
+               (Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], k[3]])*
+              (2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] - Pair[e[2], k[5]]*
+                (Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) + 
+           Pair[e[1], ec[4]]*((S34 - T)*(S34 + T + T14 - U)*Pair[e[2], ec[
+                5]] - 2*(Pair[e[2], k[5]]*((S34 + T)*Pair[ec[5], k[1]] - 
+                 2*(S34 - T)*Pair[ec[5], k[2]] - 2*S34*Pair[ec[5], k[3]] + 
+                 2*T*Pair[ec[5], k[3]] + S34*Pair[ec[5], k[4]] + 
+                 T*Pair[ec[5], k[4]]) + 2*Pair[e[2], k[3]]*
+                ((-MH2 + S + T24 + U)*Pair[ec[5], k[1]] + 2*(S34 - T)*
+                  Pair[ec[5], k[2]] + (-MH2 + S + T24 + U)*Pair[ec[5], 
+                   k[4]])))))) + Den[S, 0]*
+      (-8*D0i[dd002, MH2, 2*MH2 - S34 - T - U, 0, MH2 - S34 - T14 - T24, 0, 
+         S, MT2, MT2, MT2, MT2]*(((T + T14 - T24 - U)*Pair[e[1], e[2]] + 
+           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+              Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
+          (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
+            Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - 
+             Pair[ec[5], k[2]]))) + 
+       (-8*D0i[dd111, MH2, S34, 0, MH2 - S34 - T14 - T24, 0, S, MT2, MT2, 
            MT2, MT2] + 8*(D0i[dd111, MH2, S34, S, 2*MH2 - S34 - T - U, 0, 0, 
             MT2, MT2, MT2, MT2] + D0i[dd111, MH2, 2*MH2 - S34 - T - U, 0, 
             MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]))*
@@ -5196,15 +5204,8 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
                 (-MH2 + S34)*Pair[ec[4], k[2]] + (-T + T14 + T24 - U)*
                  Pair[ec[4], k[3]])) + Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + 
                  T24)*Pair[ec[5], k[3]] - (MH2 - S34 + T + U)*Pair[ec[5], 
-                 k[4]])))) + 8*(D0i[dd002, MH2, 2*MH2 - S34 - T - U, 0, 
-           MH2 - S34 - T14 - T24, 0, S, MT2, MT2, MT2, MT2]*
-          (((-T - T14 + T24 + U)*Pair[e[1], e[2]] - 
-             4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
-                Pair[e[2], k[5]]))*Pair[ec[4], ec[5]] - 2*Pair[ec[4], k[5]]*
-            (2*Pair[e[1], k[2]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
-              Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[5], k[1]] - Pair[
-                ec[5], k[2]]))) + D0i[dd003, MH2, S34, S, 2*MH2 - S34 - T - 
-            U, 0, 0, MT2, MT2, MT2, MT2]*((T14 - T24)*Pair[e[1], e[2]]*
+                 k[4]])))) + 8*(D0i[dd003, MH2, S34, S, 2*MH2 - S34 - T - U, 
+           0, 0, MT2, MT2, MT2, MT2]*((T14 - T24)*Pair[e[1], e[2]]*
             Pair[ec[4], ec[5]] - 4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + 
              Pair[e[1], k[2]]*Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 
            4*Pair[e[1], k[2]]*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
diff --git a/feynamps/ggHgg_box_4_FeynAmp_9diags.m b/feynamps/ggHgg_box_4_FeynAmp_9diags.m
index 18582703..61140633 100644
--- a/feynamps/ggHgg_box_4_FeynAmp_9diags.m
+++ b/feynamps/ggHgg_box_4_FeynAmp_9diags.m
@@ -479,25 +479,24 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
       ((-2*MH2 + 2*S34 + T + U)*Pair[ec[4], ec[5]] - 
        4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) + Pair[ec[4], k[3]]*
           Pair[ec[5], k[4]])))/(MW*SW) + 
-    (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, 
-       MT2, MT2, MT2]*
-      (-((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 3*Pair[e[2], k[3]] - 
-            2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*(Pair[e[2], k[3]] - 
-            2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]]) + 
-       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[5]]*
-        Pair[ec[4], k[5]] - 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
-         2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] - 
-       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[4]]*
-        Pair[ec[5], k[4]] + 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
-         2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] - Pair[e[1], e[2]]*
-        ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
-         4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
-            Pair[ec[5], k[4]]))))/(MW*SW) + 
     (8*Alfas2*EL*MT2*D0i[dd00, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, 
        MT2, MT2, MT2]*(-(Pair[e[2], k[1]]*
          ((Pair[e[1], k[4]] - Pair[e[1], k[5]])*Pair[ec[4], ec[5]] + 
           2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 2*Pair[e[1], ec[4]]*
            Pair[ec[5], k[4]])) - Pair[e[1], e[2]]*
+        ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
+         4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
+            Pair[ec[5], k[4]]))))/(MW*SW) - 
+    (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, 
+       MT2, MT2, MT2]*((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 
+           3*Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*
+          (Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 
+       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[5]] + 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
+         2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] + 
+       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[4]]*
+        Pair[ec[5], k[4]] - 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
+         2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] + Pair[e[1], e[2]]*
         ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
          4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
             Pair[ec[5], k[4]]))))/(MW*SW) + 
@@ -1188,25 +1187,24 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
       ((-2*MH2 + 2*S34 + T + U)*Pair[ec[4], ec[5]] - 
        4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) + Pair[ec[4], k[3]]*
           Pair[ec[5], k[4]])))/(MW*SW) + 
-    (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, 
-       MT2, MT2, MT2]*
-      (-((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 3*Pair[e[2], k[3]] - 
-            2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*(Pair[e[2], k[3]] - 
-            2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]]) + 
-       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[5]]*
-        Pair[ec[4], k[5]] - 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
-         2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] - 
-       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[4]]*
-        Pair[ec[5], k[4]] + 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
-         2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] - Pair[e[1], e[2]]*
-        ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
-         4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
-            Pair[ec[5], k[4]]))))/(MW*SW) + 
     (8*Alfas2*EL*MT2*D0i[dd00, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, 
        MT2, MT2, MT2]*(-(Pair[e[2], k[1]]*
          ((Pair[e[1], k[4]] - Pair[e[1], k[5]])*Pair[ec[4], ec[5]] + 
           2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 2*Pair[e[1], ec[4]]*
            Pair[ec[5], k[4]])) - Pair[e[1], e[2]]*
+        ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
+         4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
+            Pair[ec[5], k[4]]))))/(MW*SW) - 
+    (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, 
+       MT2, MT2, MT2]*((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 
+           3*Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*
+          (Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 
+       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[5]] + 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
+         2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] + 
+       2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[4]]*
+        Pair[ec[5], k[4]] - 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
+         2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] + Pair[e[1], e[2]]*
         ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
          4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
             Pair[ec[5], k[4]]))))/(MW*SW) + 
@@ -2574,15 +2572,6 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
             Pair[ec[5], k[4]] - 8*(Pair[e[2], k[4]] + Pair[e[2], k[5]])*
             (Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[ec[4], k[2]]*
               Pair[ec[5], k[4]]))) + 
-       8*(D0i[dd001, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, MT2, MT2, 
-          MT2] + D0i[dd001, 0, MH2 - S34 - T14 - T24, MH2, 0, T, S, MT2, MT2, 
-          MT2, MT2])*(2*Pair[e[1], k[2]]*
-          ((Pair[e[2], k[4]] - Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
-           2*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 2*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[4]]) - Pair[e[1], e[2]]*
-          ((-MH2 + S + 2*T24 + U)*Pair[ec[4], ec[5]] + 
-           4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[2]]) + Pair[ec[4], k[2]]*
-              Pair[ec[5], k[4]]))) + 
        4*(D0i[dd13, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, MT2, MT2, 
            MT2]*(-(((-MH2 + T)*Pair[e[1], k[2]]*Pair[e[2], k[1]] + 
               2*(MH2 - T)*Pair[e[1], k[5]]*Pair[e[2], k[1]] + 
@@ -2736,23 +2725,32 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
            4*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - Pair[e[2], k[3]])*
             Pair[ec[5], k[4]] - Pair[e[1], e[2]]*((-MH2 + S + 2*T24 + U)*
               Pair[ec[4], ec[5]] + 4*(-(Pair[ec[4], k[5]]*Pair[ec[5], 
-                  k[2]]) + Pair[ec[4], k[2]]*Pair[ec[5], k[4]])))) - 
+                  k[2]]) + Pair[ec[4], k[2]]*Pair[ec[5], k[4]])))) + 
        8*(D0i[dd00, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, MT2, MT2, 
-           MT2]*(-((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 
-                3*Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*(
-                Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]]) + 
+           MT2]*((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 3*Pair[e[2], k[3]] - 
+               2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*(Pair[e[2], k[3]] - 2*
+                Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 
            2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[5]]*
-            Pair[ec[4], k[5]] - 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
-             2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] - 
+            Pair[ec[4], k[5]] + 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
+             2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] + 
            2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[4]] + 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
-             2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] - Pair[e[1], e[2]]*
+            Pair[ec[5], k[4]] - 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
+             2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] + Pair[e[1], e[2]]*
             ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
              4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
-                Pair[ec[5], k[4]]))) + D0i[dd00, 0, MH2, MH2 - S34 - T14 - 
-            T24, 0, U, S, MT2, MT2, MT2, MT2]*
-          (-(Pair[e[2], k[1]]*((Pair[e[1], k[4]] - Pair[e[1], k[5]])*Pair[
-                ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 
+                Pair[ec[5], k[4]]))) + 
+         (D0i[dd001, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, MT2, MT2, 
+            MT2] + D0i[dd001, 0, MH2 - S34 - T14 - T24, MH2, 0, T, S, MT2, 
+            MT2, MT2, MT2])*(2*Pair[e[1], k[2]]*
+            ((Pair[e[2], k[4]] - Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
+             2*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 2*Pair[e[2], ec[4]]*
+              Pair[ec[5], k[4]]) - Pair[e[1], e[2]]*
+            ((-MH2 + S + 2*T24 + U)*Pair[ec[4], ec[5]] + 
+             4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[2]]) + Pair[ec[4], k[2]]*
+                Pair[ec[5], k[4]])))) - 
+       8*(D0i[dd00, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, MT2, MT2, 
+           MT2]*(-(Pair[e[2], k[1]]*((Pair[e[1], k[4]] - Pair[e[1], k[5]])*
+               Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 
               2*Pair[e[1], ec[4]]*Pair[ec[5], k[4]])) - Pair[e[1], e[2]]*
             ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
              4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
@@ -3248,15 +3246,6 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
             Pair[ec[5], k[4]] - 8*(Pair[e[2], k[4]] + Pair[e[2], k[5]])*
             (Pair[ec[4], k[5]]*Pair[ec[5], k[2]] - Pair[ec[4], k[2]]*
               Pair[ec[5], k[4]]))) + 
-       8*(D0i[dd001, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, MT2, MT2, 
-          MT2] + D0i[dd001, 0, MH2 - S34 - T14 - T24, MH2, 0, T, S, MT2, MT2, 
-          MT2, MT2])*(2*Pair[e[1], k[2]]*
-          ((Pair[e[2], k[4]] - Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
-           2*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 2*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[4]]) - Pair[e[1], e[2]]*
-          ((-MH2 + S + 2*T24 + U)*Pair[ec[4], ec[5]] + 
-           4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[2]]) + Pair[ec[4], k[2]]*
-              Pair[ec[5], k[4]]))) + 
        4*(D0i[dd13, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, MT2, MT2, 
            MT2]*(-(((-MH2 + T)*Pair[e[1], k[2]]*Pair[e[2], k[1]] + 
               2*(MH2 - T)*Pair[e[1], k[5]]*Pair[e[2], k[1]] + 
@@ -3410,23 +3399,32 @@ Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}},
            4*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - Pair[e[2], k[3]])*
             Pair[ec[5], k[4]] - Pair[e[1], e[2]]*((-MH2 + S + 2*T24 + U)*
               Pair[ec[4], ec[5]] + 4*(-(Pair[ec[4], k[5]]*Pair[ec[5], 
-                  k[2]]) + Pair[ec[4], k[2]]*Pair[ec[5], k[4]])))) - 
+                  k[2]]) + Pair[ec[4], k[2]]*Pair[ec[5], k[4]])))) + 
        8*(D0i[dd00, MH2, 0, MH2 - S34 - T14 - T24, 0, U, T, MT2, MT2, MT2, 
-           MT2]*(-((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 
-                3*Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*(
-                Pair[e[2], k[3]] - 2*Pair[e[2], k[4]]))*Pair[ec[4], ec[5]]) + 
+           MT2]*((Pair[e[1], k[4]]*(2*Pair[e[2], k[1]] - 3*Pair[e[2], k[3]] - 
+               2*Pair[e[2], k[4]]) + Pair[e[1], k[5]]*(Pair[e[2], k[3]] - 2*
+                Pair[e[2], k[4]]))*Pair[ec[4], ec[5]] - 
            2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[5]]*
-            Pair[ec[4], k[5]] - 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
-             2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] - 
+            Pair[ec[4], k[5]] + 2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - 
+             2*Pair[e[2], k[3]])*Pair[ec[4], k[5]] + 
            2*(Pair[e[1], k[2]] - Pair[e[1], k[3]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[4]] + 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
-             2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] - Pair[e[1], e[2]]*
+            Pair[ec[5], k[4]] - 2*Pair[e[1], ec[4]]*(Pair[e[2], k[1]] - 
+             2*Pair[e[2], k[3]])*Pair[ec[5], k[4]] + Pair[e[1], e[2]]*
             ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
              4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
-                Pair[ec[5], k[4]]))) + D0i[dd00, 0, MH2, MH2 - S34 - T14 - 
-            T24, 0, U, S, MT2, MT2, MT2, MT2]*
-          (-(Pair[e[2], k[1]]*((Pair[e[1], k[4]] - Pair[e[1], k[5]])*Pair[
-                ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 
+                Pair[ec[5], k[4]]))) + 
+         (D0i[dd001, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, MT2, MT2, 
+            MT2] + D0i[dd001, 0, MH2 - S34 - T14 - T24, MH2, 0, T, S, MT2, 
+            MT2, MT2, MT2])*(2*Pair[e[1], k[2]]*
+            ((Pair[e[2], k[4]] - Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
+             2*Pair[e[2], ec[5]]*Pair[ec[4], k[5]] - 2*Pair[e[2], ec[4]]*
+              Pair[ec[5], k[4]]) - Pair[e[1], e[2]]*
+            ((-MH2 + S + 2*T24 + U)*Pair[ec[4], ec[5]] + 
+             4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[2]]) + Pair[ec[4], k[2]]*
+                Pair[ec[5], k[4]])))) - 
+       8*(D0i[dd00, 0, MH2, MH2 - S34 - T14 - T24, 0, U, S, MT2, MT2, MT2, 
+           MT2]*(-(Pair[e[2], k[1]]*((Pair[e[1], k[4]] - Pair[e[1], k[5]])*
+               Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[ec[4], k[5]] - 
               2*Pair[e[1], ec[4]]*Pair[ec[5], k[4]])) - Pair[e[1], e[2]]*
             ((-MH2 + S + T + 2*T14)*Pair[ec[4], ec[5]] + 
              4*(-(Pair[ec[4], k[5]]*Pair[ec[5], k[1]]) + Pair[ec[4], k[1]]*
diff --git a/feynamps/ggHgg_box_test_2diags.m b/feynamps/ggHgg_box_test_2diags.m
new file mode 100644
index 00000000..eddf52ea
--- /dev/null
+++ b/feynamps/ggHgg_box_test_2diags.m
@@ -0,0 +1,1265 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+Den[MH2 - S - T24 - U, 0]*Mat[SUNT[Glu1, Glu4, Glu2, Glu5, 0, 0]]*
+  ((-4*Alfas2*EL*MT2*C0i[cc1, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     Pair[e[1], k[4]]*(2*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      Pair[e[2], ec[5]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]]) + 
+      2*Pair[e[2], ec[4]]*Pair[ec[5], k[2]]))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*C0i[cc2, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+       (2*Pair[e[1], k[2]]*Pair[ec[4], k[2]] - 2*Pair[e[1], k[5]]*
+         Pair[ec[4], k[5]] - Pair[e[1], k[4]]*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) + 2*Pair[e[1], k[3]]*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]])*Pair[ec[5], k[2]]))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd133, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+     ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+      4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd233, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[1]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd222, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (Alfas2*EL*MT2*D0i[dd3, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*((MH2 - T)*(MH2 - 2*S - T - T14)*Pair[e[1], ec[4]]*
+       Pair[e[2], ec[5]] + 2*(-MH2 + 2*S + T + T14)*Pair[e[1], k[3]]*
+       Pair[e[2], ec[5]]*Pair[ec[4], k[1]] + 4*(MH2 - T)*Pair[e[1], ec[4]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]]) - 8*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd22, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]] - 
+      Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(2*S34*Pair[ec[4], k[1]] + 
+          (5*MH2 + 3*S - 7*S34 - 5*T24 - 5*U)*Pair[ec[4], k[3]] - 
+          4*S34*Pair[ec[4], k[5]]) + Pair[e[1], k[5]]*
+         (-2*S34*Pair[ec[4], k[1]] + (-3*MH2 - 5*S + 5*S34 + 3*T24 + 3*U)*
+           Pair[ec[4], k[3]] + 4*S34*Pair[ec[4], k[5]])) - 
+      4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
+      16*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd223, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - 
+        Pair[e[1], k[5]])*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[3]]) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (2*Pair[ec[4], k[1]] + Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd23, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-2*(MH2 - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
+      Pair[e[2], ec[5]]*(-(Pair[e[1], k[5]]*(4*S*Pair[ec[4], k[1]] + 
+           (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+           2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) + Pair[e[1], k[2]]*
+         (2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) - 2*(MH2 - T - T14)*
+       (Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+      8*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*(2*Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(2*Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] - 
+          2*Pair[ec[4], k[5]])) + 2*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]) + 
+        ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]))*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd002, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(4*Pair[e[2], k[5]]*
+       ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], ec[5]] + 
+        Pair[e[1], ec[5]]*Pair[ec[4], k[3]]) - 2*Pair[e[2], ec[5]]*
+       (Pair[e[1], k[2]]*(Pair[ec[4], k[1]] + 2*Pair[ec[4], k[2]]) + 
+        Pair[e[1], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[5]])) + 
+      4*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+        Pair[e[1], e[2]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+      Pair[e[1], ec[4]]*((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd003, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[ec[4], k[1]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[e[2], ec[5]] - 
+        2*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+           Pair[ec[5], k[2]])) + Pair[e[1], ec[4]]*
+       ((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd13, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(2*(-MH2 + T)*Pair[e[1], k[2]]*
+         Pair[ec[4], k[1]] + (MH2 - T)*Pair[e[1], k[4]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[3]]*((-2*MH2 + 4*S + 2*T + 3*T14)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[2]] + (-MH2 + 4*S + T + T14)*
+           Pair[ec[4], k[3]])) + 2*(MH2 - T)*Pair[ec[4], k[1]]*
+       (Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+         Pair[ec[5], k[2]]) - 2*Pair[e[1], k[3]]*
+       ((-MH2 + T + T14)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (-MH2 + T + T14)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        4*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd111, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[3]]*
+     ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+      4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         Pair[ec[5], k[3]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd001, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[e[2], ec[5]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) + 
+      4*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 4*Pair[e[1], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd113, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*
+     (Pair[e[2], ec[5]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+        (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) + 
+      4*((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd11, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*
+       (-((MH2 - T)*(2*Pair[e[1], k[2]] - Pair[e[1], k[4]])*
+          Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + 2*(MH2 + S34)*Pair[ec[4], k[2]] + 
+          (-8*MH2 - 2*S + 3*S34 + 3*T + 2*T24 + 6*U)*Pair[ec[4], k[3]])) + 
+      2*(MH2 - T)*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 2*Pair[e[1], k[3]]*
+       ((MH2 + S34)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (MH2 + S34)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+        4*Pair[ec[4], k[3]]*((Pair[e[2], k[1]] + Pair[e[2], k[3]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + 
+            Pair[ec[5], k[3]])))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd123, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
+       (Pair[e[1], k[4]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+          (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 2*S - S34 + T14 - 2*U)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[3]])) + 
+      4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]) + (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         ((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]])))))/(MW*SW) - 
+   (Alfas2*EL*MT2*C0i[cc0, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
+        (2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) - 
+      4*(Pair[e[2], k[5]]*((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*
+           Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + 
+        ((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*Pair[ec[4], k[1]])*Pair[ec[5], k[2]]) + 
+      Pair[e[1], ec[4]]*((-2*S + S34 - T + 2*T24)*Pair[e[2], ec[5]] + 
+        4*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))))/
+    (MW*SW) + (8*Alfas2*EL*MT2*D0i[dd112, MH2, 0, MH2 - S - T24 - U, 0, S34, 
+      T, MT2, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-7*MH2 + 4*S34 + 3*T + T14 + 2*T24 + 6*U)*Pair[e[1], k[3]] + 
+        (-2*MH2 + S34 + T + 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], k[3]]*
+         (3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[4]]*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(3*Pair[ec[5], k[3]] + 
+            Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd122, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-4*S + S34 - T - 2*T14 + 2*U)*Pair[e[1], k[3]] - 
+        (MH2 + 2*S - S34 + T14 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          2*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (3*Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd12, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+       Pair[ec[4], k[3]] + Pair[e[2], ec[5]]*
+       (2*(-2*MH2 + 2*T + T14)*Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[4]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (7*MH2 - 7*S34 - 2*T - T14 - 4*T24 - 8*U)*Pair[ec[4], k[3]] - 
+          2*(MH2 + S34)*Pair[ec[4], k[5]]) + Pair[e[1], k[3]]*
+         ((MH2 + 3*S34)*Pair[ec[4], k[1]] + (19*MH2 - 17*S34 - 6*T - 5*T14 - 
+            12*T24 - 16*U)*Pair[ec[4], k[3]] - 2*(MH2 + 3*S34)*
+           Pair[ec[4], k[5]])) + 2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], e[2]]*Pair[ec[4], k[3]]*
+       Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+       (Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(4*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          3*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (4*Pair[ec[5], k[3]] + 3*Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (Alfas2*EL*MT2*D0i[dd2, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
+         (4*S34*Pair[ec[4], k[1]] + 6*(-MH2 + T + T14)*Pair[ec[4], k[3]]) - 
+        2*Pair[e[1], k[3]]*((2*S34 + T24)*Pair[ec[4], k[1]] + 
+          (MH2 + S34 - T14)*Pair[ec[4], k[2]] + (-9*MH2 + 4*S34 + 4*T + 
+            4*T14 + 4*T24 + 5*U)*Pair[ec[4], k[3]]) - Pair[e[1], k[4]]*
+         (2*(MH2 + S34 - U)*Pair[ec[4], k[1]] + 2*(S34 + T)*
+           Pair[ec[4], k[2]] + (-17*MH2 + 8*S34 + 7*T + 7*T14 + 8*T24 + 10*U)*
+           Pair[ec[4], k[3]])) - 
+      4*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - (S34 + T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]]) + (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - 
+          (S34 + T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        Pair[e[1], e[2]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[e[2], k[5]]*
+             Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]]) + 
+          (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           ((4*Pair[e[2], k[1]]*Pair[ec[4], k[3]] + Pair[e[2], k[3]]*(
+                -Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(-(Pair[ec[4], k[1]]*Pair[ec[5], k[3]]) + 
+              Pair[ec[4], k[3]]*(4*Pair[ec[5], k[1]] + Pair[ec[5], 
+                 k[3]]))))) + Pair[e[1], ec[4]]*
+       (-((MH2^2 + 4*S*S34 + 3*S34*T + S34*T14 + 2*T*T24 - 
+           MH2*(3*S34 + T - T14 + 2*T24) - 2*T14*U)*Pair[e[2], ec[5]]) + 
+        4*((2*S34*Pair[e[2], k[1]] + T14*Pair[e[2], k[3]] + 
+            (MH2 - T)*Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(2*S34*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (Alfas2*EL*MT2*D0i[dd0, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
+         Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+         (Pair[e[1], k[4]]*((-MH2 + U)*Pair[ec[4], k[1]] + 
+            (MH2 - T)*Pair[ec[4], k[2]] + S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[3]]*(-((S34 + T24)*Pair[ec[4], k[1]]) + 
+            T14*Pair[ec[4], k[2]] + 2*S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[2]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+            (-2*MH2 + 2*T + T14)*Pair[ec[4], k[3]])) + 
+        (T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           ((Pair[e[2], k[4]]*Pair[ec[4], k[1]] + 2*Pair[e[2], k[1]]*Pair[
+                ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+             (2*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]]))))))/(MW*SW) - 
+   (2*Alfas2*EL*MT2*D0i[dd1, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[4]]*
+         (-2*(MH2 - U)*Pair[ec[4], k[1]] + 2*(MH2 - T)*Pair[ec[4], k[2]] + 
+          (MH2 + 2*S - T)*Pair[ec[4], k[3]]) + 2*Pair[e[1], k[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 3*S34 + 2*T24)*Pair[ec[4], k[1]] + 2*(MH2 + S34 - T14)*
+           Pair[ec[4], k[2]] + 2*(-3*MH2 - 3*S + S34 + T + T24 + 2*U)*
+           Pair[ec[4], k[3]])) + Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 3*T + T14)*Pair[ec[4], k[3]]) + 
+        (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           (((3*Pair[e[2], k[1]] + 2*Pair[e[2], k[3]])*Pair[ec[4], k[3]] + 
+              Pair[e[2], k[4]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*
+             Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]] + Pair[ec[4], k[3]]*(3*Pair[ec[5], k[1]] + 
+                2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])))))))/(MW*SW)) + 
+ Den[MH2 - S - T24 - U, 0]*Mat[SUNT[Glu1, Glu5, Glu2, Glu4, 0, 0]]*
+  ((-4*Alfas2*EL*MT2*C0i[cc1, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     Pair[e[1], k[4]]*(2*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      Pair[e[2], ec[5]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]]) + 
+      2*Pair[e[2], ec[4]]*Pair[ec[5], k[2]]))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*C0i[cc2, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+       (2*Pair[e[1], k[2]]*Pair[ec[4], k[2]] - 2*Pair[e[1], k[5]]*
+         Pair[ec[4], k[5]] - Pair[e[1], k[4]]*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) + 2*Pair[e[1], k[3]]*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]])*Pair[ec[5], k[2]]))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd133, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+     ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+      4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd233, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[1]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd222, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (Alfas2*EL*MT2*D0i[dd3, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*((MH2 - T)*(MH2 - 2*S - T - T14)*Pair[e[1], ec[4]]*
+       Pair[e[2], ec[5]] + 2*(-MH2 + 2*S + T + T14)*Pair[e[1], k[3]]*
+       Pair[e[2], ec[5]]*Pair[ec[4], k[1]] + 4*(MH2 - T)*Pair[e[1], ec[4]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]]) - 8*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd22, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]] - 
+      Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(2*S34*Pair[ec[4], k[1]] + 
+          (5*MH2 + 3*S - 7*S34 - 5*T24 - 5*U)*Pair[ec[4], k[3]] - 
+          4*S34*Pair[ec[4], k[5]]) + Pair[e[1], k[5]]*
+         (-2*S34*Pair[ec[4], k[1]] + (-3*MH2 - 5*S + 5*S34 + 3*T24 + 3*U)*
+           Pair[ec[4], k[3]] + 4*S34*Pair[ec[4], k[5]])) - 
+      4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
+      16*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd223, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - 
+        Pair[e[1], k[5]])*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[3]]) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (2*Pair[ec[4], k[1]] + Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd23, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-2*(MH2 - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
+      Pair[e[2], ec[5]]*(-(Pair[e[1], k[5]]*(4*S*Pair[ec[4], k[1]] + 
+           (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+           2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) + Pair[e[1], k[2]]*
+         (2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) - 2*(MH2 - T - T14)*
+       (Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+      8*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*(2*Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(2*Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] - 
+          2*Pair[ec[4], k[5]])) + 2*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]) + 
+        ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]))*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd002, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(4*Pair[e[2], k[5]]*
+       ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], ec[5]] + 
+        Pair[e[1], ec[5]]*Pair[ec[4], k[3]]) - 2*Pair[e[2], ec[5]]*
+       (Pair[e[1], k[2]]*(Pair[ec[4], k[1]] + 2*Pair[ec[4], k[2]]) + 
+        Pair[e[1], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[5]])) + 
+      4*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+        Pair[e[1], e[2]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+      Pair[e[1], ec[4]]*((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd003, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[ec[4], k[1]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[e[2], ec[5]] - 
+        2*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+           Pair[ec[5], k[2]])) + Pair[e[1], ec[4]]*
+       ((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd13, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(2*(-MH2 + T)*Pair[e[1], k[2]]*
+         Pair[ec[4], k[1]] + (MH2 - T)*Pair[e[1], k[4]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[3]]*((-2*MH2 + 4*S + 2*T + 3*T14)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[2]] + (-MH2 + 4*S + T + T14)*
+           Pair[ec[4], k[3]])) + 2*(MH2 - T)*Pair[ec[4], k[1]]*
+       (Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+         Pair[ec[5], k[2]]) - 2*Pair[e[1], k[3]]*
+       ((-MH2 + T + T14)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (-MH2 + T + T14)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        4*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd111, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[3]]*
+     ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+      4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         Pair[ec[5], k[3]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd001, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[e[2], ec[5]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) + 
+      4*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 4*Pair[e[1], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd113, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*
+     (Pair[e[2], ec[5]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+        (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) + 
+      4*((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd11, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*
+       (-((MH2 - T)*(2*Pair[e[1], k[2]] - Pair[e[1], k[4]])*
+          Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + 2*(MH2 + S34)*Pair[ec[4], k[2]] + 
+          (-8*MH2 - 2*S + 3*S34 + 3*T + 2*T24 + 6*U)*Pair[ec[4], k[3]])) + 
+      2*(MH2 - T)*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 2*Pair[e[1], k[3]]*
+       ((MH2 + S34)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (MH2 + S34)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+        4*Pair[ec[4], k[3]]*((Pair[e[2], k[1]] + Pair[e[2], k[3]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + 
+            Pair[ec[5], k[3]])))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd123, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
+       (Pair[e[1], k[4]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+          (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 2*S - S34 + T14 - 2*U)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[3]])) + 
+      4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]) + (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         ((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]])))))/(MW*SW) - 
+   (Alfas2*EL*MT2*C0i[cc0, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
+        (2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) - 
+      4*(Pair[e[2], k[5]]*((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*
+           Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + 
+        ((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*Pair[ec[4], k[1]])*Pair[ec[5], k[2]]) + 
+      Pair[e[1], ec[4]]*((-2*S + S34 - T + 2*T24)*Pair[e[2], ec[5]] + 
+        4*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))))/
+    (MW*SW) + (8*Alfas2*EL*MT2*D0i[dd112, MH2, 0, MH2 - S - T24 - U, 0, S34, 
+      T, MT2, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-7*MH2 + 4*S34 + 3*T + T14 + 2*T24 + 6*U)*Pair[e[1], k[3]] + 
+        (-2*MH2 + S34 + T + 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], k[3]]*
+         (3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[4]]*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(3*Pair[ec[5], k[3]] + 
+            Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd122, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-4*S + S34 - T - 2*T14 + 2*U)*Pair[e[1], k[3]] - 
+        (MH2 + 2*S - S34 + T14 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          2*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (3*Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd12, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+       Pair[ec[4], k[3]] + Pair[e[2], ec[5]]*
+       (2*(-2*MH2 + 2*T + T14)*Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[4]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (7*MH2 - 7*S34 - 2*T - T14 - 4*T24 - 8*U)*Pair[ec[4], k[3]] - 
+          2*(MH2 + S34)*Pair[ec[4], k[5]]) + Pair[e[1], k[3]]*
+         ((MH2 + 3*S34)*Pair[ec[4], k[1]] + (19*MH2 - 17*S34 - 6*T - 5*T14 - 
+            12*T24 - 16*U)*Pair[ec[4], k[3]] - 2*(MH2 + 3*S34)*
+           Pair[ec[4], k[5]])) + 2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], e[2]]*Pair[ec[4], k[3]]*
+       Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+       (Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(4*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          3*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (4*Pair[ec[5], k[3]] + 3*Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (Alfas2*EL*MT2*D0i[dd2, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
+         (4*S34*Pair[ec[4], k[1]] + 6*(-MH2 + T + T14)*Pair[ec[4], k[3]]) - 
+        2*Pair[e[1], k[3]]*((2*S34 + T24)*Pair[ec[4], k[1]] + 
+          (MH2 + S34 - T14)*Pair[ec[4], k[2]] + (-9*MH2 + 4*S34 + 4*T + 
+            4*T14 + 4*T24 + 5*U)*Pair[ec[4], k[3]]) - Pair[e[1], k[4]]*
+         (2*(MH2 + S34 - U)*Pair[ec[4], k[1]] + 2*(S34 + T)*
+           Pair[ec[4], k[2]] + (-17*MH2 + 8*S34 + 7*T + 7*T14 + 8*T24 + 10*U)*
+           Pair[ec[4], k[3]])) - 
+      4*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - (S34 + T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]]) + (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - 
+          (S34 + T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        Pair[e[1], e[2]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[e[2], k[5]]*
+             Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]]) + 
+          (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           ((4*Pair[e[2], k[1]]*Pair[ec[4], k[3]] + Pair[e[2], k[3]]*(
+                -Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(-(Pair[ec[4], k[1]]*Pair[ec[5], k[3]]) + 
+              Pair[ec[4], k[3]]*(4*Pair[ec[5], k[1]] + Pair[ec[5], 
+                 k[3]]))))) + Pair[e[1], ec[4]]*
+       (-((MH2^2 + 4*S*S34 + 3*S34*T + S34*T14 + 2*T*T24 - 
+           MH2*(3*S34 + T - T14 + 2*T24) - 2*T14*U)*Pair[e[2], ec[5]]) + 
+        4*((2*S34*Pair[e[2], k[1]] + T14*Pair[e[2], k[3]] + 
+            (MH2 - T)*Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(2*S34*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (Alfas2*EL*MT2*D0i[dd0, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
+         Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+         (Pair[e[1], k[4]]*((-MH2 + U)*Pair[ec[4], k[1]] + 
+            (MH2 - T)*Pair[ec[4], k[2]] + S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[3]]*(-((S34 + T24)*Pair[ec[4], k[1]]) + 
+            T14*Pair[ec[4], k[2]] + 2*S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[2]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+            (-2*MH2 + 2*T + T14)*Pair[ec[4], k[3]])) + 
+        (T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           ((Pair[e[2], k[4]]*Pair[ec[4], k[1]] + 2*Pair[e[2], k[1]]*Pair[
+                ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+             (2*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]]))))))/(MW*SW) - 
+   (2*Alfas2*EL*MT2*D0i[dd1, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[4]]*
+         (-2*(MH2 - U)*Pair[ec[4], k[1]] + 2*(MH2 - T)*Pair[ec[4], k[2]] + 
+          (MH2 + 2*S - T)*Pair[ec[4], k[3]]) + 2*Pair[e[1], k[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 3*S34 + 2*T24)*Pair[ec[4], k[1]] + 2*(MH2 + S34 - T14)*
+           Pair[ec[4], k[2]] + 2*(-3*MH2 - 3*S + S34 + T + T24 + 2*U)*
+           Pair[ec[4], k[3]])) + Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 3*T + T14)*Pair[ec[4], k[3]]) + 
+        (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           (((3*Pair[e[2], k[1]] + 2*Pair[e[2], k[3]])*Pair[ec[4], k[3]] + 
+              Pair[e[2], k[4]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*
+             Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]] + Pair[ec[4], k[3]]*(3*Pair[ec[5], k[1]] + 
+                2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])))))))/(MW*SW)) + 
+ Den[MH2 - S - T24 - U, 0]*Mat[SUNT[Glu1, Glu2, Glu5, Glu4, 0, 0]]*
+  ((4*Alfas2*EL*MT2*C0i[cc1, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     Pair[e[1], k[4]]*(2*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      Pair[e[2], ec[5]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]]) + 
+      2*Pair[e[2], ec[4]]*Pair[ec[5], k[2]]))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*C0i[cc2, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+       (2*Pair[e[1], k[2]]*Pair[ec[4], k[2]] - 2*Pair[e[1], k[5]]*
+         Pair[ec[4], k[5]] - Pair[e[1], k[4]]*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) + 2*Pair[e[1], k[3]]*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]])*Pair[ec[5], k[2]]))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd133, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+     ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+      4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd233, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[1]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd222, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (Alfas2*EL*MT2*D0i[dd3, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*((MH2 - T)*(MH2 - 2*S - T - T14)*Pair[e[1], ec[4]]*
+       Pair[e[2], ec[5]] + 2*(-MH2 + 2*S + T + T14)*Pair[e[1], k[3]]*
+       Pair[e[2], ec[5]]*Pair[ec[4], k[1]] + 4*(MH2 - T)*Pair[e[1], ec[4]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]]) - 8*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd22, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]] - 
+      Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(2*S34*Pair[ec[4], k[1]] + 
+          (5*MH2 + 3*S - 7*S34 - 5*T24 - 5*U)*Pair[ec[4], k[3]] - 
+          4*S34*Pair[ec[4], k[5]]) + Pair[e[1], k[5]]*
+         (-2*S34*Pair[ec[4], k[1]] + (-3*MH2 - 5*S + 5*S34 + 3*T24 + 3*U)*
+           Pair[ec[4], k[3]] + 4*S34*Pair[ec[4], k[5]])) - 
+      4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
+      16*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd223, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - 
+        Pair[e[1], k[5]])*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[3]]) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (2*Pair[ec[4], k[1]] + Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd23, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-2*(MH2 - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
+      Pair[e[2], ec[5]]*(-(Pair[e[1], k[5]]*(4*S*Pair[ec[4], k[1]] + 
+           (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+           2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) + Pair[e[1], k[2]]*
+         (2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) - 2*(MH2 - T - T14)*
+       (Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+      8*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*(2*Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(2*Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] - 
+          2*Pair[ec[4], k[5]])) + 2*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]) + 
+        ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]))*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd002, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(4*Pair[e[2], k[5]]*
+       ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], ec[5]] + 
+        Pair[e[1], ec[5]]*Pair[ec[4], k[3]]) - 2*Pair[e[2], ec[5]]*
+       (Pair[e[1], k[2]]*(Pair[ec[4], k[1]] + 2*Pair[ec[4], k[2]]) + 
+        Pair[e[1], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[5]])) + 
+      4*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+        Pair[e[1], e[2]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+      Pair[e[1], ec[4]]*((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd003, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[ec[4], k[1]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[e[2], ec[5]] - 
+        2*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+           Pair[ec[5], k[2]])) + Pair[e[1], ec[4]]*
+       ((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd13, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(2*(-MH2 + T)*Pair[e[1], k[2]]*
+         Pair[ec[4], k[1]] + (MH2 - T)*Pair[e[1], k[4]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[3]]*((-2*MH2 + 4*S + 2*T + 3*T14)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[2]] + (-MH2 + 4*S + T + T14)*
+           Pair[ec[4], k[3]])) + 2*(MH2 - T)*Pair[ec[4], k[1]]*
+       (Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+         Pair[ec[5], k[2]]) - 2*Pair[e[1], k[3]]*
+       ((-MH2 + T + T14)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (-MH2 + T + T14)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        4*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd111, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[3]]*
+     ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+      4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         Pair[ec[5], k[3]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd001, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[e[2], ec[5]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) + 
+      4*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 4*Pair[e[1], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd113, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*
+     (Pair[e[2], ec[5]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+        (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) + 
+      4*((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd11, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*
+       (-((MH2 - T)*(2*Pair[e[1], k[2]] - Pair[e[1], k[4]])*
+          Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + 2*(MH2 + S34)*Pair[ec[4], k[2]] + 
+          (-8*MH2 - 2*S + 3*S34 + 3*T + 2*T24 + 6*U)*Pair[ec[4], k[3]])) + 
+      2*(MH2 - T)*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 2*Pair[e[1], k[3]]*
+       ((MH2 + S34)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (MH2 + S34)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+        4*Pair[ec[4], k[3]]*((Pair[e[2], k[1]] + Pair[e[2], k[3]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + 
+            Pair[ec[5], k[3]])))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd123, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
+       (Pair[e[1], k[4]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+          (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 2*S - S34 + T14 - 2*U)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[3]])) + 
+      4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]) + (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         ((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]])))))/(MW*SW) + 
+   (Alfas2*EL*MT2*C0i[cc0, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
+        (2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) - 
+      4*(Pair[e[2], k[5]]*((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*
+           Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + 
+        ((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*Pair[ec[4], k[1]])*Pair[ec[5], k[2]]) + 
+      Pair[e[1], ec[4]]*((-2*S + S34 - T + 2*T24)*Pair[e[2], ec[5]] + 
+        4*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))))/
+    (MW*SW) - (8*Alfas2*EL*MT2*D0i[dd112, MH2, 0, MH2 - S - T24 - U, 0, S34, 
+      T, MT2, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-7*MH2 + 4*S34 + 3*T + T14 + 2*T24 + 6*U)*Pair[e[1], k[3]] + 
+        (-2*MH2 + S34 + T + 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], k[3]]*
+         (3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[4]]*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(3*Pair[ec[5], k[3]] + 
+            Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd122, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-4*S + S34 - T - 2*T14 + 2*U)*Pair[e[1], k[3]] - 
+        (MH2 + 2*S - S34 + T14 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          2*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (3*Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd12, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+       Pair[ec[4], k[3]] + Pair[e[2], ec[5]]*
+       (2*(-2*MH2 + 2*T + T14)*Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[4]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (7*MH2 - 7*S34 - 2*T - T14 - 4*T24 - 8*U)*Pair[ec[4], k[3]] - 
+          2*(MH2 + S34)*Pair[ec[4], k[5]]) + Pair[e[1], k[3]]*
+         ((MH2 + 3*S34)*Pair[ec[4], k[1]] + (19*MH2 - 17*S34 - 6*T - 5*T14 - 
+            12*T24 - 16*U)*Pair[ec[4], k[3]] - 2*(MH2 + 3*S34)*
+           Pair[ec[4], k[5]])) + 2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], e[2]]*Pair[ec[4], k[3]]*
+       Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+       (Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(4*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          3*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (4*Pair[ec[5], k[3]] + 3*Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (Alfas2*EL*MT2*D0i[dd2, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
+         (4*S34*Pair[ec[4], k[1]] + 6*(-MH2 + T + T14)*Pair[ec[4], k[3]]) - 
+        2*Pair[e[1], k[3]]*((2*S34 + T24)*Pair[ec[4], k[1]] + 
+          (MH2 + S34 - T14)*Pair[ec[4], k[2]] + (-9*MH2 + 4*S34 + 4*T + 
+            4*T14 + 4*T24 + 5*U)*Pair[ec[4], k[3]]) - Pair[e[1], k[4]]*
+         (2*(MH2 + S34 - U)*Pair[ec[4], k[1]] + 2*(S34 + T)*
+           Pair[ec[4], k[2]] + (-17*MH2 + 8*S34 + 7*T + 7*T14 + 8*T24 + 10*U)*
+           Pair[ec[4], k[3]])) - 
+      4*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - (S34 + T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]]) + (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - 
+          (S34 + T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        Pair[e[1], e[2]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[e[2], k[5]]*
+             Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]]) + 
+          (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           ((4*Pair[e[2], k[1]]*Pair[ec[4], k[3]] + Pair[e[2], k[3]]*(
+                -Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(-(Pair[ec[4], k[1]]*Pair[ec[5], k[3]]) + 
+              Pair[ec[4], k[3]]*(4*Pair[ec[5], k[1]] + Pair[ec[5], 
+                 k[3]]))))) + Pair[e[1], ec[4]]*
+       (-((MH2^2 + 4*S*S34 + 3*S34*T + S34*T14 + 2*T*T24 - 
+           MH2*(3*S34 + T - T14 + 2*T24) - 2*T14*U)*Pair[e[2], ec[5]]) + 
+        4*((2*S34*Pair[e[2], k[1]] + T14*Pair[e[2], k[3]] + 
+            (MH2 - T)*Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(2*S34*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (Alfas2*EL*MT2*D0i[dd0, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
+         Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+         (Pair[e[1], k[4]]*((-MH2 + U)*Pair[ec[4], k[1]] + 
+            (MH2 - T)*Pair[ec[4], k[2]] + S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[3]]*(-((S34 + T24)*Pair[ec[4], k[1]]) + 
+            T14*Pair[ec[4], k[2]] + 2*S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[2]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+            (-2*MH2 + 2*T + T14)*Pair[ec[4], k[3]])) + 
+        (T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           ((Pair[e[2], k[4]]*Pair[ec[4], k[1]] + 2*Pair[e[2], k[1]]*Pair[
+                ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+             (2*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]]))))))/(MW*SW) + 
+   (2*Alfas2*EL*MT2*D0i[dd1, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[4]]*
+         (-2*(MH2 - U)*Pair[ec[4], k[1]] + 2*(MH2 - T)*Pair[ec[4], k[2]] + 
+          (MH2 + 2*S - T)*Pair[ec[4], k[3]]) + 2*Pair[e[1], k[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 3*S34 + 2*T24)*Pair[ec[4], k[1]] + 2*(MH2 + S34 - T14)*
+           Pair[ec[4], k[2]] + 2*(-3*MH2 - 3*S + S34 + T + T24 + 2*U)*
+           Pair[ec[4], k[3]])) + Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 3*T + T14)*Pair[ec[4], k[3]]) + 
+        (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           (((3*Pair[e[2], k[1]] + 2*Pair[e[2], k[3]])*Pair[ec[4], k[3]] + 
+              Pair[e[2], k[4]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*
+             Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]] + Pair[ec[4], k[3]]*(3*Pair[ec[5], k[1]] + 
+                2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])))))))/(MW*SW)) + 
+ Den[MH2 - S - T24 - U, 0]*Mat[SUNT[Glu1, Glu4, Glu5, Glu2, 0, 0]]*
+  ((4*Alfas2*EL*MT2*C0i[cc1, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     Pair[e[1], k[4]]*(2*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      Pair[e[2], ec[5]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]]) + 
+      2*Pair[e[2], ec[4]]*Pair[ec[5], k[2]]))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*C0i[cc2, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+       (2*Pair[e[1], k[2]]*Pair[ec[4], k[2]] - 2*Pair[e[1], k[5]]*
+         Pair[ec[4], k[5]] - Pair[e[1], k[4]]*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) + 2*Pair[e[1], k[3]]*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+        Pair[ec[4], k[3]])*Pair[ec[5], k[2]]))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd133, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+     ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+      4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd233, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[1]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd222, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     ((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], ec[5]] + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (Alfas2*EL*MT2*D0i[dd3, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*((MH2 - T)*(MH2 - 2*S - T - T14)*Pair[e[1], ec[4]]*
+       Pair[e[2], ec[5]] + 2*(-MH2 + 2*S + T + T14)*Pair[e[1], k[3]]*
+       Pair[e[2], ec[5]]*Pair[ec[4], k[1]] + 4*(MH2 - T)*Pair[e[1], ec[4]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]]) - 8*Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd22, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[3]] - 
+      Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(2*S34*Pair[ec[4], k[1]] + 
+          (5*MH2 + 3*S - 7*S34 - 5*T24 - 5*U)*Pair[ec[4], k[3]] - 
+          4*S34*Pair[ec[4], k[5]]) + Pair[e[1], k[5]]*
+         (-2*S34*Pair[ec[4], k[1]] + (-3*MH2 - 5*S + 5*S34 + 3*T24 + 3*U)*
+           Pair[ec[4], k[3]] + 4*S34*Pair[ec[4], k[5]])) - 
+      4*S34*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[3]]*Pair[ec[5], k[2]] + 
+      16*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd223, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*((MH2 - 2*S - T - T14)*(Pair[e[1], k[2]] - 
+        Pair[e[1], k[5]])*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[3]]) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       (2*Pair[ec[4], k[1]] + Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) - 
+   (4*Alfas2*EL*MT2*D0i[dd23, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(-2*(MH2 - T - T14)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+       Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*(-MH2 + T + T14)*
+       Pair[e[1], ec[5]]*Pair[e[2], k[5]]*Pair[ec[4], k[1]] - 
+      Pair[e[2], ec[5]]*(-(Pair[e[1], k[5]]*(4*S*Pair[ec[4], k[1]] + 
+           (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+           2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) + Pair[e[1], k[2]]*
+         (2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 4*S + 3*(T + T14))*Pair[ec[4], k[3]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[5]])) - 2*(MH2 - T - T14)*
+       (Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
+       Pair[ec[5], k[2]] + 2*(-MH2 + T + T14)*Pair[e[1], e[2]]*
+       Pair[ec[4], k[1]]*Pair[ec[5], k[2]] + 
+      8*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*(2*Pair[ec[4], k[1]] + 
+        Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*
+       (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+         Pair[ec[5], k[2]])))/(MW*SW) + 
+   (8*Alfas2*EL*MT2*D0i[dd00, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(2*Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] - 
+          2*Pair[ec[4], k[5]])) + 2*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]) + 
+        ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[3]]))*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd002, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(4*Pair[e[2], k[5]]*
+       ((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[ec[4], ec[5]] + 
+        Pair[e[1], ec[5]]*Pair[ec[4], k[3]]) - 2*Pair[e[2], ec[5]]*
+       (Pair[e[1], k[2]]*(Pair[ec[4], k[1]] + 2*Pair[ec[4], k[2]]) + 
+        Pair[e[1], k[5]]*(Pair[ec[4], k[1]] - 2*Pair[ec[4], k[5]])) + 
+      4*((Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]] + 
+        Pair[e[1], e[2]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+      Pair[e[1], ec[4]]*((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd003, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[ec[4], k[1]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[e[2], ec[5]] - 
+        2*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+           Pair[ec[5], k[2]])) + Pair[e[1], ec[4]]*
+       ((MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd13, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(2*(-MH2 + T)*Pair[e[1], k[2]]*
+         Pair[ec[4], k[1]] + (MH2 - T)*Pair[e[1], k[4]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[3]]*((-2*MH2 + 4*S + 2*T + 3*T14)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + T + T14)*Pair[ec[4], k[2]] + (-MH2 + 4*S + T + T14)*
+           Pair[ec[4], k[3]])) + 2*(MH2 - T)*Pair[ec[4], k[1]]*
+       (Pair[e[1], ec[5]]*Pair[e[2], k[5]] + Pair[e[1], e[2]]*
+         Pair[ec[5], k[2]]) - 2*Pair[e[1], k[3]]*
+       ((-MH2 + T + T14)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (-MH2 + T + T14)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        4*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd111, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*Pair[ec[4], k[3]]*
+     ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+      4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         Pair[ec[5], k[3]])))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd001, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(-2*Pair[e[2], ec[5]]*
+       ((Pair[e[1], k[2]] + Pair[e[1], k[5]])*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) + 
+      4*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 4*Pair[e[1], k[3]]*
+       (Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
+       ((-2*MH2 + S34 + T + 2*U)*Pair[e[2], ec[5]] + 
+        4*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd113, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[e[1], k[3]]*
+     (Pair[e[2], ec[5]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+        (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) + 
+      4*((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+         (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+           Pair[ec[5], k[3]]))))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd11, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*
+       (-((MH2 - T)*(2*Pair[e[1], k[2]] - Pair[e[1], k[4]])*
+          Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + 2*(MH2 + S34)*Pair[ec[4], k[2]] + 
+          (-8*MH2 - 2*S + 3*S34 + 3*T + 2*T24 + 6*U)*Pair[ec[4], k[3]])) + 
+      2*(MH2 - T)*Pair[ec[4], k[3]]*(Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[5], k[2]]) + 2*Pair[e[1], k[3]]*
+       ((MH2 + S34)*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 
+        (MH2 + S34)*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+        4*Pair[ec[4], k[3]]*((Pair[e[2], k[1]] + Pair[e[2], k[3]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + 
+            Pair[ec[5], k[3]])))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd123, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*(Pair[e[2], ec[5]]*
+       (Pair[e[1], k[4]]*((-2*MH2 + S34 + T + 2*U)*Pair[ec[4], k[1]] + 
+          (MH2 - 2*S - T - T14)*Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 2*S - S34 + T14 - 2*U)*Pair[ec[4], k[1]] + 
+          2*(-MH2 + 2*S + T + T14)*Pair[ec[4], k[3]])) + 
+      4*(Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])*
+         (Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[5], k[2]]) + (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+         ((Pair[e[2], k[3]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]])))))/(MW*SW) + 
+   (Alfas2*EL*MT2*C0i[cc0, 0, MH2 - S - T24 - U, T, MT2, MT2, MT2]*
+     (2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+        Pair[e[1], k[5]]*Pair[ec[4], k[1]] + 
+        (2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*(Pair[ec[4], k[2]] + 
+          Pair[ec[4], k[5]])) - 
+      4*(Pair[e[2], k[5]]*((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*
+           Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[ec[4], k[1]]) + 
+        ((2*Pair[e[1], k[3]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
+          Pair[e[1], e[2]]*Pair[ec[4], k[1]])*Pair[ec[5], k[2]]) + 
+      Pair[e[1], ec[4]]*((-2*S + S34 - T + 2*T24)*Pair[e[2], ec[5]] + 
+        4*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]])))))/
+    (MW*SW) - (8*Alfas2*EL*MT2*D0i[dd112, MH2, 0, MH2 - S - T24 - U, 0, S34, 
+      T, MT2, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-7*MH2 + 4*S34 + 3*T + T14 + 2*T24 + 6*U)*Pair[e[1], k[3]] + 
+        (-2*MH2 + S34 + T + 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], k[3]]*
+         (3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[4]]*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(3*Pair[ec[5], k[3]] + 
+            Pair[ec[5], k[4]])))))/(MW*SW) - 
+   (8*Alfas2*EL*MT2*D0i[dd122, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, 
+      MT2, MT2, MT2]*Pair[ec[4], k[3]]*
+     (((-4*S + S34 - T - 2*T14 + 2*U)*Pair[e[1], k[3]] - 
+        (MH2 + 2*S - S34 + T14 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+      4*(Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(3*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          2*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (3*Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (4*Alfas2*EL*MT2*D0i[dd12, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+       Pair[ec[4], k[3]] + Pair[e[2], ec[5]]*
+       (2*(-2*MH2 + 2*T + T14)*Pair[e[1], k[5]]*Pair[ec[4], k[3]] + 
+        Pair[e[1], k[4]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (7*MH2 - 7*S34 - 2*T - T14 - 4*T24 - 8*U)*Pair[ec[4], k[3]] - 
+          2*(MH2 + S34)*Pair[ec[4], k[5]]) + Pair[e[1], k[3]]*
+         ((MH2 + 3*S34)*Pair[ec[4], k[1]] + (19*MH2 - 17*S34 - 6*T - 5*T14 - 
+            12*T24 - 16*U)*Pair[ec[4], k[3]] - 2*(MH2 + 3*S34)*
+           Pair[ec[4], k[5]])) + 2*((MH2 + 3*S34)*Pair[e[1], k[3]] + 
+        (MH2 + S34)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
+      2*(-2*MH2 + 2*T + T14)*Pair[e[1], e[2]]*Pair[ec[4], k[3]]*
+       Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+       (Pair[e[1], k[4]]*(2*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])) + 
+        Pair[e[1], k[3]]*(4*Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+          3*Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           (4*Pair[ec[5], k[3]] + 3*Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (Alfas2*EL*MT2*D0i[dd2, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
+         (4*S34*Pair[ec[4], k[1]] + 6*(-MH2 + T + T14)*Pair[ec[4], k[3]]) - 
+        2*Pair[e[1], k[3]]*((2*S34 + T24)*Pair[ec[4], k[1]] + 
+          (MH2 + S34 - T14)*Pair[ec[4], k[2]] + (-9*MH2 + 4*S34 + 4*T + 
+            4*T14 + 4*T24 + 5*U)*Pair[ec[4], k[3]]) - Pair[e[1], k[4]]*
+         (2*(MH2 + S34 - U)*Pair[ec[4], k[1]] + 2*(S34 + T)*
+           Pair[ec[4], k[2]] + (-17*MH2 + 8*S34 + 7*T + 7*T14 + 8*T24 + 10*U)*
+           Pair[ec[4], k[3]])) - 
+      4*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - (S34 + T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]]) + (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) - 
+          (S34 + T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 
+        Pair[e[1], e[2]]*(2*S34*Pair[ec[4], k[1]] + 3*(-MH2 + T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[e[2], k[5]]*
+             Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]]) + 
+          (Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           ((4*Pair[e[2], k[1]]*Pair[ec[4], k[3]] + Pair[e[2], k[3]]*(
+                -Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(-(Pair[ec[4], k[1]]*Pair[ec[5], k[3]]) + 
+              Pair[ec[4], k[3]]*(4*Pair[ec[5], k[1]] + Pair[ec[5], 
+                 k[3]]))))) + Pair[e[1], ec[4]]*
+       (-((MH2^2 + 4*S*S34 + 3*S34*T + S34*T14 + 2*T*T24 - 
+           MH2*(3*S34 + T - T14 + 2*T24) - 2*T14*U)*Pair[e[2], ec[5]]) + 
+        4*((2*S34*Pair[e[2], k[1]] + T14*Pair[e[2], k[3]] + 
+            (MH2 - T)*Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
+          Pair[e[2], k[5]]*(2*S34*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]])))))/(MW*SW) + 
+   (Alfas2*EL*MT2*D0i[dd0, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
+         Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
+         (Pair[e[1], k[4]]*((-MH2 + U)*Pair[ec[4], k[1]] + 
+            (MH2 - T)*Pair[ec[4], k[2]] + S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[3]]*(-((S34 + T24)*Pair[ec[4], k[1]]) + 
+            T14*Pair[ec[4], k[2]] + 2*S*Pair[ec[4], k[3]]) + 
+          Pair[e[1], k[2]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+            (-2*MH2 + 2*T + T14)*Pair[ec[4], k[3]])) + 
+        (T14*Pair[e[1], k[3]] + (MH2 - T)*Pair[e[1], k[4]])*Pair[e[2], ec[4]]*
+         Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-2*MH2 + 2*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           ((Pair[e[2], k[4]]*Pair[ec[4], k[1]] + 2*Pair[e[2], k[1]]*Pair[
+                ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+             (2*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]]))))))/(MW*SW) + 
+   (2*Alfas2*EL*MT2*D0i[dd1, MH2, 0, MH2 - S - T24 - U, 0, S34, T, MT2, MT2, 
+      MT2, MT2]*(Pair[e[2], ec[5]]*(Pair[e[1], k[4]]*
+         (-2*(MH2 - U)*Pair[ec[4], k[1]] + 2*(MH2 - T)*Pair[ec[4], k[2]] + 
+          (MH2 + 2*S - T)*Pair[ec[4], k[3]]) + 2*Pair[e[1], k[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]]) - Pair[e[1], k[3]]*
+         ((MH2 + 3*S34 + 2*T24)*Pair[ec[4], k[1]] + 2*(MH2 + S34 - T14)*
+           Pair[ec[4], k[2]] + 2*(-3*MH2 - 3*S + S34 + T + T24 + 2*U)*
+           Pair[ec[4], k[3]])) + Pair[e[1], ec[4]]*
+       (-((S*S34 + S34*T + MH2*(S - S34 + T14 - T24) + T*T24 - T14*U)*
+          Pair[e[2], ec[5]]) + 2*(((MH2 + S34)*Pair[e[2], k[1]] + 
+            T14*Pair[e[2], k[3]] + (MH2 - T)*Pair[e[2], k[4]])*
+           Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+           ((MH2 + S34)*Pair[ec[5], k[1]] + T14*Pair[ec[5], k[3]] + 
+            (MH2 - T)*Pair[ec[5], k[4]]))) - 
+      2*((-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+         Pair[e[2], k[5]]*((MH2 + S34)*Pair[ec[4], k[1]] + 
+          (-3*MH2 + 3*T + T14)*Pair[ec[4], k[3]]) + 
+        (-((MH2 + S34 - T14)*Pair[e[1], k[3]]) + (MH2 - T)*Pair[e[1], k[4]])*
+         Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+         ((MH2 + S34)*Pair[ec[4], k[1]] + (-3*MH2 + 3*T + T14)*
+           Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+        2*(Pair[e[1], k[4]]*((-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + 
+              Pair[e[2], k[1]]*Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+            Pair[e[2], k[5]]*(Pair[ec[4], k[3]]*Pair[ec[5], k[1]] - 
+              Pair[ec[4], k[1]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
+           (((3*Pair[e[2], k[1]] + 2*Pair[e[2], k[3]])*Pair[ec[4], k[3]] + 
+              Pair[e[2], k[4]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]]))*
+             Pair[ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[4]] + Pair[ec[4], k[3]]*(3*Pair[ec[5], k[1]] + 
+                2*Pair[ec[5], k[3]] + Pair[ec[5], k[4]])))))))/(MW*SW))
diff --git a/feynamps/ggHgg_triangle_FeynAmp_38diags.m b/feynamps/ggHgg_triangle_FeynAmp_38diags.m
index 53428c6d..79b3fb5f 100644
--- a/feynamps/ggHgg_triangle_FeynAmp_38diags.m
+++ b/feynamps/ggHgg_triangle_FeynAmp_38diags.m
@@ -1810,24 +1810,24 @@
               Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*Pair[
                 ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*
                  Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))))))/(MW*SW) + 
+                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))))))/(MW*SW) - 
  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu2, Glu5, Glu4, 0, 0]]*
    (Den[T, 0]*((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, 
-          MT2])*(2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) + 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+          MT2])*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) - 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
        (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
          Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
          ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
            Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
          ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
-           Pair[ec[5], k[1]])) + 16*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])) - 16*Pair[e[1], k[3]]*
        (C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*(Pair[e[2], k[1]]*
            Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*Pair[ec[4], k[1]] - 
           2*Pair[e[2], ec[4]]*Pair[ec[5], k[1]]) + 
         C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*(Pair[e[2], k[3]]*
            Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 
-          2*Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + 
+          2*Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) - 
       4*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
        (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*(Pair[e[2], k[1]] + 
             Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
@@ -1836,9 +1836,9 @@
          ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
            (Pair[ec[5], k[1]] + Pair[ec[5], k[3]])))) + 
     Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, 
-          MT2, MT2])*(2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) + 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
+          MT2, MT2])*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[e[1], ec[4]] + 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[4]])*Pair[ec[4], k[3]]) - 
         2*Pair[e[1], ec[5]]*((-MH2 + S34)*Pair[e[2], ec[4]] + 
@@ -1846,18 +1846,18 @@
         Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], ec[5]] + 
           2*Pair[ec[4], k[3]]*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]]))) + 
       Pair[ec[4], k[3]]*(-16*C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
-         (-(Pair[e[1], k[3]]*Pair[e[2], ec[5]]) + 2*Pair[e[1], ec[5]]*
-           Pair[e[2], k[3]] - Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + 
+         (Pair[e[1], k[3]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[3]] + Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + 
         16*C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
-         (-(Pair[e[1], k[4]]*Pair[e[2], ec[5]]) + 2*Pair[e[1], ec[5]]*
-           Pair[e[2], k[4]] - Pair[e[1], e[2]]*Pair[ec[5], k[4]])) - 
+         (Pair[e[1], k[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[4]] + Pair[e[1], e[2]]*Pair[ec[5], k[4]])) + 
       2*C0i[cc0, MH2, S34, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[5]]*((MH2 - S34)*Pair[e[1], ec[4]] + 
           2*Pair[e[1], k[4]]*Pair[ec[4], k[3]]) - 2*Pair[e[1], ec[5]]*
          ((MH2 - S34)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[4]]*
            Pair[ec[4], k[3]]) + Pair[e[1], e[2]]*
          ((MH2 - S34)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
-           Pair[ec[5], k[4]])) + Den[S, 0]*
+           Pair[ec[5], k[4]])) - Den[S, 0]*
        ((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
             MT2])*((-T - T14 + T24 + U)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] - 
           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
@@ -1938,28 +1938,28 @@
                 (T - T14 - T24 - U)*Pair[ec[5], k[4]])))))) + 
     Den[2*MH2 - S34 - T - U, 0]*((4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
         16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
-       (2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
-         Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
-      16*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
-         (2*Pair[e[1], k[3]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
-           Pair[e[2], k[3]] - Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
-        C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+       (-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+         Pair[e[2], ec[5]] + Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+      (-16*C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+         (-2*Pair[e[1], k[3]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+           Pair[e[2], k[3]] + Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
+        16*C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-2*Pair[e[1], k[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
            Pair[e[2], k[5]] + Pair[e[1], e[2]]*Pair[ec[4], k[5]]))*
-       Pair[ec[5], k[3]] + 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
+       Pair[ec[5], k[3]] - 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
         MT2]*(2*Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] - 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[5]])*Pair[ec[5], k[3]]) - 
         Pair[e[1], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] - 
           2*(Pair[e[2], k[3]] - Pair[e[2], k[5]])*Pair[ec[5], k[3]]) - 
         Pair[e[1], e[2]]*((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] - 
-          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) + 
+          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) - 
       2*C0i[cc0, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
        (2*Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] + 
           2*Pair[e[1], k[5]]*Pair[ec[5], k[3]]) - Pair[e[1], ec[4]]*
          ((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[5]]*
            Pair[ec[5], k[3]]) - Pair[e[1], e[2]]*
          ((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
-           Pair[ec[5], k[3]])) + Den[S, 0]*
+           Pair[ec[5], k[3]])) - Den[S, 0]*
        (-8*(C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (2*(MH2 + S - 2*S34 - T14 - T24)*Pair[e[1], k[2]]*
              Pair[e[2], ec[4]] + 2*(-MH2 - S + 2*S34 + T14 + T24)*
@@ -1980,8 +1980,19 @@
                 ec[4], k[3]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], 
                 k[5]] + Pair[e[1], k[2]]*(-(Pair[e[2], k[5]]*Pair[ec[4], 
                    k[3]]) + Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[3]]) + (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+           Pair[ec[5], k[3]]) + 4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         ((-T14 + T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
+          4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+             Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 4*Pair[e[1], k[2]]*
+           Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) - 
+          4*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
+            Pair[ec[4], k[2]]) - Pair[e[1], e[2]]*
+           (Pair[ec[4], k[1]]*(4*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]) + 
+            Pair[ec[4], k[2]]*(-4*Pair[ec[5], k[1]] + Pair[ec[5], k[3]])) - 
+          2*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*(Pair[ec[5], k[3]] + 
+            2*Pair[ec[5], k[4]]) + 2*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+           (Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          ((-T14 + T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
              Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 4*Pair[e[1], k[2]]*
@@ -2035,7 +2046,7 @@
              (-((MH2 - S34 - T - U)*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
                  Pair[ec[4], k[2]])) + Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + 
                   T24)*Pair[ec[5], k[3]] + (MH2 - S34 - T - U)*Pair[ec[5], 
-                  k[4]]))))) + Den[T14, 0]*
+                  k[4]]))))) - Den[T14, 0]*
        (8*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (-2*(MH2 - S34 - T + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
             Pair[e[1], ec[4]]*((MH2 - 3*S34 + T + U)*Pair[e[2], k[1]] + 
@@ -2055,8 +2066,18 @@
                 Pair[ec[4], k[1]]) + Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
                 ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[e[2], k[5]]*
                  Pair[ec[4], k[3]] - Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[3]]) + (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+           Pair[ec[5], k[3]]) + 4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
+             (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
+              Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
+            Pair[e[1], k[4]]*(2*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[
+                ec[4], ec[5]] + Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - 
+                Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
+           ((-S + T24)*Pair[e[2], ec[5]] + Pair[e[2], k[4]]*
+             (-4*Pair[ec[5], k[1]] + Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*
+             (Pair[ec[5], k[3]] + 4*Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
               Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
              (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
@@ -2108,7 +2129,7 @@
               Pair[e[2], k[4]]*(2*(MH2 - S34 - T - U)*Pair[ec[5], k[1]] + 
                 (-2*MH2 + S + 2*S34 + T24 + 2*U)*Pair[ec[5], k[3]]) + 
               Pair[e[2], k[1]]*((-2*MH2 + S + 2*T + T24 + 2*U)*Pair[ec[5], 
-                  k[3]] + 2*(-MH2 + S34 + T + U)*Pair[ec[5], k[4]])))))) + 
+                  k[3]] + 2*(-MH2 + S34 + T + U)*Pair[ec[5], k[4]])))))) - 
     Den[MH2 - S34 - T14 - T24, 0]*
      (Den[S, 0]*(-2*C0i[cc1, MH2, MH2 - S34 - T14 - T24, S, MT2, MT2, MT2]*
          ((-2*S34*T - T^2 + 4*T*T24 + 2*S*(T - U) + 
@@ -2281,30 +2302,31 @@
                 Pair[ec[4], k[2]]*Pair[ec[5], k[4]]) - (Pair[e[2], k[4]] + 
                 Pair[e[2], k[5]])*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] - 
                 Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))))) + 
-    Den[U, 0]*(2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
+    Den[U, 0]*(4*B0i[bb0, U, MT2, MT2]*(-2*Pair[e[1], ec[5]]*
+         Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
+      2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
        (((-MH2 + U)*Pair[e[1], e[2]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]])*
          Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
          ((-MH2 + U)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[3]]*
            Pair[ec[4], k[2]]) + Pair[e[1], ec[4]]*
          ((-MH2 + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[3]]*
-           Pair[ec[5], k[2]])) - 16*(C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
-         (2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
-           Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
-        Pair[e[2], k[3]]*(C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*
-           (-(Pair[e[1], k[2]]*Pair[ec[4], ec[5]]) + 2*Pair[e[1], ec[5]]*
-             Pair[ec[4], k[2]] - Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
-          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
-           (-(Pair[e[1], k[3]]*Pair[ec[4], ec[5]]) + 2*Pair[e[1], ec[5]]*
-             Pair[ec[4], k[3]] - Pair[e[1], ec[4]]*Pair[ec[5], k[3]]))) + 
-      4*(B0i[bb0, U, MT2, MT2]*(2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - 
-          Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
-           Pair[ec[4], ec[5]]) + C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
-         (((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
-              Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
-          2*Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) + 
-          Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]])))) + 
+           Pair[ec[5], k[2]])) - 4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
+            Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
+        2*Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) + 
+        Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) - 
+      16*(C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*(-2*Pair[e[1], ec[5]]*
+           Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 
+          Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + Pair[e[2], k[3]]*
+         (C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*(Pair[e[1], k[2]]*
+             Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*Pair[ec[4], k[2]] + 
+            Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
+          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*(Pair[e[1], k[3]]*
+             Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + 
+            Pair[e[1], ec[4]]*Pair[ec[5], k[3]]))) - 
       Den[T14, 0]*(-2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
          (Pair[e[1], ec[4]]*((S - S34 + T - T24)*(MH2 - U)*
              Pair[e[2], ec[5]] + 2*(2*(MH2 - U)*Pair[e[2], k[4]]*Pair[ec[5], 
@@ -2381,7 +2403,7 @@
                 3*U)*Pair[ec[5], k[1]] + 4*(-2*MH2 + 2*S34 + T14 + 2*T24 + 
                 U)*Pair[ec[5], k[3]] + (7*MH2 - 8*T - 2*T14 - 3*U)*Pair[
                 ec[5], k[4]]) + 4*(MH2 - U)*(Pair[e[2], k[4]]*Pair[ec[5], 
-                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) - 
+                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) + 
       Den[MH2 - S34 - T14 - T24, 0]*((4*B0i[bb0, U, MT2, MT2] - 
           16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2])*
          ((Pair[e[1], k[4]]*(Pair[e[2], k[3]] + 4*Pair[e[2], k[5]]) + 
@@ -2454,102 +2476,79 @@
                 Pair[ec[4], k[2]]*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*(
                 -(Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) + Pair[ec[4], k[3]]*
                  Pair[ec[5], k[4]])))))) + Den[MH2 - S - T24 - U, 0]*
-     (-(Den[S34, 0]*(4*B0i[bb0, S34, MT2, MT2]*
-          (4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
-           MT2]*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) + 
-         8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
-            (-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - (MH2 - 2*S + S34 + 
-                  2*T24 - 2*U)*Pair[e[1], k[3]] + (-3*MH2 + S34 + 4*U)*
-                 Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, 
-             MT2]*Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], 
-                 k[2]] + (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - 
-                 S34 + 2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
-           MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
-                 Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
-                  k[3]]))) + Pair[e[1], ec[4]]*
-            ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
-             4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], 
-                 k[1]]*Pair[ec[5], k[2]])) + 
-           2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
-               (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
-             2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
-              (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
-           MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
-              Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*
-                Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
-           2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[1]] + 2*T14*Pair[ec[4], 
-                   k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*Pair[ec[4], 
-                   k[2]] + 2*T24*Pair[ec[4], k[3]]) + Pair[e[1], k[4]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[2]] + (MH2 + S - S34 + T24 - U)*
-                  Pair[ec[4], k[3]])) + 2*(MH2 - S34)*(Pair[e[1], k[2]] - 
-               Pair[e[1], k[5]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
-             2*Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))))) + 
-      Den[T, 0]*(4*B0i[bb0, T, MT2, MT2]*(Pair[e[2], ec[5]]*
-           (-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 4*Pair[e[1], k[2]]*
-             Pair[ec[4], k[5]] - Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + 
-              Pair[ec[4], k[5]])) - 
-          2*((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
-             Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-             (Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) + 
-            ((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
-              2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[3]]))*
-             Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
-           ((-MH2 + S34 + T14 + 2*T24)*Pair[e[2], ec[5]] + 
-            4*(Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[
-                ec[5], k[4]]))) - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+     (Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, 
+            MT2, MT2, MT2])*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[5]]*(2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - 
+          Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + 
+              Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 
+              4*Pair[ec[4], k[5]])) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*
+           (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+          Pair[e[1], ec[4]]*((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+            4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[
+                ec[5], k[2]]))) + 8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - 
+               (MH2 - 2*S + S34 + 2*T24 - 2*U)*Pair[e[1], k[3]] + 
+               (-3*MH2 + S34 + 4*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], k[2]] + 
+              (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - S34 + 
+                2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
+          MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
+                Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
+                 k[3]]))) + Pair[e[1], ec[4]]*
+           ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+            4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + 
+              Pair[e[2], k[1]]*Pair[ec[5], k[2]])) + 
+          2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+              (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+             (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
+               Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+             (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
+          MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
+             Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], 
+                k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
+          2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
+              T14*Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*
+             (Pair[e[1], k[2]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+                2*T14*Pair[ec[4], k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*
+                 Pair[ec[4], k[2]] + 2*T24*Pair[ec[4], k[3]]) + 
+              Pair[e[1], k[4]]*(-2*(MH2 - S34)*Pair[ec[4], k[2]] + 
+                (MH2 + S - S34 + T24 - U)*Pair[ec[4], k[3]])) + 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*
+             ((-MH2 + S34)*Pair[ec[4], k[1]] + T14*Pair[ec[4], k[3]])*
+             Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*(-(Pair[e[1], k[4]]*
+                (Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                  Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(Pair[e[2], k[4]]*
+                 Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[ec[5], 
+                  k[4]]))))) - Den[T, 0]*
+       ((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
          (Pair[e[2], ec[5]]*(-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 
             4*Pair[e[1], k[2]]*Pair[ec[4], k[5]] - Pair[e[1], k[3]]*
              (Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) - 
@@ -2623,7 +2622,7 @@
               Pair[e[2], k[3]]*(Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*Pair[
                 ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[2]]*
                  Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) - 
+                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) + 
       Den[T14, 0]*(-4*(C0i[cc11, MH2, MH2 - S - T24 - U, T14, MT2, MT2, MT2]*
            (-((S34 - T)*(-2*MH2 + S34 + T + 2*U)*Pair[e[1], ec[4]]*
               Pair[e[2], ec[5]]) - 4*(2*MH2 - S34 - T - 2*U)*
@@ -2717,24 +2716,24 @@
             Pair[e[1], ec[4]]*((2*S - S34 + T - 2*T24)*Pair[e[2], ec[5]] - 
               4*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
                 Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], 
-                   k[4]])))))))))/(MW*SW) + 
+                   k[4]])))))))))/(MW*SW) - 
  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu4, Glu5, Glu2, 0, 0]]*
    (Den[T, 0]*((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, 
-          MT2])*(2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) + 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+          MT2])*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) - 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
        (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
          Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
          ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
            Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
          ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
-           Pair[ec[5], k[1]])) + 16*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])) - 16*Pair[e[1], k[3]]*
        (C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*(Pair[e[2], k[1]]*
            Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*Pair[ec[4], k[1]] - 
           2*Pair[e[2], ec[4]]*Pair[ec[5], k[1]]) + 
         C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*(Pair[e[2], k[3]]*
            Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 
-          2*Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + 
+          2*Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) - 
       4*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
        (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*(Pair[e[2], k[1]] + 
             Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
@@ -2743,9 +2742,9 @@
          ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
            (Pair[ec[5], k[1]] + Pair[ec[5], k[3]])))) + 
     Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, 
-          MT2, MT2])*(2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) + 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
+          MT2, MT2])*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[e[1], ec[4]] + 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[4]])*Pair[ec[4], k[3]]) - 
         2*Pair[e[1], ec[5]]*((-MH2 + S34)*Pair[e[2], ec[4]] + 
@@ -2753,18 +2752,18 @@
         Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], ec[5]] + 
           2*Pair[ec[4], k[3]]*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]]))) + 
       Pair[ec[4], k[3]]*(-16*C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
-         (-(Pair[e[1], k[3]]*Pair[e[2], ec[5]]) + 2*Pair[e[1], ec[5]]*
-           Pair[e[2], k[3]] - Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + 
+         (Pair[e[1], k[3]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[3]] + Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + 
         16*C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
-         (-(Pair[e[1], k[4]]*Pair[e[2], ec[5]]) + 2*Pair[e[1], ec[5]]*
-           Pair[e[2], k[4]] - Pair[e[1], e[2]]*Pair[ec[5], k[4]])) - 
+         (Pair[e[1], k[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[4]] + Pair[e[1], e[2]]*Pair[ec[5], k[4]])) + 
       2*C0i[cc0, MH2, S34, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[5]]*((MH2 - S34)*Pair[e[1], ec[4]] + 
           2*Pair[e[1], k[4]]*Pair[ec[4], k[3]]) - 2*Pair[e[1], ec[5]]*
          ((MH2 - S34)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[4]]*
            Pair[ec[4], k[3]]) + Pair[e[1], e[2]]*
          ((MH2 - S34)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
-           Pair[ec[5], k[4]])) + Den[S, 0]*
+           Pair[ec[5], k[4]])) - Den[S, 0]*
        ((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
             MT2])*((-T - T14 + T24 + U)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] - 
           4*(-(Pair[e[1], k[5]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
@@ -2845,28 +2844,28 @@
                 (T - T14 - T24 - U)*Pair[ec[5], k[4]])))))) + 
     Den[2*MH2 - S34 - T - U, 0]*((4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
         16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
-       (2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
-         Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
-      16*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
-         (2*Pair[e[1], k[3]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
-           Pair[e[2], k[3]] - Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
-        C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+       (-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+         Pair[e[2], ec[5]] + Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+      (-16*C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+         (-2*Pair[e[1], k[3]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+           Pair[e[2], k[3]] + Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
+        16*C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-2*Pair[e[1], k[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
            Pair[e[2], k[5]] + Pair[e[1], e[2]]*Pair[ec[4], k[5]]))*
-       Pair[ec[5], k[3]] + 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
+       Pair[ec[5], k[3]] - 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
         MT2]*(2*Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] - 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[5]])*Pair[ec[5], k[3]]) - 
         Pair[e[1], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] - 
           2*(Pair[e[2], k[3]] - Pair[e[2], k[5]])*Pair[ec[5], k[3]]) - 
         Pair[e[1], e[2]]*((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] - 
-          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) + 
+          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) - 
       2*C0i[cc0, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
        (2*Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] + 
           2*Pair[e[1], k[5]]*Pair[ec[5], k[3]]) - Pair[e[1], ec[4]]*
          ((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[5]]*
            Pair[ec[5], k[3]]) - Pair[e[1], e[2]]*
          ((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
-           Pair[ec[5], k[3]])) + Den[S, 0]*
+           Pair[ec[5], k[3]])) - Den[S, 0]*
        (-8*(C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (2*(MH2 + S - 2*S34 - T14 - T24)*Pair[e[1], k[2]]*
              Pair[e[2], ec[4]] + 2*(-MH2 - S + 2*S34 + T14 + T24)*
@@ -2887,8 +2886,19 @@
                 ec[4], k[3]] - Pair[e[1], k[3]]*Pair[e[2], k[1]]*Pair[ec[4], 
                 k[5]] + Pair[e[1], k[2]]*(-(Pair[e[2], k[5]]*Pair[ec[4], 
                    k[3]]) + Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[3]]) + (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+           Pair[ec[5], k[3]]) + 4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         ((-T14 + T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
+          4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+             Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 4*Pair[e[1], k[2]]*
+           Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[2]]) - 
+          4*Pair[e[1], ec[5]]*Pair[e[2], k[1]]*(Pair[ec[4], k[1]] + 
+            Pair[ec[4], k[2]]) - Pair[e[1], e[2]]*
+           (Pair[ec[4], k[1]]*(4*Pair[ec[5], k[2]] - Pair[ec[5], k[3]]) + 
+            Pair[ec[4], k[2]]*(-4*Pair[ec[5], k[1]] + Pair[ec[5], k[3]])) - 
+          2*Pair[e[1], k[2]]*Pair[e[2], ec[4]]*(Pair[ec[5], k[3]] + 
+            2*Pair[ec[5], k[4]]) + 2*Pair[e[1], ec[4]]*Pair[e[2], k[1]]*
+           (Pair[ec[5], k[3]] + 2*Pair[ec[5], k[4]])) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          ((-T14 + T24)*Pair[e[1], e[2]]*Pair[ec[4], ec[5]] + 
           4*(-(Pair[e[1], k[4]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
              Pair[e[2], k[4]])*Pair[ec[4], ec[5]] + 4*Pair[e[1], k[2]]*
@@ -2942,7 +2952,7 @@
              (-((MH2 - S34 - T - U)*Pair[e[2], ec[5]]*(Pair[ec[4], k[1]] + 
                  Pair[ec[4], k[2]])) + Pair[e[2], ec[4]]*((-MH2 + S34 + T14 + 
                   T24)*Pair[ec[5], k[3]] + (MH2 - S34 - T - U)*Pair[ec[5], 
-                  k[4]]))))) + Den[T14, 0]*
+                  k[4]]))))) - Den[T14, 0]*
        (8*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (-2*(MH2 - S34 - T + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
             Pair[e[1], ec[4]]*((MH2 - 3*S34 + T + U)*Pair[e[2], k[1]] + 
@@ -2962,8 +2972,18 @@
                 Pair[ec[4], k[1]]) + Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
                 ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[e[2], k[5]]*
                  Pair[ec[4], k[3]] - Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[3]]) + (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+           Pair[ec[5], k[3]]) + 4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
+             (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
+              Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
+            Pair[e[1], k[4]]*(2*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[
+                ec[4], ec[5]] + Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - 
+                Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
+           ((-S + T24)*Pair[e[2], ec[5]] + Pair[e[2], k[4]]*
+             (-4*Pair[ec[5], k[1]] + Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*
+             (Pair[ec[5], k[3]] + 4*Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
               Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
              (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
@@ -3015,7 +3035,7 @@
               Pair[e[2], k[4]]*(2*(MH2 - S34 - T - U)*Pair[ec[5], k[1]] + 
                 (-2*MH2 + S + 2*S34 + T24 + 2*U)*Pair[ec[5], k[3]]) + 
               Pair[e[2], k[1]]*((-2*MH2 + S + 2*T + T24 + 2*U)*Pair[ec[5], 
-                  k[3]] + 2*(-MH2 + S34 + T + U)*Pair[ec[5], k[4]])))))) + 
+                  k[3]] + 2*(-MH2 + S34 + T + U)*Pair[ec[5], k[4]])))))) - 
     Den[MH2 - S34 - T14 - T24, 0]*
      (Den[S, 0]*(-2*C0i[cc1, MH2, MH2 - S34 - T14 - T24, S, MT2, MT2, MT2]*
          ((-2*S34*T - T^2 + 4*T*T24 + 2*S*(T - U) + 
@@ -3188,30 +3208,31 @@
                 Pair[ec[4], k[2]]*Pair[ec[5], k[4]]) - (Pair[e[2], k[4]] + 
                 Pair[e[2], k[5]])*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] - 
                 Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))))) + 
-    Den[U, 0]*(2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
+    Den[U, 0]*(4*B0i[bb0, U, MT2, MT2]*(-2*Pair[e[1], ec[5]]*
+         Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 
+        Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
+      2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
        (((-MH2 + U)*Pair[e[1], e[2]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]])*
          Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
          ((-MH2 + U)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[3]]*
            Pair[ec[4], k[2]]) + Pair[e[1], ec[4]]*
          ((-MH2 + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[3]]*
-           Pair[ec[5], k[2]])) - 16*(C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
-         (2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
-           Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
-        Pair[e[2], k[3]]*(C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*
-           (-(Pair[e[1], k[2]]*Pair[ec[4], ec[5]]) + 2*Pair[e[1], ec[5]]*
-             Pair[ec[4], k[2]] - Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
-          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
-           (-(Pair[e[1], k[3]]*Pair[ec[4], ec[5]]) + 2*Pair[e[1], ec[5]]*
-             Pair[ec[4], k[3]] - Pair[e[1], ec[4]]*Pair[ec[5], k[3]]))) + 
-      4*(B0i[bb0, U, MT2, MT2]*(2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] - 
-          Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
-           Pair[ec[4], ec[5]]) + C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
-         (((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
-              Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
-          2*Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) + 
-          Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]])))) + 
+           Pair[ec[5], k[2]])) - 4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
+            Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
+        2*Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) + 
+        Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) - 
+      16*(C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*(-2*Pair[e[1], ec[5]]*
+           Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 
+          Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + Pair[e[2], k[3]]*
+         (C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*(Pair[e[1], k[2]]*
+             Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*Pair[ec[4], k[2]] + 
+            Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
+          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*(Pair[e[1], k[3]]*
+             Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + 
+            Pair[e[1], ec[4]]*Pair[ec[5], k[3]]))) - 
       Den[T14, 0]*(-2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
          (Pair[e[1], ec[4]]*((S - S34 + T - T24)*(MH2 - U)*
              Pair[e[2], ec[5]] + 2*(2*(MH2 - U)*Pair[e[2], k[4]]*Pair[ec[5], 
@@ -3288,7 +3309,7 @@
                 3*U)*Pair[ec[5], k[1]] + 4*(-2*MH2 + 2*S34 + T14 + 2*T24 + 
                 U)*Pair[ec[5], k[3]] + (7*MH2 - 8*T - 2*T14 - 3*U)*Pair[
                 ec[5], k[4]]) + 4*(MH2 - U)*(Pair[e[2], k[4]]*Pair[ec[5], 
-                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) - 
+                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) + 
       Den[MH2 - S34 - T14 - T24, 0]*((4*B0i[bb0, U, MT2, MT2] - 
           16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2])*
          ((Pair[e[1], k[4]]*(Pair[e[2], k[3]] + 4*Pair[e[2], k[5]]) + 
@@ -3361,102 +3382,79 @@
                 Pair[ec[4], k[2]]*Pair[ec[5], k[4]]) + Pair[e[1], k[2]]*(
                 -(Pair[ec[4], k[5]]*Pair[ec[5], k[3]]) + Pair[ec[4], k[3]]*
                  Pair[ec[5], k[4]])))))) + Den[MH2 - S - T24 - U, 0]*
-     (-(Den[S34, 0]*(4*B0i[bb0, S34, MT2, MT2]*
-          (4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
-           MT2]*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) + 
-         8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
-            (-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - (MH2 - 2*S + S34 + 
-                  2*T24 - 2*U)*Pair[e[1], k[3]] + (-3*MH2 + S34 + 4*U)*
-                 Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, 
-             MT2]*Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], 
-                 k[2]] + (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - 
-                 S34 + 2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
-           MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
-                 Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
-                  k[3]]))) + Pair[e[1], ec[4]]*
-            ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
-             4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], 
-                 k[1]]*Pair[ec[5], k[2]])) + 
-           2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
-               (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
-             2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
-              (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
-           MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
-              Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*
-                Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
-           2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[1]] + 2*T14*Pair[ec[4], 
-                   k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*Pair[ec[4], 
-                   k[2]] + 2*T24*Pair[ec[4], k[3]]) + Pair[e[1], k[4]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[2]] + (MH2 + S - S34 + T24 - U)*
-                  Pair[ec[4], k[3]])) + 2*(MH2 - S34)*(Pair[e[1], k[2]] - 
-               Pair[e[1], k[5]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
-             2*Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))))) + 
-      Den[T, 0]*(4*B0i[bb0, T, MT2, MT2]*(Pair[e[2], ec[5]]*
-           (-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 4*Pair[e[1], k[2]]*
-             Pair[ec[4], k[5]] - Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + 
-              Pair[ec[4], k[5]])) - 
-          2*((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
-             Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-             (Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) + 
-            ((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
-              2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[3]]))*
-             Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
-           ((-MH2 + S34 + T14 + 2*T24)*Pair[e[2], ec[5]] + 
-            4*(Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[
-                ec[5], k[4]]))) - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+     (Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, 
+            MT2, MT2, MT2])*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[5]]*(2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - 
+          Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + 
+              Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 
+              4*Pair[ec[4], k[5]])) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*
+           (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+          Pair[e[1], ec[4]]*((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+            4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[
+                ec[5], k[2]]))) + 8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - 
+               (MH2 - 2*S + S34 + 2*T24 - 2*U)*Pair[e[1], k[3]] + 
+               (-3*MH2 + S34 + 4*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], k[2]] + 
+              (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - S34 + 
+                2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
+          MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
+                Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
+                 k[3]]))) + Pair[e[1], ec[4]]*
+           ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+            4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + 
+              Pair[e[2], k[1]]*Pair[ec[5], k[2]])) + 
+          2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+              (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+             (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
+               Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+             (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
+          MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
+             Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], 
+                k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
+          2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
+              T14*Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*
+             (Pair[e[1], k[2]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+                2*T14*Pair[ec[4], k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*
+                 Pair[ec[4], k[2]] + 2*T24*Pair[ec[4], k[3]]) + 
+              Pair[e[1], k[4]]*(-2*(MH2 - S34)*Pair[ec[4], k[2]] + 
+                (MH2 + S - S34 + T24 - U)*Pair[ec[4], k[3]])) + 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*
+             ((-MH2 + S34)*Pair[ec[4], k[1]] + T14*Pair[ec[4], k[3]])*
+             Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*(-(Pair[e[1], k[4]]*
+                (Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                  Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(Pair[e[2], k[4]]*
+                 Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[ec[5], 
+                  k[4]]))))) - Den[T, 0]*
+       ((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
          (Pair[e[2], ec[5]]*(-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 
             4*Pair[e[1], k[2]]*Pair[ec[4], k[5]] - Pair[e[1], k[3]]*
              (Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) - 
@@ -3530,7 +3528,7 @@
               Pair[e[2], k[3]]*(Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*Pair[
                 ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[2]]*
                  Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) - 
+                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) + 
       Den[T14, 0]*(-4*(C0i[cc11, MH2, MH2 - S - T24 - U, T14, MT2, MT2, MT2]*
            (-((S34 - T)*(-2*MH2 + S34 + T + 2*U)*Pair[e[1], ec[4]]*
               Pair[e[2], ec[5]]) - 4*(2*MH2 - S34 - T - 2*U)*
@@ -3624,31 +3622,31 @@
             Pair[e[1], ec[4]]*((2*S - S34 + T - 2*T24)*Pair[e[2], ec[5]] - 
               4*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
                 Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], 
-                   k[4]])))))))))/(MW*SW) - 
+                   k[4]])))))))))/(MW*SW) + 
  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu4, Glu2, Glu5, 0, 0]]*
    (Den[T, 0]*((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, 
-          MT2])*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) + 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+          MT2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) - 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
        (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
          Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
          ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
            Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
          ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
-           Pair[ec[5], k[1]])) + 16*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])) - 16*Pair[e[1], k[3]]*
        (C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*(2*Pair[e[2], k[1]]*
            Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*Pair[ec[4], k[1]] - 
           Pair[e[2], ec[4]]*Pair[ec[5], k[1]]) + 
         C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*(2*Pair[e[2], k[3]]*
            Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 
-          Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + 
+          Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) - 
       4*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
        (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
            (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
         Pair[e[2], ec[5]]*((-MH2 + T)*Pair[e[1], ec[4]] + 
           2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
         Pair[e[2], ec[4]]*((-MH2 + T)*Pair[e[1], ec[5]] + 
-          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]])))) - 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]])))) + 
     Den[T24, 0]*(Den[T, 0]*(-2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
          (Pair[e[1], ec[5]]*(-((MH2 - T)*(S - S34 - T14 + U)*Pair[e[2], ec[
                 4]]) + 4*(MH2 - T)*(Pair[e[2], k[5]]*Pair[ec[4], k[2]] + 
@@ -3820,28 +3818,28 @@
                 S34*Pair[ec[5], k[4]])))))) + Den[2*MH2 - S34 - T - U, 0]*
      ((4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
         16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
-       (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
-         Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
-      16*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
-         (Pair[e[1], k[3]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
-           Pair[e[2], k[3]] - 2*Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
-        C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+       (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+         Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+      (-16*C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+         (-(Pair[e[1], k[3]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+           Pair[e[2], k[3]] + 2*Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
+        16*C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-(Pair[e[1], k[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
            Pair[e[2], k[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], k[5]]))*
-       Pair[ec[5], k[3]] + 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
+       Pair[ec[5], k[3]] - 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
         MT2]*(Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] - 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[5]])*Pair[ec[5], k[3]]) + 
         Pair[e[1], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] - 
           2*(Pair[e[2], k[3]] - Pair[e[2], k[5]])*Pair[ec[5], k[3]]) - 
         2*Pair[e[1], e[2]]*((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] - 
-          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) + 
+          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) - 
       2*C0i[cc0, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] + 
           2*Pair[e[1], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], ec[4]]*
          ((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[5]]*
            Pair[ec[5], k[3]]) - 2*Pair[e[1], e[2]]*
          ((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
-           Pair[ec[5], k[3]])) + Den[T24, 0]*
+           Pair[ec[5], k[3]])) - Den[T24, 0]*
        (-8*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (-(((MH2 - 3*S34 + T + U)*Pair[e[1], k[2]] + 2*(S - T14)*
                 Pair[e[1], k[3]] + (MH2 + S34 + T - 3*U)*Pair[e[1], k[4]])*
@@ -3862,8 +3860,18 @@
                  Pair[e[2], k[4]]*Pair[ec[4], k[3]])) + Pair[e[1], k[3]]*(
                 Pair[e[2], k[5]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
                  Pair[ec[4], k[5]])))*Pair[ec[5], k[3]]) + 
-        (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+        4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         (Pair[e[1], ec[5]]*((-S + T14)*Pair[e[2], ec[4]] + 
+            4*(Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*Pair[
+                ec[4], k[2]])) - 2*(2*(Pair[e[1], k[2]] - Pair[e[1], k[4]])*
+             Pair[e[2], k[4]]*Pair[ec[4], ec[5]] + Pair[ec[4], k[2]]*
+             (2*(Pair[e[1], k[2]] - Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+              Pair[e[1], e[2]]*(2*Pair[ec[5], k[1]] - Pair[ec[5], k[3]])) + 
+            Pair[e[1], ec[4]]*Pair[e[2], k[4]]*(2*Pair[ec[5], k[1]] - 
+              Pair[ec[5], k[3]])) + Pair[e[2], ec[4]]*
+           (Pair[e[1], k[4]]*(-4*Pair[ec[5], k[2]] + Pair[ec[5], k[3]]) + 
+            Pair[e[1], k[2]]*(Pair[ec[5], k[3]] + 4*Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (Pair[e[1], ec[5]]*((-S + T14)*Pair[e[2], ec[4]] + 
             4*(Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*Pair[
                 ec[4], k[2]])) - 2*(2*(Pair[e[1], k[2]] - Pair[e[1], k[4]])*
@@ -3916,7 +3924,7 @@
                 ec[5], k[2]] + (MH2 + 3*S34 + 3*T - 2*T24 - 5*U)*Pair[ec[5], 
                 k[3]]) + Pair[e[1], k[2]]*((MH2 - 5*S34 + 3*T - 2*T24 + 3*U)*
                Pair[ec[5], k[3]] + 4*(-MH2 + S34 + T + U)*Pair[ec[5], 
-                k[4]])))) + Den[T14, 0]*
+                k[4]])))) - Den[T14, 0]*
        (8*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (-2*(MH2 - S34 - T + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
             Pair[e[1], ec[4]]*((MH2 - 3*S34 + T + U)*Pair[e[2], k[1]] + 
@@ -3936,8 +3944,18 @@
                 Pair[ec[4], k[1]]) + Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
                 ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[e[2], k[5]]*
                  Pair[ec[4], k[3]] - Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[3]]) + (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+           Pair[ec[5], k[3]]) + 4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
+             (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
+              Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
+            Pair[e[1], k[4]]*(2*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[
+                ec[4], ec[5]] + Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - 
+                Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
+           ((-S + T24)*Pair[e[2], ec[5]] + Pair[e[2], k[4]]*
+             (-4*Pair[ec[5], k[1]] + Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*
+             (Pair[ec[5], k[3]] + 4*Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
               Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
              (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
@@ -3991,28 +4009,28 @@
               Pair[e[2], k[1]]*((-2*MH2 + S + 2*T + T24 + 2*U)*Pair[ec[5], 
                   k[3]] + 2*(-MH2 + S34 + T + U)*Pair[ec[5], k[4]])))))) + 
     Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, 
-          MT2, MT2])*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
+          MT2, MT2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) + 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[e[1], ec[4]] + 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[4]])*Pair[ec[4], k[3]]) + 
         Pair[e[1], ec[5]]*((-MH2 + S34)*Pair[e[2], ec[4]] + 
           2*(Pair[e[2], k[3]] - Pair[e[2], k[4]])*Pair[ec[4], k[3]]) - 
         2*Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], ec[5]] + 
           2*Pair[ec[4], k[3]]*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]]))) + 
-      Pair[ec[4], k[3]]*(-16*C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
+      16*Pair[ec[4], k[3]]*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
          (Pair[e[1], k[3]]*Pair[e[2], ec[5]] + Pair[e[1], ec[5]]*
            Pair[e[2], k[3]] - 2*Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + 
-        16*C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
-         (Pair[e[1], k[4]]*Pair[e[2], ec[5]] + Pair[e[1], ec[5]]*
-           Pair[e[2], k[4]] - 2*Pair[e[1], e[2]]*Pair[ec[5], k[4]])) - 
+        C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
+         (-(Pair[e[1], k[4]]*Pair[e[2], ec[5]]) - Pair[e[1], ec[5]]*
+           Pair[e[2], k[4]] + 2*Pair[e[1], e[2]]*Pair[ec[5], k[4]])) + 
       2*C0i[cc0, MH2, S34, 0, MT2, MT2, MT2]*
        (-(Pair[e[2], ec[5]]*((MH2 - S34)*Pair[e[1], ec[4]] + 
            2*Pair[e[1], k[4]]*Pair[ec[4], k[3]])) - Pair[e[1], ec[5]]*
          ((MH2 - S34)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[4]]*
            Pair[ec[4], k[3]]) + 2*Pair[e[1], e[2]]*
          ((MH2 - S34)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
-           Pair[ec[5], k[4]])) - Den[MH2 - S - T - T14, 0]*
+           Pair[ec[5], k[4]])) + Den[MH2 - S - T - T14, 0]*
        ((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
             MT2])*(4*Pair[e[1], k[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[5]])*
            Pair[ec[4], ec[5]] + 2*Pair[e[1], k[5]]*Pair[e[2], ec[5]]*
@@ -4086,30 +4104,31 @@
               Pair[e[1], k[3]]*Pair[e[2], k[4]]*Pair[ec[5], k[1]] + 
               Pair[e[1], k[5]]*(Pair[e[2], k[4]]*Pair[ec[5], k[3]] - 
                 Pair[e[2], k[3]]*Pair[ec[5], k[4]])))))) + 
-    Den[U, 0]*(-2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
+    Den[U, 0]*(4*B0i[bb0, U, MT2, MT2]*
+       (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+         Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+      2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
        (-2*((-MH2 + U)*Pair[e[1], e[2]] + 2*Pair[e[1], k[2]]*
            Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
          ((-MH2 + U)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[3]]*
            Pair[ec[4], k[2]]) + Pair[e[1], ec[4]]*
          ((-MH2 + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[3]]*
            Pair[ec[5], k[2]])) - 16*(C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
-         (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
-           Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
-        Pair[e[2], k[3]]*(C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*
-           (-2*Pair[e[1], k[2]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-             Pair[ec[4], k[2]] + Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
-          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*(-2*Pair[e[1], k[3]]*
-             Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + 
-            Pair[e[1], ec[4]]*Pair[ec[5], k[3]]))) + 
-      4*(B0i[bb0, U, MT2, MT2]*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
-          Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
-           Pair[ec[4], ec[5]]) + C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
-         (2*((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
-              Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
-          Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) - 
-          Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]])))) + 
+         (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+           Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+        C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+         (2*Pair[e[1], k[2]]*Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*
+           Pair[ec[4], k[2]] - Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
+        C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+         (2*Pair[e[1], k[3]]*Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*
+           Pair[ec[4], k[3]] - Pair[e[1], ec[4]]*Pair[ec[5], k[3]])) - 
+      4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (2*((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
+            Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
+        Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) - 
+        Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) - 
       Den[T14, 0]*(-2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
          (Pair[e[1], ec[4]]*((S - S34 + T - T24)*(MH2 - U)*
              Pair[e[2], ec[5]] + 2*(2*(MH2 - U)*Pair[e[2], k[4]]*Pair[ec[5], 
@@ -4131,8 +4150,41 @@
                   Pair[ec[5], k[4]])) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(
                 Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
             (MH2 - U)*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
-              Pair[ec[5], k[4]]))) + (4*B0i[bb0, U, MT2, MT2] - 
-          16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2])*
+              Pair[ec[5], k[4]]))) - 8*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*
+         Pair[e[2], k[3]]*(-2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], k[4]]*
+           Pair[ec[4], ec[5]] - 2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], ec[5]]*
+           Pair[ec[4], k[1]] + 8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]] + Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*Pair[
+                ec[5], k[3]] + Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - 
+                Pair[ec[5], k[4]])) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+             (Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + Pair[e[1], ec[4]]*
+           ((-MH2 + 2*S + 2*T24 + U)*Pair[ec[5], k[1]] + 2*(S34 - T)*
+             Pair[ec[5], k[2]] - 2*S*Pair[ec[5], k[3]] + 
+            2*T24*Pair[ec[5], k[3]] - MH2*Pair[ec[5], k[4]] + 
+            2*S*Pair[ec[5], k[4]] + 2*T24*Pair[ec[5], k[4]] + 
+            U*Pair[ec[5], k[4]])) - 8*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+         Pair[e[2], k[3]]*(2*(-3*MH2 + 2*S34 + 2*T + U)*Pair[e[1], k[4]]*
+           Pair[ec[4], ec[5]] + 2*(-3*MH2 + 2*S34 + 2*T + U)*
+           Pair[e[1], ec[5]]*Pair[ec[4], k[1]] + 
+          8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+            Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+              Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
+            Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
+              Pair[ec[5], k[4]])) - Pair[e[1], ec[4]]*
+           ((-3*MH2 + 4*S34 + U)*Pair[ec[5], k[1]] + 2*(S - S34 + T - T24)*
+             Pair[ec[5], k[3]] + (-3*MH2 + 4*T + U)*Pair[ec[5], k[4]])) + 
+        4*B0i[bb0, U, MT2, MT2]*(-2*Pair[e[1], ec[5]]*(Pair[e[2], k[3]] + 
+            2*Pair[e[2], k[5]])*Pair[ec[4], k[1]] + 4*Pair[e[2], ec[5]]*
+           (Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             Pair[ec[4], k[5]]) + Pair[e[1], k[4]]*
+           (-2*(Pair[e[2], k[3]] + 2*Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
+            4*Pair[e[2], ec[4]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
+          4*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
+            Pair[ec[5], k[4]]) + Pair[e[1], ec[4]]*
+           ((-S + S34 - T + T24)*Pair[e[2], ec[5]] - 4*Pair[e[2], k[4]]*
+             Pair[ec[5], k[1]] + 4*Pair[e[2], k[1]]*Pair[ec[5], k[4]] - 
+            Pair[e[2], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
          (-2*Pair[e[1], ec[5]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[5]])*
            Pair[ec[4], k[1]] + 4*Pair[e[2], ec[5]]*
            (Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
@@ -4144,28 +4196,6 @@
            ((-S + S34 - T + T24)*Pair[e[2], ec[5]] - 4*Pair[e[2], k[4]]*
              Pair[ec[5], k[1]] + 4*Pair[e[2], k[1]]*Pair[ec[5], k[4]] - 
             Pair[e[2], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))) - 
-        8*(C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
-           (-2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], k[4]]*Pair[ec[4], ec[5]] - 
-            2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], ec[5]]*Pair[ec[4], k[1]] + 
-            8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-              Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
-              Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
-                Pair[ec[5], k[4]])) + Pair[e[1], ec[4]]*
-             ((-MH2 + 2*S + 2*T24 + U)*Pair[ec[5], k[1]] + 2*(S34 - T)*Pair[
-                ec[5], k[2]] - 2*S*Pair[ec[5], k[3]] + 2*T24*Pair[ec[5], 
-                k[3]] - MH2*Pair[ec[5], k[4]] + 2*S*Pair[ec[5], k[4]] + 
-              2*T24*Pair[ec[5], k[4]] + U*Pair[ec[5], k[4]])) + 
-          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
-           (2*(-3*MH2 + 2*S34 + 2*T + U)*Pair[e[1], k[4]]*Pair[ec[4], 
-              ec[5]] + 2*(-3*MH2 + 2*S34 + 2*T + U)*Pair[e[1], ec[5]]*
-             Pair[ec[4], k[1]] + 8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*Pair[
-                ec[5], k[3]] + Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*
-                 Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - 
-                  Pair[ec[5], k[4]])) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(
-                Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) - Pair[e[1], ec[4]]*
-             ((-3*MH2 + 4*S34 + U)*Pair[ec[5], k[1]] + 2*(S - S34 + T - T24)*
-               Pair[ec[5], k[3]] + (-3*MH2 + 4*T + U)*Pair[ec[5], k[4]]))) - 
         4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
          (2*(Pair[e[1], ec[5]]*((-5*MH2 + 4*S34 + 4*T + 2*T14 + U)*Pair[e[2], 
                 k[3]] + 2*(MH2 - U)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
@@ -4186,9 +4216,8 @@
                 3*U)*Pair[ec[5], k[1]] + 4*(-2*MH2 + 2*S34 + T14 + 2*T24 + 
                 U)*Pair[ec[5], k[3]] + (7*MH2 - 8*T - 2*T14 - 3*U)*Pair[
                 ec[5], k[4]]) + 4*(MH2 - U)*(Pair[e[2], k[4]]*Pair[ec[5], 
-                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) + 
-      Den[MH2 - S - T - T14, 0]*((4*B0i[bb0, U, MT2, MT2] - 
-          16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2])*
+                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) - 
+      Den[MH2 - S - T - T14, 0]*(4*B0i[bb0, U, MT2, MT2]*
          (-2*Pair[e[1], k[5]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[4]])*
            Pair[ec[4], ec[5]] + 4*Pair[e[1], k[5]]*Pair[e[2], ec[5]]*
            (Pair[ec[4], k[1]] - Pair[ec[4], k[5]]) + Pair[e[1], ec[5]]*
@@ -4199,28 +4228,39 @@
            Pair[ec[5], k[1]] + 4*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
             Pair[ec[4], k[5]])*Pair[ec[5], k[1]] + 4*Pair[e[2], ec[4]]*
            (Pair[e[1], k[4]]*Pair[ec[5], k[1]] + Pair[e[1], k[5]]*
-             Pair[ec[5], k[4]])) - 8*(C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
-           Pair[e[2], k[3]]*(2*(MH2 - 2*S34 - U)*Pair[e[1], k[5]]*
-             Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*((-2*MH2 + 4*S34 + 2*U)*
-               Pair[ec[4], k[1]] + (3*MH2 - 4*T - U)*Pair[ec[4], k[2]] - 
-              (MH2 + 2*S - 2*T - 2*T14 + U)*Pair[ec[4], k[3]]) + 
-            2*(MH2 - 2*S34 - U)*Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
-            8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
-              Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*Pair[
-                ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*
-                 Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) + 
-          C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
-           (2*(-MH2 + 2*T24 + U)*Pair[e[1], k[5]]*Pair[ec[4], ec[5]] - 
-            Pair[e[1], ec[5]]*((-2*MH2 + 4*T24 + 2*U)*Pair[ec[4], k[1]] + 
-              (-MH2 - 2*S + 2*T - 2*T14 + U)*Pair[ec[4], k[2]] + 
-              (-MH2 + 4*S + U)*Pair[ec[4], k[3]]) + 2*(-MH2 + 2*T24 + U)*
-             Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
-            8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
-              Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*Pair[
-                ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*
-                 Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) - 
+             Pair[ec[5], k[4]])) - 16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
+         (-2*Pair[e[1], k[5]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[4]])*
+           Pair[ec[4], ec[5]] + 4*Pair[e[1], k[5]]*Pair[e[2], ec[5]]*
+           (Pair[ec[4], k[1]] - Pair[ec[4], k[5]]) + Pair[e[1], ec[5]]*
+           ((-MH2 + S34 + 2*T14 + T24)*Pair[e[2], ec[4]] - 4*Pair[e[2], k[5]]*
+             Pair[ec[4], k[1]] + 4*Pair[e[2], k[1]]*Pair[ec[4], k[5]] - 
+            Pair[e[2], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[5]])) - 
+          2*Pair[e[1], ec[4]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[4]])*
+           Pair[ec[5], k[1]] + 4*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+            Pair[ec[4], k[5]])*Pair[ec[5], k[1]] + 4*Pair[e[2], ec[4]]*
+           (Pair[e[1], k[4]]*Pair[ec[5], k[1]] + Pair[e[1], k[5]]*
+             Pair[ec[5], k[4]])) - 8*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+         Pair[e[2], k[3]]*(2*(MH2 - 2*S34 - U)*Pair[e[1], k[5]]*
+           Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*((-2*MH2 + 4*S34 + 2*U)*
+             Pair[ec[4], k[1]] + (3*MH2 - 4*T - U)*Pair[ec[4], k[2]] - 
+            (MH2 + 2*S - 2*T - 2*T14 + U)*Pair[ec[4], k[3]]) + 
+          2*(MH2 - 2*S34 - U)*Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
+          8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
+            Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*
+             Pair[ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+              Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) - 
+        8*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+         (2*(-MH2 + 2*T24 + U)*Pair[e[1], k[5]]*Pair[ec[4], ec[5]] - 
+          Pair[e[1], ec[5]]*((-2*MH2 + 4*T24 + 2*U)*Pair[ec[4], k[1]] + 
+            (-MH2 - 2*S + 2*T - 2*T14 + U)*Pair[ec[4], k[2]] + 
+            (-MH2 + 4*S + U)*Pair[ec[4], k[3]]) + 2*(-MH2 + 2*T24 + U)*
+           Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
+          8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
+            Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*
+             Pair[ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+              Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) - 
         4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
          (Pair[e[1], ec[5]]*((MH2 - S34 - 2*T14 - T24)*(MH2 - U)*
              Pair[e[2], ec[4]] - 4*(MH2 - U)*(Pair[e[2], k[4]]*Pair[ec[4], 
@@ -4263,102 +4303,79 @@
                  Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
                 Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))))) + 
     Den[MH2 - S - T24 - U, 0]*
-     (-(Den[S34, 0]*(4*B0i[bb0, S34, MT2, MT2]*
-          (4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
-           MT2]*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) + 
-         8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
-            (-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - (MH2 - 2*S + S34 + 
-                  2*T24 - 2*U)*Pair[e[1], k[3]] + (-3*MH2 + S34 + 4*U)*
-                 Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, 
-             MT2]*Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], 
-                 k[2]] + (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - 
-                 S34 + 2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
-           MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
-                 Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
-                  k[3]]))) + Pair[e[1], ec[4]]*
-            ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
-             4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], 
-                 k[1]]*Pair[ec[5], k[2]])) + 
-           2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
-               (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
-             2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
-              (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
-           MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
-              Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*
-                Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
-           2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[1]] + 2*T14*Pair[ec[4], 
-                   k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*Pair[ec[4], 
-                   k[2]] + 2*T24*Pair[ec[4], k[3]]) + Pair[e[1], k[4]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[2]] + (MH2 + S - S34 + T24 - U)*
-                  Pair[ec[4], k[3]])) + 2*(MH2 - S34)*(Pair[e[1], k[2]] - 
-               Pair[e[1], k[5]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
-             2*Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))))) + 
-      Den[T, 0]*(4*B0i[bb0, T, MT2, MT2]*(Pair[e[2], ec[5]]*
-           (-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 4*Pair[e[1], k[2]]*
-             Pair[ec[4], k[5]] - Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + 
-              Pair[ec[4], k[5]])) - 
-          2*((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
-             Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-             (Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) + 
-            ((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
-              2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[3]]))*
-             Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
-           ((-MH2 + S34 + T14 + 2*T24)*Pair[e[2], ec[5]] + 
-            4*(Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[
-                ec[5], k[4]]))) - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+     (Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, 
+            MT2, MT2, MT2])*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[5]]*(2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - 
+          Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + 
+              Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 
+              4*Pair[ec[4], k[5]])) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*
+           (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+          Pair[e[1], ec[4]]*((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+            4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[
+                ec[5], k[2]]))) + 8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - 
+               (MH2 - 2*S + S34 + 2*T24 - 2*U)*Pair[e[1], k[3]] + 
+               (-3*MH2 + S34 + 4*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], k[2]] + 
+              (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - S34 + 
+                2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
+          MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
+                Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
+                 k[3]]))) + Pair[e[1], ec[4]]*
+           ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+            4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + 
+              Pair[e[2], k[1]]*Pair[ec[5], k[2]])) + 
+          2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+              (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+             (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
+               Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+             (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
+          MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
+             Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], 
+                k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
+          2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
+              T14*Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*
+             (Pair[e[1], k[2]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+                2*T14*Pair[ec[4], k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*
+                 Pair[ec[4], k[2]] + 2*T24*Pair[ec[4], k[3]]) + 
+              Pair[e[1], k[4]]*(-2*(MH2 - S34)*Pair[ec[4], k[2]] + 
+                (MH2 + S - S34 + T24 - U)*Pair[ec[4], k[3]])) + 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*
+             ((-MH2 + S34)*Pair[ec[4], k[1]] + T14*Pair[ec[4], k[3]])*
+             Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*(-(Pair[e[1], k[4]]*
+                (Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                  Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(Pair[e[2], k[4]]*
+                 Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[ec[5], 
+                  k[4]]))))) - Den[T, 0]*
+       ((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
          (Pair[e[2], ec[5]]*(-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 
             4*Pair[e[1], k[2]]*Pair[ec[4], k[5]] - Pair[e[1], k[3]]*
              (Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) - 
@@ -4432,7 +4449,7 @@
               Pair[e[2], k[3]]*(Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*Pair[
                 ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[2]]*
                  Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) - 
+                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) + 
       Den[T14, 0]*(-4*(C0i[cc11, MH2, MH2 - S - T24 - U, T14, MT2, MT2, MT2]*
            (-((S34 - T)*(-2*MH2 + S34 + T + 2*U)*Pair[e[1], ec[4]]*
               Pair[e[2], ec[5]]) - 4*(2*MH2 - S34 - T - 2*U)*
@@ -4526,31 +4543,31 @@
             Pair[e[1], ec[4]]*((2*S - S34 + T - 2*T24)*Pair[e[2], ec[5]] - 
               4*((Pair[e[2], k[1]] + Pair[e[2], k[4]])*Pair[ec[5], k[2]] + 
                 Pair[e[2], k[5]]*(Pair[ec[5], k[1]] + Pair[ec[5], 
-                   k[4]])))))))))/(MW*SW) - 
+                   k[4]])))))))))/(MW*SW) + 
  (Alfas2*EL*MT2*Mat[SUNT[Glu1, Glu5, Glu2, Glu4, 0, 0]]*
    (Den[T, 0]*((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, 
-          MT2])*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) + 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+          MT2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) - 2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
        (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
          Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
          ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
            Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
          ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
-           Pair[ec[5], k[1]])) + 16*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])) - 16*Pair[e[1], k[3]]*
        (C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*(2*Pair[e[2], k[1]]*
            Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*Pair[ec[4], k[1]] - 
           Pair[e[2], ec[4]]*Pair[ec[5], k[1]]) + 
         C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*(2*Pair[e[2], k[3]]*
            Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 
-          Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) + 
+          Pair[e[2], ec[4]]*Pair[ec[5], k[3]])) - 
       4*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
        (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
            (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
         Pair[e[2], ec[5]]*((-MH2 + T)*Pair[e[1], ec[4]] + 
           2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
         Pair[e[2], ec[4]]*((-MH2 + T)*Pair[e[1], ec[5]] + 
-          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]])))) - 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]])))) + 
     Den[T24, 0]*(Den[T, 0]*(-2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
          (Pair[e[1], ec[5]]*(-((MH2 - T)*(S - S34 - T14 + U)*Pair[e[2], ec[
                 4]]) + 4*(MH2 - T)*(Pair[e[2], k[5]]*Pair[ec[4], k[2]] + 
@@ -4722,28 +4739,28 @@
                 S34*Pair[ec[5], k[4]])))))) + Den[2*MH2 - S34 - T - U, 0]*
      ((4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
         16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
-       (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
-         Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) - 
-      16*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
-         (Pair[e[1], k[3]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
-           Pair[e[2], k[3]] - 2*Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
-        C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+       (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+         Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+      (-16*C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
+         (-(Pair[e[1], k[3]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+           Pair[e[2], k[3]] + 2*Pair[e[1], e[2]]*Pair[ec[4], k[3]]) + 
+        16*C0i[cc12, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-(Pair[e[1], k[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
            Pair[e[2], k[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], k[5]]))*
-       Pair[ec[5], k[3]] + 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
+       Pair[ec[5], k[3]] - 4*C0i[cc1, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, 
         MT2]*(Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] - 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[5]])*Pair[ec[5], k[3]]) + 
         Pair[e[1], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] - 
           2*(Pair[e[2], k[3]] - Pair[e[2], k[5]])*Pair[ec[5], k[3]]) - 
         2*Pair[e[1], e[2]]*((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] - 
-          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) + 
+          2*(Pair[ec[4], k[3]] - Pair[ec[4], k[5]])*Pair[ec[5], k[3]])) - 
       2*C0i[cc0, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[4]]*((-MH2 + S34 + T + U)*Pair[e[1], ec[5]] + 
           2*Pair[e[1], k[5]]*Pair[ec[5], k[3]]) + Pair[e[1], ec[4]]*
          ((-MH2 + S34 + T + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[5]]*
            Pair[ec[5], k[3]]) - 2*Pair[e[1], e[2]]*
          ((-MH2 + S34 + T + U)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[5]]*
-           Pair[ec[5], k[3]])) + Den[T24, 0]*
+           Pair[ec[5], k[3]])) - Den[T24, 0]*
        (-8*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (-(((MH2 - 3*S34 + T + U)*Pair[e[1], k[2]] + 2*(S - T14)*
                 Pair[e[1], k[3]] + (MH2 + S34 + T - 3*U)*Pair[e[1], k[4]])*
@@ -4764,8 +4781,18 @@
                  Pair[e[2], k[4]]*Pair[ec[4], k[3]])) + Pair[e[1], k[3]]*(
                 Pair[e[2], k[5]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
                  Pair[ec[4], k[5]])))*Pair[ec[5], k[3]]) + 
-        (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+        4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         (Pair[e[1], ec[5]]*((-S + T14)*Pair[e[2], ec[4]] + 
+            4*(Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*Pair[
+                ec[4], k[2]])) - 2*(2*(Pair[e[1], k[2]] - Pair[e[1], k[4]])*
+             Pair[e[2], k[4]]*Pair[ec[4], ec[5]] + Pair[ec[4], k[2]]*
+             (2*(Pair[e[1], k[2]] - Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+              Pair[e[1], e[2]]*(2*Pair[ec[5], k[1]] - Pair[ec[5], k[3]])) + 
+            Pair[e[1], ec[4]]*Pair[e[2], k[4]]*(2*Pair[ec[5], k[1]] - 
+              Pair[ec[5], k[3]])) + Pair[e[2], ec[4]]*
+           (Pair[e[1], k[4]]*(-4*Pair[ec[5], k[2]] + Pair[ec[5], k[3]]) + 
+            Pair[e[1], k[2]]*(Pair[ec[5], k[3]] + 4*Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (Pair[e[1], ec[5]]*((-S + T14)*Pair[e[2], ec[4]] + 
             4*(Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*Pair[
                 ec[4], k[2]])) - 2*(2*(Pair[e[1], k[2]] - Pair[e[1], k[4]])*
@@ -4818,7 +4845,7 @@
                 ec[5], k[2]] + (MH2 + 3*S34 + 3*T - 2*T24 - 5*U)*Pair[ec[5], 
                 k[3]]) + Pair[e[1], k[2]]*((MH2 - 5*S34 + 3*T - 2*T24 + 3*U)*
                Pair[ec[5], k[3]] + 4*(-MH2 + S34 + T + U)*Pair[ec[5], 
-                k[4]])))) + Den[T14, 0]*
+                k[4]])))) - Den[T14, 0]*
        (8*(C0i[cc11, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
            (-2*(MH2 - S34 - T + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
             Pair[e[1], ec[4]]*((MH2 - 3*S34 + T + U)*Pair[e[2], k[1]] + 
@@ -4838,8 +4865,18 @@
                 Pair[ec[4], k[1]]) + Pair[e[1], k[3]]*Pair[e[2], k[5]]*Pair[
                 ec[4], k[1]] + Pair[e[1], k[4]]*(Pair[e[2], k[5]]*
                  Pair[ec[4], k[3]] - Pair[e[2], k[3]]*Pair[ec[4], k[5]])))*
-           Pair[ec[5], k[3]]) + (4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2] - 
-          16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2])*
+           Pair[ec[5], k[3]]) + 4*B0i[bb0, 2*MH2 - S34 - T - U, MT2, MT2]*
+         (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+              Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
+             (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
+              Pair[e[1], e[2]]*(2*Pair[ec[5], k[2]] - Pair[ec[5], k[3]])) + 
+            Pair[e[1], k[4]]*(2*(Pair[e[2], k[1]] - Pair[e[2], k[4]])*Pair[
+                ec[4], ec[5]] + Pair[e[2], ec[4]]*(2*Pair[ec[5], k[2]] - 
+                Pair[ec[5], k[3]]))) + Pair[e[1], ec[4]]*
+           ((-S + T24)*Pair[e[2], ec[5]] + Pair[e[2], k[4]]*
+             (-4*Pair[ec[5], k[1]] + Pair[ec[5], k[3]]) + Pair[e[2], k[1]]*
+             (Pair[ec[5], k[3]] + 4*Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, MH2, 2*MH2 - S34 - T - U, 0, MT2, MT2, MT2]*
          (-2*(-2*Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
               Pair[e[1], k[4]]*Pair[ec[4], k[2]]) + Pair[ec[4], k[1]]*
              (2*Pair[e[1], ec[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[4]]) + 
@@ -4893,28 +4930,28 @@
               Pair[e[2], k[1]]*((-2*MH2 + S + 2*T + T24 + 2*U)*Pair[ec[5], 
                   k[3]] + 2*(-MH2 + S34 + T + U)*Pair[ec[5], k[4]])))))) + 
     Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, 
-          MT2, MT2])*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
-        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
-         Pair[ec[4], ec[5]]) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
+          MT2, MT2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]) + 4*C0i[cc1, MH2, S34, 0, MT2, MT2, MT2]*
        (Pair[e[2], ec[5]]*((-MH2 + S34)*Pair[e[1], ec[4]] + 
           2*(Pair[e[1], k[3]] - Pair[e[1], k[4]])*Pair[ec[4], k[3]]) + 
         Pair[e[1], ec[5]]*((-MH2 + S34)*Pair[e[2], ec[4]] + 
           2*(Pair[e[2], k[3]] - Pair[e[2], k[4]])*Pair[ec[4], k[3]]) - 
         2*Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], ec[5]] + 
           2*Pair[ec[4], k[3]]*(Pair[ec[5], k[3]] - Pair[ec[5], k[4]]))) + 
-      Pair[ec[4], k[3]]*(-16*C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
+      16*Pair[ec[4], k[3]]*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
          (Pair[e[1], k[3]]*Pair[e[2], ec[5]] + Pair[e[1], ec[5]]*
            Pair[e[2], k[3]] - 2*Pair[e[1], e[2]]*Pair[ec[5], k[3]]) + 
-        16*C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
-         (Pair[e[1], k[4]]*Pair[e[2], ec[5]] + Pair[e[1], ec[5]]*
-           Pair[e[2], k[4]] - 2*Pair[e[1], e[2]]*Pair[ec[5], k[4]])) - 
+        C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
+         (-(Pair[e[1], k[4]]*Pair[e[2], ec[5]]) - Pair[e[1], ec[5]]*
+           Pair[e[2], k[4]] + 2*Pair[e[1], e[2]]*Pair[ec[5], k[4]])) + 
       2*C0i[cc0, MH2, S34, 0, MT2, MT2, MT2]*
        (-(Pair[e[2], ec[5]]*((MH2 - S34)*Pair[e[1], ec[4]] + 
            2*Pair[e[1], k[4]]*Pair[ec[4], k[3]])) - Pair[e[1], ec[5]]*
          ((MH2 - S34)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[4]]*
            Pair[ec[4], k[3]]) + 2*Pair[e[1], e[2]]*
          ((MH2 - S34)*Pair[ec[4], ec[5]] + 2*Pair[ec[4], k[3]]*
-           Pair[ec[5], k[4]])) - Den[MH2 - S - T - T14, 0]*
+           Pair[ec[5], k[4]])) + Den[MH2 - S - T - T14, 0]*
        ((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
             MT2])*(4*Pair[e[1], k[5]]*(Pair[e[2], k[1]] - Pair[e[2], k[5]])*
            Pair[ec[4], ec[5]] + 2*Pair[e[1], k[5]]*Pair[e[2], ec[5]]*
@@ -4988,30 +5025,31 @@
               Pair[e[1], k[3]]*Pair[e[2], k[4]]*Pair[ec[5], k[1]] + 
               Pair[e[1], k[5]]*(Pair[e[2], k[4]]*Pair[ec[5], k[3]] - 
                 Pair[e[2], k[3]]*Pair[ec[5], k[4]])))))) + 
-    Den[U, 0]*(-2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
+    Den[U, 0]*(4*B0i[bb0, U, MT2, MT2]*
+       (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+         Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+      2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
        (-2*((-MH2 + U)*Pair[e[1], e[2]] + 2*Pair[e[1], k[2]]*
            Pair[e[2], k[3]])*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
          ((-MH2 + U)*Pair[e[2], ec[4]] + 2*Pair[e[2], k[3]]*
            Pair[ec[4], k[2]]) + Pair[e[1], ec[4]]*
          ((-MH2 + U)*Pair[e[2], ec[5]] + 2*Pair[e[2], k[3]]*
            Pair[ec[5], k[2]])) - 16*(C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
-         (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
-           Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
-        Pair[e[2], k[3]]*(C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*
-           (-2*Pair[e[1], k[2]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-             Pair[ec[4], k[2]] + Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
-          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*(-2*Pair[e[1], k[3]]*
-             Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*Pair[ec[4], k[3]] + 
-            Pair[e[1], ec[4]]*Pair[ec[5], k[3]]))) + 
-      4*(B0i[bb0, U, MT2, MT2]*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
-          Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
-           Pair[ec[4], ec[5]]) + C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
-         (2*((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
-              Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
-          Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) - 
-          Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
-            2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]])))) + 
+         (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) - Pair[e[1], ec[4]]*
+           Pair[e[2], ec[5]] + 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]) + 
+        C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+         (2*Pair[e[1], k[2]]*Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*
+           Pair[ec[4], k[2]] - Pair[e[1], ec[4]]*Pair[ec[5], k[2]]) + 
+        C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+         (2*Pair[e[1], k[3]]*Pair[ec[4], ec[5]] - Pair[e[1], ec[5]]*
+           Pair[ec[4], k[3]] - Pair[e[1], ec[4]]*Pair[ec[5], k[3]])) - 
+      4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (2*((-MH2 + U)*Pair[e[1], e[2]] + 2*(Pair[e[1], k[2]] + 
+            Pair[e[1], k[3]])*Pair[e[2], k[3]])*Pair[ec[4], ec[5]] - 
+        Pair[e[1], ec[5]]*((-MH2 + U)*Pair[e[2], ec[4]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[4], k[2]] + Pair[ec[4], k[3]])) - 
+        Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], ec[5]] + 
+          2*Pair[e[2], k[3]]*(Pair[ec[5], k[2]] + Pair[ec[5], k[3]]))) - 
       Den[T14, 0]*(-2*C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*
          (Pair[e[1], ec[4]]*((S - S34 + T - T24)*(MH2 - U)*
              Pair[e[2], ec[5]] + 2*(2*(MH2 - U)*Pair[e[2], k[4]]*Pair[ec[5], 
@@ -5033,8 +5071,41 @@
                   Pair[ec[5], k[4]])) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(
                 Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
             (MH2 - U)*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
-              Pair[ec[5], k[4]]))) + (4*B0i[bb0, U, MT2, MT2] - 
-          16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2])*
+              Pair[ec[5], k[4]]))) - 8*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*
+         Pair[e[2], k[3]]*(-2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], k[4]]*
+           Pair[ec[4], ec[5]] - 2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], ec[5]]*
+           Pair[ec[4], k[1]] + 8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*
+             Pair[ec[5], k[3]] + Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*Pair[
+                ec[5], k[3]] + Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - 
+                Pair[ec[5], k[4]])) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*
+             (Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + Pair[e[1], ec[4]]*
+           ((-MH2 + 2*S + 2*T24 + U)*Pair[ec[5], k[1]] + 2*(S34 - T)*
+             Pair[ec[5], k[2]] - 2*S*Pair[ec[5], k[3]] + 
+            2*T24*Pair[ec[5], k[3]] - MH2*Pair[ec[5], k[4]] + 
+            2*S*Pair[ec[5], k[4]] + 2*T24*Pair[ec[5], k[4]] + 
+            U*Pair[ec[5], k[4]])) - 8*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+         Pair[e[2], k[3]]*(2*(-3*MH2 + 2*S34 + 2*T + U)*Pair[e[1], k[4]]*
+           Pair[ec[4], ec[5]] + 2*(-3*MH2 + 2*S34 + 2*T + U)*
+           Pair[e[1], ec[5]]*Pair[ec[4], k[1]] + 
+          8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
+            Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+              Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
+            Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
+              Pair[ec[5], k[4]])) - Pair[e[1], ec[4]]*
+           ((-3*MH2 + 4*S34 + U)*Pair[ec[5], k[1]] + 2*(S - S34 + T - T24)*
+             Pair[ec[5], k[3]] + (-3*MH2 + 4*T + U)*Pair[ec[5], k[4]])) + 
+        4*B0i[bb0, U, MT2, MT2]*(-2*Pair[e[1], ec[5]]*(Pair[e[2], k[3]] + 
+            2*Pair[e[2], k[5]])*Pair[ec[4], k[1]] + 4*Pair[e[2], ec[5]]*
+           (Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+             Pair[ec[4], k[5]]) + Pair[e[1], k[4]]*
+           (-2*(Pair[e[2], k[3]] + 2*Pair[e[2], k[5]])*Pair[ec[4], ec[5]] + 
+            4*Pair[e[2], ec[4]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
+          4*Pair[e[1], e[2]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
+            Pair[ec[5], k[4]]) + Pair[e[1], ec[4]]*
+           ((-S + S34 - T + T24)*Pair[e[2], ec[5]] - 4*Pair[e[2], k[4]]*
+             Pair[ec[5], k[1]] + 4*Pair[e[2], k[1]]*Pair[ec[5], k[4]] - 
+            Pair[e[2], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))) - 
+        16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
          (-2*Pair[e[1], ec[5]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[5]])*
            Pair[ec[4], k[1]] + 4*Pair[e[2], ec[5]]*
            (Pair[e[1], k[5]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
@@ -5046,28 +5117,6 @@
            ((-S + S34 - T + T24)*Pair[e[2], ec[5]] - 4*Pair[e[2], k[4]]*
              Pair[ec[5], k[1]] + 4*Pair[e[2], k[1]]*Pair[ec[5], k[4]] - 
             Pair[e[2], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[4]]))) - 
-        8*(C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
-           (-2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], k[4]]*Pair[ec[4], ec[5]] - 
-            2*(-MH2 + 2*S + 2*T24 + U)*Pair[e[1], ec[5]]*Pair[ec[4], k[1]] + 
-            8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*Pair[ec[5], k[3]] + 
-              Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) + 
-              Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(Pair[ec[5], k[1]] - 
-                Pair[ec[5], k[4]])) + Pair[e[1], ec[4]]*
-             ((-MH2 + 2*S + 2*T24 + U)*Pair[ec[5], k[1]] + 2*(S34 - T)*Pair[
-                ec[5], k[2]] - 2*S*Pair[ec[5], k[3]] + 2*T24*Pair[ec[5], 
-                k[3]] - MH2*Pair[ec[5], k[4]] + 2*S*Pair[ec[5], k[4]] + 
-              2*T24*Pair[ec[5], k[4]] + U*Pair[ec[5], k[4]])) + 
-          C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
-           (2*(-3*MH2 + 2*S34 + 2*T + U)*Pair[e[1], k[4]]*Pair[ec[4], 
-              ec[5]] + 2*(-3*MH2 + 2*S34 + 2*T + U)*Pair[e[1], ec[5]]*
-             Pair[ec[4], k[1]] + 8*(Pair[e[1], k[5]]*Pair[ec[4], k[1]]*Pair[
-                ec[5], k[3]] + Pair[e[1], k[4]]*(Pair[ec[4], k[5]]*
-                 Pair[ec[5], k[3]] + Pair[ec[4], k[3]]*(Pair[ec[5], k[1]] - 
-                  Pair[ec[5], k[4]])) + Pair[e[1], k[3]]*Pair[ec[4], k[1]]*(
-                Pair[ec[5], k[1]] - Pair[ec[5], k[4]])) - Pair[e[1], ec[4]]*
-             ((-3*MH2 + 4*S34 + U)*Pair[ec[5], k[1]] + 2*(S - S34 + T - T24)*
-               Pair[ec[5], k[3]] + (-3*MH2 + 4*T + U)*Pair[ec[5], k[4]]))) - 
         4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
          (2*(Pair[e[1], ec[5]]*((-5*MH2 + 4*S34 + 4*T + 2*T14 + U)*Pair[e[2], 
                 k[3]] + 2*(MH2 - U)*Pair[e[2], k[5]])*Pair[ec[4], k[1]] - 
@@ -5088,9 +5137,8 @@
                 3*U)*Pair[ec[5], k[1]] + 4*(-2*MH2 + 2*S34 + T14 + 2*T24 + 
                 U)*Pair[ec[5], k[3]] + (7*MH2 - 8*T - 2*T14 - 3*U)*Pair[
                 ec[5], k[4]]) + 4*(MH2 - U)*(Pair[e[2], k[4]]*Pair[ec[5], 
-                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) + 
-      Den[MH2 - S - T - T14, 0]*((4*B0i[bb0, U, MT2, MT2] - 
-          16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2])*
+                k[1]] - Pair[e[2], k[1]]*Pair[ec[5], k[4]])))) - 
+      Den[MH2 - S - T - T14, 0]*(4*B0i[bb0, U, MT2, MT2]*
          (-2*Pair[e[1], k[5]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[4]])*
            Pair[ec[4], ec[5]] + 4*Pair[e[1], k[5]]*Pair[e[2], ec[5]]*
            (Pair[ec[4], k[1]] - Pair[ec[4], k[5]]) + Pair[e[1], ec[5]]*
@@ -5101,28 +5149,39 @@
            Pair[ec[5], k[1]] + 4*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
             Pair[ec[4], k[5]])*Pair[ec[5], k[1]] + 4*Pair[e[2], ec[4]]*
            (Pair[e[1], k[4]]*Pair[ec[5], k[1]] + Pair[e[1], k[5]]*
-             Pair[ec[5], k[4]])) - 8*(C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
-           Pair[e[2], k[3]]*(2*(MH2 - 2*S34 - U)*Pair[e[1], k[5]]*
-             Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*((-2*MH2 + 4*S34 + 2*U)*
-               Pair[ec[4], k[1]] + (3*MH2 - 4*T - U)*Pair[ec[4], k[2]] - 
-              (MH2 + 2*S - 2*T - 2*T14 + U)*Pair[ec[4], k[3]]) + 
-            2*(MH2 - 2*S34 - U)*Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
-            8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
-              Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*Pair[
-                ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*
-                 Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) + 
-          C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
-           (2*(-MH2 + 2*T24 + U)*Pair[e[1], k[5]]*Pair[ec[4], ec[5]] - 
-            Pair[e[1], ec[5]]*((-2*MH2 + 4*T24 + 2*U)*Pair[ec[4], k[1]] + 
-              (-MH2 - 2*S + 2*T - 2*T14 + U)*Pair[ec[4], k[2]] + 
-              (-MH2 + 4*S + U)*Pair[ec[4], k[3]]) + 2*(-MH2 + 2*T24 + U)*
-             Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
-            8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
-              Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*Pair[
-                ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*
-                 Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))) - 
+             Pair[ec[5], k[4]])) - 16*C0i[cc00, 0, U, MH2, MT2, MT2, MT2]*
+         (-2*Pair[e[1], k[5]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[4]])*
+           Pair[ec[4], ec[5]] + 4*Pair[e[1], k[5]]*Pair[e[2], ec[5]]*
+           (Pair[ec[4], k[1]] - Pair[ec[4], k[5]]) + Pair[e[1], ec[5]]*
+           ((-MH2 + S34 + 2*T14 + T24)*Pair[e[2], ec[4]] - 4*Pair[e[2], k[5]]*
+             Pair[ec[4], k[1]] + 4*Pair[e[2], k[1]]*Pair[ec[4], k[5]] - 
+            Pair[e[2], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[5]])) - 
+          2*Pair[e[1], ec[4]]*(Pair[e[2], k[3]] + 2*Pair[e[2], k[4]])*
+           Pair[ec[5], k[1]] + 4*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+            Pair[ec[4], k[5]])*Pair[ec[5], k[1]] + 4*Pair[e[2], ec[4]]*
+           (Pair[e[1], k[4]]*Pair[ec[5], k[1]] + Pair[e[1], k[5]]*
+             Pair[ec[5], k[4]])) - 8*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+         Pair[e[2], k[3]]*(2*(MH2 - 2*S34 - U)*Pair[e[1], k[5]]*
+           Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*((-2*MH2 + 4*S34 + 2*U)*
+             Pair[ec[4], k[1]] + (3*MH2 - 4*T - U)*Pair[ec[4], k[2]] - 
+            (MH2 + 2*S - 2*T - 2*T14 + U)*Pair[ec[4], k[3]]) + 
+          2*(MH2 - 2*S34 - U)*Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
+          8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
+            Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*
+             Pair[ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+              Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) - 
+        8*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+         (2*(-MH2 + 2*T24 + U)*Pair[e[1], k[5]]*Pair[ec[4], ec[5]] - 
+          Pair[e[1], ec[5]]*((-2*MH2 + 4*T24 + 2*U)*Pair[ec[4], k[1]] + 
+            (-MH2 - 2*S + 2*T - 2*T14 + U)*Pair[ec[4], k[2]] + 
+            (-MH2 + 4*S + U)*Pair[ec[4], k[3]]) + 2*(-MH2 + 2*T24 + U)*
+           Pair[e[1], ec[4]]*Pair[ec[5], k[1]] + 
+          8*(Pair[e[1], k[4]]*Pair[ec[4], k[3]]*Pair[ec[5], k[1]] + 
+            Pair[e[1], k[3]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[5]])*
+             Pair[ec[5], k[1]] + Pair[e[1], k[5]]*(Pair[ec[4], k[1]]*Pair[
+                ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
+              Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))) - 
         4*C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
          (Pair[e[1], ec[5]]*((MH2 - S34 - 2*T14 - T24)*(MH2 - U)*
              Pair[e[2], ec[4]] - 4*(MH2 - U)*(Pair[e[2], k[4]]*Pair[ec[4], 
@@ -5165,102 +5224,79 @@
                  Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
                 Pair[ec[4], k[3]]*Pair[ec[5], k[4]])))))) + 
     Den[MH2 - S - T24 - U, 0]*
-     (-(Den[S34, 0]*(4*B0i[bb0, S34, MT2, MT2]*
-          (4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) - 16*C0i[cc00, MH2, S34, 0, MT2, MT2, 
-           MT2]*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], k[5]]*
-            Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-            (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - Pair[e[2], ec[5]]*
-            (Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + Pair[ec[4], k[3]]) + 
-             Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 4*Pair[ec[4], k[5]])) + 
-           4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*Pair[e[2], ec[4]]*
-            Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*(2*Pair[ec[4], k[1]] - 
-             Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + Pair[e[1], ec[4]]*
-            ((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
-             4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*
-                Pair[ec[5], k[2]]))) + 
-         8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*Pair[ec[4], k[3]]*
-            (-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - (MH2 - 2*S + S34 + 
-                  2*T24 - 2*U)*Pair[e[1], k[3]] + (-3*MH2 + S34 + 4*U)*
-                 Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 2*(-MH2 + S34 + 2*T)*
-              Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, 
-             MT2]*Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], 
-                 k[2]] + (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - 
-                 S34 + 2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
-             2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
-             8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
-           MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
-                 Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
-                  k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
-                  k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
-                  k[3]]))) + Pair[e[1], ec[4]]*
-            ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
-             4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], 
-                 k[1]]*Pair[ec[5], k[2]])) + 
-           2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
-               (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
-             2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
-              (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
-           MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
-              Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*
-                Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
-           2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
-              Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
-              Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[1]] + 2*T14*Pair[ec[4], 
-                   k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*Pair[ec[4], 
-                   k[2]] + 2*T24*Pair[ec[4], k[3]]) + Pair[e[1], k[4]]*
-                (-2*(MH2 - S34)*Pair[ec[4], k[2]] + (MH2 + S - S34 + T24 - U)*
-                  Pair[ec[4], k[3]])) + 2*(MH2 - S34)*(Pair[e[1], k[2]] - 
-               Pair[e[1], k[5]])*Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 
-             2*Pair[e[1], e[2]]*((-MH2 + S34)*Pair[ec[4], k[1]] + T14*
-                Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*
-              (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
-                  Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*
-                (Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
-                  Pair[ec[5], k[4]])))))) + 
-      Den[T, 0]*(4*B0i[bb0, T, MT2, MT2]*(Pair[e[2], ec[5]]*
-           (-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 4*Pair[e[1], k[2]]*
-             Pair[ec[4], k[5]] - Pair[e[1], k[3]]*(Pair[ec[4], k[2]] + 
-              Pair[ec[4], k[5]])) - 
-          2*((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], k[5]]*
-             Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*Pair[e[2], k[5]]*
-             (Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) + 
-            ((Pair[e[1], k[3]] + 2*Pair[e[1], k[4]])*Pair[e[2], ec[4]] + 
-              2*Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - Pair[ec[4], k[3]]))*
-             Pair[ec[5], k[2]]) + Pair[e[1], ec[4]]*
-           ((-MH2 + S34 + T14 + 2*T24)*Pair[e[2], ec[5]] + 
-            4*(Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[
-                ec[5], k[4]]))) - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+     (Den[S34, 0]*((4*B0i[bb0, S34, MT2, MT2] - 16*C0i[cc00, MH2, S34, 0, 
+            MT2, MT2, MT2])*(4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + 2*Pair[e[1], ec[5]]*
+           Pair[e[2], k[5]]*(2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]]) - 
+          Pair[e[2], ec[5]]*(Pair[e[1], k[5]]*(-4*Pair[ec[4], k[2]] + 
+              Pair[ec[4], k[3]]) + Pair[e[1], k[2]]*(Pair[ec[4], k[3]] + 
+              4*Pair[ec[4], k[5]])) + 4*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+           Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + 2*Pair[e[1], e[2]]*
+           (2*Pair[ec[4], k[1]] - Pair[ec[4], k[3]])*Pair[ec[5], k[2]] + 
+          Pair[e[1], ec[4]]*((-MH2 + 2*S + T + T14)*Pair[e[2], ec[5]] - 
+            4*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + Pair[e[2], k[1]]*Pair[
+                ec[5], k[2]]))) + 8*(C0i[cc11, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(-(((-2*MH2 + 2*S34 + 4*T)*Pair[e[1], k[2]] - 
+               (MH2 - 2*S + S34 + 2*T24 - 2*U)*Pair[e[1], k[3]] + 
+               (-3*MH2 + S34 + 4*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]]) + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(-MH2 + S34 + 2*T)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]]))) + C0i[cc12, MH2, S34, 0, MT2, MT2, MT2]*
+           Pair[ec[4], k[3]]*(((-2*MH2 + 2*S34 + 4*T14)*Pair[e[1], k[2]] + 
+              (-MH2 + S34 + 4*T24)*Pair[e[1], k[3]] + (MH2 + 2*S - S34 + 
+                2*T24 - 2*U)*Pair[e[1], k[4]])*Pair[e[2], ec[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], ec[5]]*Pair[e[2], k[5]] + 
+            2*(MH2 - S34 - 2*T14)*Pair[e[1], e[2]]*Pair[ec[5], k[2]] + 
+            8*(-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 4*C0i[cc1, MH2, S34, 0, MT2, MT2, 
+          MT2]*(-(Pair[e[2], ec[5]]*(Pair[e[1], k[2]]*(-4*(MH2 - S34)*
+                Pair[ec[4], k[1]] + 2*(MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[4]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (5*MH2 + 2*S - 3*S34 + 2*T24 - 6*U)*Pair[ec[4], 
+                 k[3]]) + Pair[e[1], k[3]]*(-4*(MH2 - S34)*Pair[ec[4], 
+                 k[2]] + (MH2 - 2*S + S34 + 6*T24 - 2*U)*Pair[ec[4], 
+                 k[3]]))) + Pair[e[1], ec[4]]*
+           ((MH2 - S34)*(MH2 - 2*S - T - T14)*Pair[e[2], ec[5]] + 
+            4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], k[1]] + 
+              Pair[e[2], k[1]]*Pair[ec[5], k[2]])) + 
+          2*(-2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] + Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+              (MH2 - S34 - 2*T + 2*T14)*Pair[ec[4], k[3]]) - 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] + Pair[e[1], e[2]]*
+             (-2*(MH2 - S34)*Pair[ec[4], k[1]] + (MH2 - S34 - 2*T + 2*T14)*
+               Pair[ec[4], k[3]])*Pair[ec[5], k[2]] - 8*Pair[ec[4], k[3]]*
+             (-(Pair[e[1], k[4]]*(Pair[e[2], k[3]]*Pair[ec[5], k[2]] + 
+                 Pair[e[2], k[5]]*Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(
+                Pair[e[2], k[4]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                 Pair[ec[5], k[4]])))) - 2*C0i[cc0, MH2, S34, 0, MT2, MT2, 
+          MT2]*(Pair[e[1], ec[4]]*((MH2 - S34)*(MH2 - 2*S - T - T14)*
+             Pair[e[2], ec[5]] + 4*(MH2 - S34)*(Pair[e[2], k[5]]*Pair[ec[5], 
+                k[1]] + Pair[e[2], k[1]]*Pair[ec[5], k[2]])) - 
+          2*(2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], k[5]]*Pair[ec[4], ec[5]] - 2*Pair[e[1], ec[5]]*
+             Pair[e[2], k[5]]*((-MH2 + S34)*Pair[ec[4], k[1]] + 
+              T14*Pair[ec[4], k[3]]) + Pair[e[2], ec[5]]*
+             (Pair[e[1], k[2]]*(-2*(MH2 - S34)*Pair[ec[4], k[1]] + 
+                2*T14*Pair[ec[4], k[3]]) + Pair[e[1], k[3]]*(-2*(MH2 - S34)*
+                 Pair[ec[4], k[2]] + 2*T24*Pair[ec[4], k[3]]) + 
+              Pair[e[1], k[4]]*(-2*(MH2 - S34)*Pair[ec[4], k[2]] + 
+                (MH2 + S - S34 + T24 - U)*Pair[ec[4], k[3]])) + 
+            2*(MH2 - S34)*(Pair[e[1], k[2]] - Pair[e[1], k[5]])*
+             Pair[e[2], ec[4]]*Pair[ec[5], k[2]] - 2*Pair[e[1], e[2]]*
+             ((-MH2 + S34)*Pair[ec[4], k[1]] + T14*Pair[ec[4], k[3]])*
+             Pair[ec[5], k[2]] + 4*Pair[ec[4], k[3]]*(-(Pair[e[1], k[4]]*
+                (Pair[e[2], k[3]]*Pair[ec[5], k[2]] + Pair[e[2], k[5]]*
+                  Pair[ec[5], k[3]])) + Pair[e[1], k[3]]*(Pair[e[2], k[4]]*
+                 Pair[ec[5], k[2]] + Pair[e[2], k[5]]*Pair[ec[5], 
+                  k[4]]))))) - Den[T, 0]*
+       ((4*B0i[bb0, T, MT2, MT2] - 16*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
          (Pair[e[2], ec[5]]*(-4*Pair[e[1], k[5]]*Pair[ec[4], k[2]] + 
             4*Pair[e[1], k[2]]*Pair[ec[4], k[5]] - Pair[e[1], k[3]]*
              (Pair[ec[4], k[2]] + Pair[ec[4], k[5]])) - 
@@ -5334,7 +5370,7 @@
               Pair[e[2], k[3]]*(Pair[ec[4], k[2]] - Pair[ec[4], k[5]])*Pair[
                 ec[5], k[2]] + Pair[e[2], k[5]]*(Pair[ec[4], k[2]]*
                  Pair[ec[5], k[3]] - Pair[ec[4], k[5]]*Pair[ec[5], k[3]] + 
-                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) - 
+                Pair[ec[4], k[3]]*Pair[ec[5], k[4]]))))) + 
       Den[T14, 0]*(-4*(C0i[cc11, MH2, MH2 - S - T24 - U, T14, MT2, MT2, MT2]*
            (-((S34 - T)*(-2*MH2 + S34 + T + 2*U)*Pair[e[1], ec[4]]*
               Pair[e[2], ec[5]]) - 4*(2*MH2 - S34 - T - 2*U)*
diff --git a/ggHgg-SM.diagrams/box_1.png b/ggHgg-SM.diagrams/box_1.png
index 80821939180d2c96f52e3df65f307cdbfffa66cb..cbe3866ea37c5082135ef2cb92265bbf62543943 100644
GIT binary patch
delta 26
icmX?ehUv^1rVV9`+(uT0##V-AC$IH?-Q37{dI<oQB@3Sb

delta 26
icmX?ehUv^1rVV9`+=f=h=2pfg7ncNm+}y}`dI<oNTnjk>

diff --git a/ggHgg-SM.diagrams/box_2.png b/ggHgg-SM.diagrams/box_2.png
index 7d48f94f1cd3235b65324eb41dadc22a084bb93a..565473779128bd0f00ba921087bce8bc84f6aa07 100644
GIT binary patch
delta 26
icmbPmi)q3wrVV9`+(uT0##V-AC$IH?-Q397zZw9H$_owv

delta 26
icmbPmi)q3wrVV9`+=f=h=2ph0%N8f4Z*FAlUkw0-v<d?N

diff --git a/ggHgg-SM.diagrams/box_3.png b/ggHgg-SM.diagrams/box_3.png
index 36ced29fefad67a765d4e8fea95debd825c4521a..8f1cf0f4ac4984e64a8293530bc5d55abb82e84d 100644
GIT binary patch
delta 26
icmX?qkLmn9rVV9`+(uT0##V;r`!4QJ-rUG|ZY=<pcnf3z

delta 26
icmX?qkLmn9rVV9`+=f=h=2ph0%N8f4Z*F8fw-x}B{|d?g

diff --git a/ggHgg-SM.diagrams/box_4.png b/ggHgg-SM.diagrams/box_4.png
index 91910e4becabb0dffb8eab00dfc9e132e2e98811..80870ec7592b3668c9450e88ee43262d5c3d897b 100644
GIT binary patch
delta 26
icmX@LiRsiPrVV9`+(uT0##V;r`!4QJ-rUG|aykHxPYUM%

delta 26
icmX@LiRsiPrVV9`+=f=h=2ph0%N8f4Z*F8fIUN9r)(TAk

diff --git a/ggHgg-SM.diagrams/triangle_1.png b/ggHgg-SM.diagrams/triangle_1.png
index d08f2c8b7f94d67c0b412dce815294b2e2c66807..a75eed582d70516fbfcbf8df1105f3093632468b 100644
GIT binary patch
delta 26
icmdn|fNApsrVV9`+(uT0##V*~3R|@fY;I)Sv<?7?stOzc

delta 26
icmdn|fNApsrVV9`+=f=h=2k`)2RZd;Z*FAVv<?7?(+U3o

diff --git a/ggHgg-SM.diagrams/triangle_2.png b/ggHgg-SM.diagrams/triangle_2.png
index 2e056a5306ec72f363c9079ad9704827c25c726e..bfb0cda7e946cf87b89bc37d3541cb87b96a192c 100644
GIT binary patch
delta 26
icmeCZ&(wRLX+s$!w~>{hv6Z2L!d9&Vn;RK<)&T&3=?N$R

delta 26
icmeCZ&(wRLX+s$!x1p7>xs{Q{K~DYIn;RK<)&T&45(x_c

diff --git a/ggHgg-SM.diagrams/triangle_3.png b/ggHgg-SM.diagrams/triangle_3.png
index 1e988842e8d593173ba84b4e4a2f5449cff89881..15d6c5524366021c028167e6a02cb81fbdd2e6b8 100644
GIT binary patch
delta 26
icmccomFe<VrVV9`+(uT0##V-g;hUtwHa9W`?F0ak<q7Nn

delta 26
icmccomFe<VrVV9`+=f=h=2k|Q+xX;pH#af{?F0aiBnfc<

diff --git a/ggHgg-SM.diagrams/triangle_4.png b/ggHgg-SM.diagrams/triangle_4.png
index 603cde92e139be47e943309212512b43af7c6aa3..ca59dd2d0853d248f83fcae032b9b3e2f4ccc832 100644
GIT binary patch
delta 26
icmaF)k?G|}rVV9`+(uT0##V-g;hUtwHa9Y6YzF|9i3%hD

delta 26
icmaF)k?G|}rVV9`+=f=h=2k|Q+xX;pH#ah7YzF|6$O)+c

diff --git a/ggHgg-SM.diagrams/triangle_5.png b/ggHgg-SM.diagrams/triangle_5.png
index 1f20b2d5d62aa564819f04abc20da05ee4794d88..2d94e0d3dd90a43716662a19782d92e4232c7972 100644
GIT binary patch
delta 24
fcmaD9_b6^d86&rmm7%efp<(zYsj$tBj1P4Ib%6-m

delta 24
gcmaD9_b6^d86&r$m9e>%vB9;I(_U<DWPGR#0D;U3g#Z8m

diff --git a/scripts/FA_FC_B_T_amps.nb b/scripts/FA_FC_B_T_amps.nb
index 693e6508..bb1a9fdb 100644
--- a/scripts/FA_FC_B_T_amps.nb
+++ b/scripts/FA_FC_B_T_amps.nb
@@ -10,10 +10,10 @@
 NotebookFileLineBreakTest
 NotebookFileLineBreakTest
 NotebookDataPosition[       158,          7]
-NotebookDataLength[   3218670,      64135]
-NotebookOptionsPosition[   3120013,      63089]
-NotebookOutlinePosition[   3120351,      63104]
-CellTagsIndexPosition[   3120308,      63101]
+NotebookDataLength[   4907902,     101393]
+NotebookOptionsPosition[   4804717,     100264]
+NotebookOutlinePosition[   4805058,     100279]
+CellTagsIndexPosition[   4805015,     100276]
 WindowFrame->Normal*)
 
 (* Beginning of Notebook Content *)
@@ -35,6 +35,17 @@ Created by: J.G.Reyes Rivera *)\
 
 Cell[CellGroupData[{
 
+Cell[BoxData["$UserBaseDirectory"], "Input",
+ CellChangeTimes->{{3.781960931867899*^9, 3.781960935871614*^9}},
+ CellLabel->"In[36]:=",ExpressionUUID->"bd1b37f2-ddfe-4e0c-b411-f633c74d2ba7"],
+
+Cell[BoxData["\<\"/Users/josegabrielreyes/Library/Mathematica\"\>"], "Output",
+ CellChangeTimes->{3.781960936141699*^9},
+ CellLabel->"Out[36]=",ExpressionUUID->"ae71b52c-3d7a-4512-8cd1-01fb837dbd16"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
 Cell[BoxData[{
  RowBox[{"<<", "FormCalc`"}], "\[IndentingNewLine]", 
  RowBox[{"<<", "FeynArts`"}], "\[IndentingNewLine]", 
@@ -47,78 +58,78 @@ Cell[BoxData[{
    3.7694115449136333`*^9}, {3.781958542389155*^9, 3.781958542633918*^9}, {
    3.781959579884385*^9, 3.781959580623137*^9}, {3.781959614392108*^9, 
    3.781959628194764*^9}, {3.781959844756269*^9, 3.78195984835019*^9}},
- CellLabel->"In[1]:=",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
+ CellLabel->"In[63]:=",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
 
 Cell[CellGroupData[{
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{
   3.78195958263301*^9, {3.781959618123176*^9, 3.781959654228959*^9}, 
-   3.7819598488083277`*^9, 3.781960629567432*^9},
+   3.7819598488083277`*^9, 3.781960629567432*^9, 3.781962774678968*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"0bed2b69-2169-43c0-bccb-6555417f2018"],
+In[63]:=",ExpressionUUID->"9fa33d93-e38f-4489-b1ec-1703a9cbbfb6"],
 
 Cell[BoxData["\<\"FormCalc 9.9 (6 Oct 2019)\"\>"], "Print",
  CellChangeTimes->{
   3.78195958263301*^9, {3.781959618123176*^9, 3.781959654228959*^9}, 
-   3.7819598488083277`*^9, 3.781960629577284*^9},
+   3.7819598488083277`*^9, 3.781960629567432*^9, 3.781962774682786*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"69fb9c11-7db8-4625-8c94-5ff2f87bf757"],
+In[63]:=",ExpressionUUID->"93de2919-7440-474a-8674-58dc028a05a6"],
 
 Cell[BoxData["\<\"by Thomas Hahn\"\>"], "Print",
  CellChangeTimes->{
   3.78195958263301*^9, {3.781959618123176*^9, 3.781959654228959*^9}, 
-   3.7819598488083277`*^9, 3.781960629585142*^9},
+   3.7819598488083277`*^9, 3.781960629567432*^9, 3.781962774691113*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"094c767f-d8a2-4418-ba3f-3933a257d77c"]
+In[63]:=",ExpressionUUID->"388d581e-42b6-4aef-b367-11545d731106"]
 }, Open  ]],
 
 Cell[BoxData[
  TemplateBox[{
-  "args","shdw",
-   "\"Symbol \\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"args\\\\\\\"\\\"}]\\\\) \
+  "args$","shdw",
+   "\"Symbol \\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"args$\\\\\\\"\\\"}]\\\\) \
 appears in multiple contexts \\\\!\\\\(\\\\*RowBox[{\\\"{\\\", RowBox[{\\\"\\\
 \\\\\"FeynArts`\\\\\\\"\\\", \\\",\\\", \\\"\\\\\\\"Global`\\\\\\\"\\\"}], \\\
 \"}\\\"}]\\\\); definitions in context \
 \\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"FeynArts`\\\\\\\"\\\"}]\\\\) may shadow or \
-be shadowed by other definitions.\"",2,2,1,17521400197523809428,
-   "Alternate Kernel","FeynArts`args"},
+be shadowed by other definitions.\"",2,63,3,17521400197523809428,
+   "Alternate Kernel","FeynArts`args$"},
   "MessageTemplate2"]], "Message", "MSG",
  CellChangeTimes->{
   3.781959582591537*^9, {3.7819596180775957`*^9, 3.781959654134988*^9}, 
-   3.781959848769113*^9, 3.7819606300538263`*^9},
+   3.781959848769113*^9, 3.7819606300538263`*^9, 3.7819627747387943`*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"e90079bd-ddd6-4cb0-b0e8-0cd6005736b3"],
+In[63]:=",ExpressionUUID->"1445b7ec-528d-4f9d-aa62-1011ec94ecfa"],
 
 Cell[CellGroupData[{
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{
   3.78195958263301*^9, {3.781959618123176*^9, 3.781959654228959*^9}, 
-   3.7819598488083277`*^9, 3.781960630068918*^9},
+   3.7819598488083277`*^9, 3.781960629567432*^9, 3.781962774795807*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"b5b7f0c8-4024-435a-930d-7d1443290e28"],
+In[63]:=",ExpressionUUID->"641a4548-97f7-4045-9625-7c73d34e155b"],
 
 Cell[BoxData["\<\"FeynArts 3.10 (21 Jan 2019)\"\>"], "Print",
  CellChangeTimes->{
   3.78195958263301*^9, {3.781959618123176*^9, 3.781959654228959*^9}, 
-   3.7819598488083277`*^9, 3.781960630072606*^9},
+   3.7819598488083277`*^9, 3.781960629567432*^9, 3.781962774798935*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"d8717242-fa34-4d45-b99f-ddf95a6dea6c"],
+In[63]:=",ExpressionUUID->"7f02f920-aaea-4477-beb6-6a1a8f2d4502"],
 
 Cell[BoxData["\<\"by Hagen Eck, Sepp Kueblbeck, and Thomas Hahn\"\>"], "Print",
  CellChangeTimes->{
   3.78195958263301*^9, {3.781959618123176*^9, 3.781959654228959*^9}, 
-   3.7819598488083277`*^9, 3.7819606300799932`*^9},
+   3.7819598488083277`*^9, 3.781960629567432*^9, 3.781962774804763*^9},
  CellLabel->
   "During evaluation of \
-In[1]:=",ExpressionUUID->"a4551807-5683-4009-9950-6ad824410832"]
+In[63]:=",ExpressionUUID->"9cdd89f4-5903-407a-af1d-be06d2be462c"]
 }, Open  ]]
 }, Open  ]],
 
@@ -182,7 +193,7 @@ Cell[BoxData[{
   3.750171453707425*^9, 3.750171462665347*^9}, {3.766143695796837*^9, 
   3.766143701796813*^9}, {3.766143820264229*^9, 3.766143850794642*^9}, {
   3.7791235960830507`*^9, 3.7791235962800083`*^9}},
- CellLabel->"In[81]:=",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
+ CellLabel->"In[66]:=",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
 
 Cell[CellGroupData[{
 
@@ -359,7 +370,7 @@ Cell[BoxData[{
   3.7743707511228867`*^9}, {3.774370817690271*^9, 3.774370821533065*^9}, {
   3.779123632914426*^9, 3.779123639658691*^9}, {3.779123925097299*^9, 
   3.779123925915174*^9}, {3.779123958593301*^9, 3.7791239985265427`*^9}},
- CellLabel->"In[89]:=",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
+ CellLabel->"In[74]:=",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
 
 Cell[CellGroupData[{
 
@@ -368,20 +379,282 @@ Cell[BoxData["\<\"Triangles\"\>"], "Print",
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959460910985*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783696611*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"82547ed8-3aab-4649-84aa-19fe95d82789"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783839209*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"9718c596-0b70-43c5-84df-551ad849ca2b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"generic\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Library/Mathematica/Applications/FeynArts-3.10/\
+Models/Lorentz.gen\"\>"}],
+  SequenceForm[
+  "", "loading ", "generic", " model file ", 
+   "/Users/josegabrielreyes/Library/Mathematica/Applications/FeynArts-3.10/\
+Models/Lorentz.gen"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783849535*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"25782e3c-1f39-4dae-a858-296dc485d761"],
+
+Cell[BoxData["\<\"> $GenericMixing is OFF\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783851881*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"139243b0-67d6-44a0-a701-8b8cb91806e8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"generic model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"Lorentz\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["generic model ", {"Lorentz"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783854106*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"125e570f-24b6-4941-b434-3f26cd8aad5a"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783856435*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"bf3dda0f-a0d9-41e6-85c8-99886d9643e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Library/Mathematica/Applications/FeynArts-3.10/\
+Models/SMQCD.mod\"\>"}],
+  SequenceForm[
+  "", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Library/Mathematica/Applications/FeynArts-3.10/\
+Models/SMQCD.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783858307*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"138878c5-c418-49c9-8fd8-e499ad7e718c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"  \"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Library/Mathematica/Applications/FeynArts-3.10/\
+Models/SM.mod\"\>"}],
+  SequenceForm[
+  "  ", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Library/Mathematica/Applications/FeynArts-3.10/\
+Models/SM.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783860367*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"b8ffb195-79c0-4ae8-aa36-86caca788c4d"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627838624697`*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"fb4d152a-c582-4509-80be-dc798d279e8f"],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+    {GridBox[{
+       {
+        RowBox[{"$CKM", "=", "False"}]}
+      },
+      BaselinePosition->{Baseline, {1, 1}},
+      GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+      GridBoxItemSize->{"Columns" -> {{
+           Scaled[0.999]}}, "Rows" -> {{1.}}}]}
+   },
+   BaselinePosition->{Baseline, {1, 1}},
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}],
+  Definition[$CellContext`$CKM],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783864613*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"42d962e4-9a93-40a3-844a-c32643a4b3a0"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783866878*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"db5d7701-1ea6-4dcc-bdba-3a52bbd45062"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\" particles (incl. antiparticles) in \"\>", 
+   "\[InvisibleSpace]", "18", "\[InvisibleSpace]", "\<\" classes\"\>"}],
+  SequenceForm[
+  "> ", 49, " particles (incl. antiparticles) in ", 18, " classes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627838752832`*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"13d5f218-a22d-4e30-aa1b-f8c010bac126"],
+
+Cell[BoxData["\<\"> $CounterTerms are ON\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783918158*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c850d677-e0e6-4b48-aba1-96ad819dedbc"],
+In[74]:=",ExpressionUUID->"fdb0dbef-bfe7-49aa-910a-9c7e56d7edef"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\" vertices\"\>"}],
+  SequenceForm["> ", 93, " vertices"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783920363*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"0078fab2-b558-4fcc-99d7-7b080d1f5647"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 1\"\>"}],
+  SequenceForm["> ", 121, " counterterms of order 1"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783959199*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"e9557e61-d15b-44cf-b087-8ab085e31974"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 2\"\>"}],
+  SequenceForm["> ", 6, " counterterms of order 2"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627839700108`*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"7023db93-922f-42ab-af03-4e08c41ec007"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"classes model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"SMQCD\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["classes model ", {"SMQCD"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
+  3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962783972356*^9},
+ CellLabel->
+  "During evaluation of \
+In[74]:=",ExpressionUUID->"a7049a1d-57f1-42d6-8c9e-001d5f274f33"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461092926*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784030634*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bae17365-a1f3-4753-8ab3-acea7c57a94e"],
+In[74]:=",ExpressionUUID->"fd004af9-4279-4b73-bcf8-5438bef4715c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -395,20 +668,22 @@ ones)\"\>"}],
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461102556*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784032682*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"90f70628-7671-42be-b09b-b5ce0390fe29"],
+In[74]:=",ExpressionUUID->"65f9f4bd-8ee1-4e3b-bcaf-15af20238da0"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461104336*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784039712*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"60540d0c-7bcd-49ba-86a3-096e98027ac1"],
+In[74]:=",ExpressionUUID->"85e90d43-c0ab-4078-8dd8-13eda9a7f53c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -420,10 +695,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461106057*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784042026*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6d66d71c-a9c9-49d7-b2be-67f6515f2405"],
+In[74]:=",ExpressionUUID->"73888312-332d-4d2c-875c-032441f970ce"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -436,10 +712,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461107881*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784075869*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bdaf03fd-6e39-4812-8667-6c7d1f939140"],
+In[74]:=",ExpressionUUID->"e4e62815-bdd9-480c-94aa-946f312fdb06"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -452,10 +729,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461143531*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784086657*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"64225ca4-f071-4b26-a3e8-3aa2b9d3ba52"],
+In[74]:=",ExpressionUUID->"d785ba0c-4870-4856-adaf-f20a7ba6df8f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -468,10 +746,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461180031*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784121578*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5f6df367-ac98-497d-a329-faebfec24d47"],
+In[74]:=",ExpressionUUID->"929b70a1-f10c-4163-8ba9-39d3469f5f12"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -484,10 +763,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461182158*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784124048*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"589a2794-93e0-4242-a46b-a87daccc5dbc"],
+In[74]:=",ExpressionUUID->"6a34f3da-7d15-4388-9222-6d1e92009ce8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -500,10 +780,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461219452*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627841637297`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d083104b-4f3e-4392-a45f-e44b9da55db8"],
+In[74]:=",ExpressionUUID->"12f1863c-5a90-4119-b2b0-e3568f540290"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -516,10 +797,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461221436*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784166239*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"681e2ccc-23b4-48f1-8e87-daecf2d22374"],
+In[74]:=",ExpressionUUID->"ad0a359d-3d1f-4438-82b6-442faba233ef"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -532,10 +814,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461223263*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784169222*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a6841b51-8e80-4541-9f5f-0babfa258262"],
+In[74]:=",ExpressionUUID->"ac3276e3-a34d-42a8-973e-e17fa6e5b774"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -548,10 +831,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461262793*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784210773*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"05b0a2a3-db60-41cf-bd9c-6cd2096a51cd"],
+In[74]:=",ExpressionUUID->"5038ff0e-21ed-4e7a-b40d-db23acbdd981"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -564,10 +848,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461302899*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784258902*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0f96c639-3496-4e32-adf9-3f41cadaf204"],
+In[74]:=",ExpressionUUID->"19487acc-3280-4516-a3ba-427fb17285e0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -580,10 +865,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461304756*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784272884*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1bde26ee-32fa-4f24-bd86-5e20c1815fb9"],
+In[74]:=",ExpressionUUID->"a43f51c5-00b3-422e-a53d-f707467cb9bc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -596,10 +882,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461345847*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784308955*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"83593b22-52ec-412f-89b5-e02520615c63"],
+In[74]:=",ExpressionUUID->"0e78c524-b669-4de7-84d9-5ede6a4af18b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -612,10 +899,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594613871183`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784354458*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ceaaabcd-38a2-4a24-96e9-317d28e10f6a"],
+In[74]:=",ExpressionUUID->"fc31cfab-40da-4723-95cc-2704f8aa5312"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -628,10 +916,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461456094*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627844161043`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"15be3f24-bcf8-41f7-89d4-e93133a906f5"],
+In[74]:=",ExpressionUUID->"7d67bee6-9d56-47f4-9a5a-96ce64a8e7ac"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -644,10 +933,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594615017014`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278445131*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"154d4dea-25a9-41ce-a4ed-92135bdc20e7"],
+In[74]:=",ExpressionUUID->"c4699cf8-85fa-4a6e-96f3-398ab2c82c1b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -660,10 +950,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461542007*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784515233*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"74129927-374d-42db-803c-b8ad3e0951f3"],
+In[74]:=",ExpressionUUID->"47fd9f87-196f-4b05-a5d7-bb504aec8669"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -676,10 +967,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594616077337`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784586505*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"03cc396e-e006-4425-8edc-fe9c7e9b57b8"],
+In[74]:=",ExpressionUUID->"a298ca84-b06a-4a0a-a32c-32a93c49365f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -692,10 +984,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594616446543`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784682276*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"16961e49-9bd6-425a-bb29-357aca493e03"],
+In[74]:=",ExpressionUUID->"ed2d69f5-cf25-4aff-9632-11596189f5b1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -708,10 +1001,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461685794*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784751848*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"62c06080-02df-4610-99f2-ff0e9faedbd0"],
+In[74]:=",ExpressionUUID->"27738425-8073-4305-9d05-1dd9caca8199"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -724,10 +1018,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461725155*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784784459*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"436e53c2-e465-46d4-8929-72477b072964"],
+In[74]:=",ExpressionUUID->"d31c76fa-b043-4792-a250-97d1c072cc32"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -740,10 +1035,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461767356*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784814369*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9323b055-e714-47a6-8646-75fd64777fc7"],
+In[74]:=",ExpressionUUID->"deac3a4c-f707-4865-8da7-67168216cb3b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -756,10 +1052,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594618065*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784854024*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"54f676b2-b4a7-42c4-a989-639191ef1ab1"],
+In[74]:=",ExpressionUUID->"28d41f59-0fa3-49e5-81e2-549ea8b3d6ba"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -772,10 +1069,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594618087177`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784897542*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8bd39f42-4ce1-4bd5-9c9b-58e7d10263f9"],
+In[74]:=",ExpressionUUID->"9d5af0c0-5d82-4cb7-9689-00e3ec303305"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -788,10 +1086,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461851664*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784943046*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1cc4f86e-b088-48fa-aed6-181f177d1579"],
+In[74]:=",ExpressionUUID->"ec101407-aa2d-4b11-bec3-6f0cc42beeba"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -804,10 +1103,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461891464*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962784989503*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"39563a07-3629-42ee-abfc-59e31424e412"],
+In[74]:=",ExpressionUUID->"79c60b4a-a13a-4dc4-9712-11d6d7d2a9e0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -820,10 +1120,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461933929*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785027315*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f009df17-a1a1-4686-bdbf-05063e39494d"],
+In[74]:=",ExpressionUUID->"4c125a7f-d3a2-49d4-909e-e2d35932b892"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -836,10 +1137,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959461974701*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278506743*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"424560fc-97c5-4cd4-82ca-816ae618e300"],
+In[74]:=",ExpressionUUID->"5a1ca0a1-2f18-4e52-8d11-23753787d736"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -852,10 +1154,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462017026*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785103265*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5d643c12-f300-40d2-a463-931180a52644"],
+In[74]:=",ExpressionUUID->"3cfa2bb2-392a-4b21-a179-e23869ab3963"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -868,10 +1171,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594620232*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785135089*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a1db9c2a-9026-4465-aa07-8eb6c27df223"],
+In[74]:=",ExpressionUUID->"39935f75-7a91-409b-8337-bcbb96f0c9bb"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -884,10 +1188,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594620839233`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785205654*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ae680557-7ef5-4bbc-8daf-9869f0b9e8ea"],
+In[74]:=",ExpressionUUID->"015efd48-2aa6-4807-a885-ecebc9f68342"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -900,10 +1205,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946211967*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785244801*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ef2ef909-0cdb-4f23-be10-d734b958dc09"],
+In[74]:=",ExpressionUUID->"65747925-71d8-4522-be27-76a874e8ac77"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -916,10 +1222,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462184092*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785319911*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"af2c2d58-6c09-4558-8823-4780a0890b14"],
+In[74]:=",ExpressionUUID->"11ca6927-fabe-4476-838e-8be297d94526"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -932,10 +1239,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462220232*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785353647*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2bf8c6e7-55f0-4590-bb3c-cab1798f55cc"],
+In[74]:=",ExpressionUUID->"34266ebe-62d7-4d74-9893-dde175ad04c0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -948,10 +1256,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594622831163`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785422513*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"abd733aa-e9c6-478c-9b23-4b97d43776af"],
+In[74]:=",ExpressionUUID->"8d28166a-d8c3-475b-b2c7-0fab0c2d6d18"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -964,10 +1273,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462344226*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785486532*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1e42c595-5049-46ca-afb4-79a937e1e7bb"],
+In[74]:=",ExpressionUUID->"3d881013-db20-4c7d-8c59-484924367271"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -980,10 +1290,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462382764*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785523569*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"77a502a0-c28a-457a-bfcf-ed4694e545d7"],
+In[74]:=",ExpressionUUID->"6acd0975-fa7f-451f-a066-a4f61d6ca08b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -996,10 +1307,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946244807*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785598139*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ad0dd7c2-5fc8-480a-a9f8-0dcab87b4a22"],
+In[74]:=",ExpressionUUID->"789643cd-02c5-4b13-acf5-6ea60332f1e9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1012,10 +1324,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462484779*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785640917*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8c08d05d-2850-4a93-b33d-561a57ef067b"],
+In[74]:=",ExpressionUUID->"207b688a-67bc-4129-8710-8f72628e7ca2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1028,10 +1341,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462549045*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627857099657`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6f634f8c-37c6-4a79-ba3c-f8af40cb8595"],
+In[74]:=",ExpressionUUID->"ccd247f9-8cfb-41c2-b0ec-6aff0346eeb8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1044,10 +1358,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462584247*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785744791*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7b35ef0c-aba0-4502-a158-9bf408411481"],
+In[74]:=",ExpressionUUID->"cdb61964-c838-49e8-b26d-8f5251bdf424"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1060,10 +1375,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462624495*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627857867393`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c9f971bd-32e0-4a8b-870d-4986d217427e"],
+In[74]:=",ExpressionUUID->"cbf5a5cb-76ee-4956-9097-c430bb72d084"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1076,10 +1392,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462668647*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785822397*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9b698cd0-632c-44eb-a4ff-1b3b026e4778"],
+In[74]:=",ExpressionUUID->"6ff89f0c-2fb5-41f7-ae2b-97497b7975ee"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1092,10 +1409,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462707479*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962785882341*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"96cd34e5-fea2-4277-8f08-94f70f1c0c30"],
+In[74]:=",ExpressionUUID->"c74f441e-6d17-4be9-bbc7-0cb0fe8d923d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1108,10 +1426,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594627202578`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627859543133`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1f3d92f4-847f-47c2-8329-018da04e3eb3"],
+In[74]:=",ExpressionUUID->"dbfa2f7b-eb2b-43c0-86ed-e6a1c93e5a30"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1124,10 +1443,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462788959*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786070076*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"78fe6544-15e2-478b-b014-529fb2a00ae8"],
+In[74]:=",ExpressionUUID->"259dbff3-ecc0-43c6-941d-0aa2fdd09cd2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1140,10 +1460,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462827829*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627861050367`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a86ffb47-09c1-4b4a-bc3d-eec8761cff3e"],
+In[74]:=",ExpressionUUID->"633d32db-e386-4f52-a5a8-6cac02c6ced2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1156,10 +1477,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462897119*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786176235*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d3a847fc-28da-4b71-ab07-67ace23dbbcf"],
+In[74]:=",ExpressionUUID->"b3f2c91e-dbb6-4523-9af6-f15713012540"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1172,10 +1494,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959462966606*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786247616*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5a3929e2-73d0-4791-8ca8-243d5688bbf8"],
+In[74]:=",ExpressionUUID->"1a159f5a-9781-4795-af3b-c420a769b788"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1188,10 +1511,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463000537*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627862907*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5257a772-5ad7-4d22-bc6c-4271c64c1b5b"],
+In[74]:=",ExpressionUUID->"b1e6480b-d55e-4ab3-8fd8-65f733c04722"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1204,10 +1528,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463068996*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786363913*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1ffda7ae-fbac-44a9-b04b-ac8a16b140e9"],
+In[74]:=",ExpressionUUID->"810e4283-5ccf-408b-9328-41992ed4b95f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1220,10 +1545,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463100634*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786404598*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c820008d-039b-4927-b06d-f593790877f7"],
+In[74]:=",ExpressionUUID->"a76a5958-408c-456f-b77b-311eef097efc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1236,10 +1562,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463141164*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786443964*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"32735ec1-a7fa-4c71-ba43-64d52ca8e1d6"],
+In[74]:=",ExpressionUUID->"4099d85c-527f-4c43-8106-512c554e33e7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1252,10 +1579,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463176239*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786485564*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6566d7ca-1f53-4ce3-b441-ef611a44288c"],
+In[74]:=",ExpressionUUID->"de194a67-ebf7-4089-9357-047a8e541f16"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1268,10 +1596,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463253892*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278655665*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a0fcd42c-295f-4f6f-b104-d9c9f53509a8"],
+In[74]:=",ExpressionUUID->"a4c2720c-b735-4540-8c2b-292c27e31260"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1284,10 +1613,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463342963*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786643762*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8299240b-d49a-4810-a9cc-0de9ae75ef76"],
+In[74]:=",ExpressionUUID->"f6402dfc-64fc-40e2-9e06-e0a7f225db12"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1300,10 +1630,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463381648*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627866876917`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c932a75f-9ab8-4c23-8597-b9521385dde9"],
+In[74]:=",ExpressionUUID->"6f9fc23b-6eb0-4238-bf25-e833e202b59c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1316,10 +1647,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594633842*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786691246*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"63f8f3b6-35c6-4200-9e84-95bfac4e3c3d"],
+In[74]:=",ExpressionUUID->"e8237b60-199b-49b9-ae8d-cd396fafc0d0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1332,10 +1664,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946339009*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786700569*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"15fd22f2-21fe-4c08-8853-424952289d33"],
+In[74]:=",ExpressionUUID->"97938558-aa6e-4856-94a1-70c414180e65"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1348,10 +1681,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463392209*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786703353*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8749d1b6-f0ab-4b1f-9527-c8e18881b4e7"],
+In[74]:=",ExpressionUUID->"930605c0-d033-46ce-af8b-08efc3646c48"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1364,10 +1698,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463394774*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867057962`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d1b82f21-de4d-4d42-bf8b-3d8bff221138"],
+In[74]:=",ExpressionUUID->"0fbcd398-ed4d-4054-8847-2f7a3349f165"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1380,10 +1715,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594633968563`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867100677`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d37adc0f-39cb-4aff-80f0-5fe623081fe1"],
+In[74]:=",ExpressionUUID->"21f75713-6843-4f05-80dc-c3cc8769711a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1396,10 +1732,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594633989353`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786713952*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a6a2a9f5-ad8e-4043-b860-cc5d73fee99e"],
+In[74]:=",ExpressionUUID->"dd4e2340-26f9-4996-90c0-e4a101153935"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1412,10 +1749,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463402128*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786716454*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"02072772-4753-4438-9d49-2132fc43cc39"],
+In[74]:=",ExpressionUUID->"1c16be79-42ff-44da-888d-230c7ad45e2f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1428,10 +1766,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463404442*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867189198`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e0778a6b-8c51-42ec-8a1d-4ad8ae57677b"],
+In[74]:=",ExpressionUUID->"a376a200-7310-4aee-ae86-5ab77687f567"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1444,10 +1783,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594634066477`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867215776`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0f5e8a55-79ce-4f83-b9d6-7763f9994784"],
+In[74]:=",ExpressionUUID->"2264d416-0e03-4710-9779-5ab95fdae5cc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1460,10 +1800,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594634132843`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786754784*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"37a09b94-d126-4172-a433-5df6a29de41c"],
+In[74]:=",ExpressionUUID->"87d7341b-56f7-4b11-a782-a2c7e0a34b04"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1476,10 +1817,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463416872*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786759306*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"051b2c62-5d07-4b29-beb5-a09abbcfa9d9"],
+In[74]:=",ExpressionUUID->"69f37c98-f15e-4ba7-9d2d-bb3158a76050"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1492,10 +1834,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463420294*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867626677`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3b26fd04-92e4-4b46-8b99-46001cfa4f92"],
+In[74]:=",ExpressionUUID->"9bb196b4-2a5b-47da-87e7-4878c1d8006f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1508,10 +1851,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946342323*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786768362*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"832a06f3-f1b0-44e1-beb9-fe960216df29"],
+In[74]:=",ExpressionUUID->"d8e9ce5b-4f8a-41a9-81b9-70fea19ab22d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1524,10 +1868,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946342596*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786771134*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"345a1730-740d-4123-b8ef-0b7b44b294d2"],
+In[74]:=",ExpressionUUID->"847e4290-84b5-40b8-ab8f-1e8d71cc4d3d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1540,10 +1885,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463429443*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867737627`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"57db4d4f-8833-4f56-99cf-7198c6ed4713"],
+In[74]:=",ExpressionUUID->"adacb977-4f71-49a2-ab6b-44b5e13eebdf"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1556,10 +1902,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463466501*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867786922`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"25f8f075-cc2d-4974-9b65-3f83c429f2c8"],
+In[74]:=",ExpressionUUID->"46f1f536-97a2-48b2-8056-dcee76e3544b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1572,10 +1919,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463472375*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786782198*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"11bb23c9-26ce-476b-a6fa-8b75ff419a75"],
+In[74]:=",ExpressionUUID->"4800836b-b641-41f8-a542-18ce02c1b37d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1588,10 +1936,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463476075*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786784615*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b439e80a-3c2c-48f6-9d85-1ccc3497a121"],
+In[74]:=",ExpressionUUID->"3d8e4ff6-1bbc-49f6-a1c8-26381cfb42d5"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1604,10 +1953,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594634792643`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278678697*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f2f7e84a-84cf-420d-9ac7-2ae21258ee61"],
+In[74]:=",ExpressionUUID->"72f3db9e-81d4-4f10-8175-2bc92e724e94"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1620,10 +1970,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463482655*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786789463*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"49798cdd-b00a-44df-a4a4-90ae3824838a"],
+In[74]:=",ExpressionUUID->"88f53e9d-8f9d-4dd8-93ba-6e2fa9d324cc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1636,10 +1987,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463485187*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786792993*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"038b5a3a-813c-4c2d-8fca-fa12137d3320"],
+In[74]:=",ExpressionUUID->"e93fe0cf-e57e-4c1c-b0ca-950b0d292e78"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1652,10 +2004,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463487247*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786795518*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ca2726ba-edba-490e-b617-f2a3cacc0d6c"],
+In[74]:=",ExpressionUUID->"d765a3a8-bd79-47c8-b436-eaf7366b974d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1668,10 +2021,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594634892607`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627867981243`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"900a6a4f-b04c-44f1-9905-fbf1fdf830e4"],
+In[74]:=",ExpressionUUID->"fed0e7d7-fb74-4f20-9cc1-6f6b49a02e5d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1684,10 +2038,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463491308*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786800571*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e7c339e0-3ae1-4f98-b019-bca42abd2074"],
+In[74]:=",ExpressionUUID->"10a47594-8e2c-46f8-a78b-5950ffa59a66"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1700,10 +2055,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463493285*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786803072*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f3ac1ff3-bec4-4edd-8d8e-9ad17a92a45c"],
+In[74]:=",ExpressionUUID->"bc0c7f0a-4ab1-43ce-982c-8c0892732691"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1716,10 +2072,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594634953117`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786805499*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2895d9a1-6902-4c1c-a020-104078d58139"],
+In[74]:=",ExpressionUUID->"5fda2afc-e184-4598-8f27-83c6d12321ef"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1732,10 +2089,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463497242*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786808139*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"13b313b1-e851-4fe1-9b93-0ebbc6be86d3"],
+In[74]:=",ExpressionUUID->"3899b430-0c47-40a6-a912-40a08c1b3014"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1748,10 +2106,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594634991713`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627868104553`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ea262980-fd99-4864-8d5a-330f2ef9088c"],
+In[74]:=",ExpressionUUID->"3fa84a26-afc6-4fab-9add-bf9dcb91a33a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1764,10 +2123,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463501381*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786812852*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5d9b924c-5b8f-40be-b152-cf1cd182955a"],
+In[74]:=",ExpressionUUID->"35c8abf7-6a08-472d-94ad-3a4e660e0851"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1780,10 +2140,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594635034447`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786815345*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dfae0ed5-3c4f-42e7-bb93-ebbb1f577594"],
+In[74]:=",ExpressionUUID->"5e7f742e-99ba-4f0f-b826-0e164d6d0eec"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1796,10 +2157,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463505396*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627868175917`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"71921be3-82f7-4203-9861-6cccbe4f332d"],
+In[74]:=",ExpressionUUID->"6a6e5ca5-8720-4eaf-81cf-e7db8f9d7870"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1812,10 +2174,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594635077677`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627868251257`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"634f61b3-bac1-4008-acb8-be710f1b5fa5"],
+In[74]:=",ExpressionUUID->"21439967-b63c-4eb4-aba2-5806fab9d220"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1828,10 +2191,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463514185*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786854907*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b64bd75c-bd91-462d-a640-7a0034bca74d"],
+In[74]:=",ExpressionUUID->"79ab941c-0a80-496a-8739-fc7061fe625f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1844,10 +2208,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594635413723`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627868580923`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"473d7dbc-aa36-4030-8594-227c0793ad5c"],
+In[74]:=",ExpressionUUID->"eadc1497-69a8-4852-be88-a716beef8bd4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1860,10 +2225,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463543879*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786860773*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"50f6ba73-b6b4-42c8-8b43-cf76506b0b9f"],
+In[74]:=",ExpressionUUID->"e238bcb2-8f4f-4d88-9c40-994c4647d1a6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1876,10 +2242,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463546074*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786863111*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a4e737e8-178e-422b-ba7f-bf235683f1ff"],
+In[74]:=",ExpressionUUID->"a1665974-10bb-4c9c-a740-93e05b36c075"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1892,10 +2259,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463548114*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786869936*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2d39a445-4b29-46c7-8755-4f0230375d72"],
+In[74]:=",ExpressionUUID->"30bd9cb4-08ea-4b56-8efd-13be6c0b9e6c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1908,10 +2276,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463558769*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627868978243`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d63e306c-7aae-4c26-968f-32af0cbdff1c"],
+In[74]:=",ExpressionUUID->"3be72b01-9637-4a1a-a3a1-ada1a2daa315"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1924,10 +2293,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463587821*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786900303*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ce111455-c597-4ed8-a0d2-eda46ffc6419"],
+In[74]:=",ExpressionUUID->"bd0d0eae-6140-477c-a3f5-b3fbdad0441b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1940,10 +2310,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463590358*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627869023657`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"73d41ad4-1e8e-485b-b8c8-fc9c9b82eb5c"],
+In[74]:=",ExpressionUUID->"26843cc6-d6f7-4f18-b764-926096ef85c1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1956,10 +2327,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463592267*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786904662*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"62381954-131e-4de8-ac4c-b4a3eff1e81d"],
+In[74]:=",ExpressionUUID->"a53d7dc8-d1de-4162-a594-f45b6f553920"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1972,10 +2344,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594635942574`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786937158*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8204de00-fc41-42f4-8a6c-d581ae66d937"],
+In[74]:=",ExpressionUUID->"dbac1e75-b1c5-4760-80de-ddb797f2b770"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -1988,10 +2361,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463602377*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627869405537`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c2df9ba6-714d-411d-af6e-97f7981a3381"],
+In[74]:=",ExpressionUUID->"dc615222-4dd3-4d12-8a1d-d45646253326"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2004,10 +2378,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463635089*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786943245*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d83b4e5b-5247-4076-8242-5d7d44c59980"],
+In[74]:=",ExpressionUUID->"73df4581-6e4d-49c9-8d5d-68a68dd6d4a3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2020,10 +2395,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594636417847`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786945532*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"76ef28e9-99d6-423c-be69-22516ac045d7"],
+In[74]:=",ExpressionUUID->"2251b02c-2402-49f7-bb02-7e68af6b447f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2036,10 +2412,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463643705*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627869568577`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"db7a6c57-d37b-4c14-9317-c2b8a13a2d76"],
+In[74]:=",ExpressionUUID->"b171551a-c92b-4368-a7e9-6726c61f89d2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2052,10 +2429,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463646531*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627869843607`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"828db509-28a9-416e-918c-fb2d80a1c32f"],
+In[74]:=",ExpressionUUID->"121e8834-ba54-4322-a701-f7f9c43be667"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2068,10 +2446,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594636485987`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786987112*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3391780e-53ce-4ded-be16-f8942ef78cc1"],
+In[74]:=",ExpressionUUID->"2c665b01-bba6-4d4e-b975-41989b57b1c4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2084,10 +2463,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463678913*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786989559*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d24b97ab-9d1c-4603-b9b5-66293745e9c6"],
+In[74]:=",ExpressionUUID->"f68dbeb3-be73-4898-8060-0cd3384e3d16"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2100,10 +2480,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463681266*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627869920473`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e69c1e97-dbee-458e-97b8-b4f95e96db94"],
+In[74]:=",ExpressionUUID->"4f613f74-ab48-455a-b515-121e5bbb052f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2116,10 +2497,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594636832867`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962786994444*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"98300ab1-2f7f-4a0d-b0f5-edfd9669a851"],
+In[74]:=",ExpressionUUID->"227bb972-fe1f-4056-8655-5ab0f394cf47"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2132,10 +2514,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946368979*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787005761*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9194c07e-062c-49cd-9fef-f1e20525d6b0"],
+In[74]:=",ExpressionUUID->"8701812c-2ea9-494b-8775-f43c04f12355"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2148,10 +2531,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946369736*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787032346*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"81ad9ea6-8585-410a-a67f-48db9e1676e4"],
+In[74]:=",ExpressionUUID->"7a827a44-f312-4418-8c64-5ec29983c26b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2164,10 +2548,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463726952*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627870350933`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9b2cbc66-e4f9-402a-89ab-ba82d2b6085b"],
+In[74]:=",ExpressionUUID->"29a7dee4-c791-41fb-97ae-bd602dd0f441"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2180,10 +2565,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463729669*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627870374413`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d50f4031-a14e-4c5e-8589-fc408b884a67"],
+In[74]:=",ExpressionUUID->"0e3497ed-6fdc-4367-828b-4ff1312b1923"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2196,10 +2582,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463731656*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787039919*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"732c45ab-9112-42e8-935d-0b70d3cda20c"],
+In[74]:=",ExpressionUUID->"4ce26d4e-9bb7-46bb-80c7-59bcbdcae3c6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2212,10 +2599,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594637336273`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787047586*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"160ab324-b3e6-4a12-979c-63c0fa73ef6e"],
+In[74]:=",ExpressionUUID->"7c36150d-0168-4bc1-93e6-df63615befcc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2228,10 +2616,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594637448683`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787078711*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dfed45ef-2fd1-4e30-a93a-27200b496168"],
+In[74]:=",ExpressionUUID->"5e9b1d4f-5cd7-4ef5-ae4c-33c351106874"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2244,10 +2633,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463774691*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787083235*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0e6d1ad0-af17-429d-84b6-3ce6104f90fa"],
+In[74]:=",ExpressionUUID->"f027456b-e8e8-4b5d-bd75-6bab59c43531"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2260,10 +2650,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463777028*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627870869007`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"71c63d52-344f-40a2-a4d5-3a0c1c1d98ff"],
+In[74]:=",ExpressionUUID->"2138762a-cf6c-48ab-a00f-02a96866170f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2276,10 +2667,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594637790956`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278708926*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4e51b3fe-cdf5-4b4f-983c-2b2dca17e96b"],
+In[74]:=",ExpressionUUID->"d2366984-bf39-4ad7-b421-4abf4acec94a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2292,10 +2684,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594637810707`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787096467*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"583b57b5-d1c8-41d2-84dd-a7006b416386"],
+In[74]:=",ExpressionUUID->"405e490b-02f8-469e-b702-3b3b4a86975b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2308,10 +2701,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946379276*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278712451*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0c965ee1-980e-43c6-88fb-a37ff9cd4e9d"],
+In[74]:=",ExpressionUUID->"0ec73400-cdb6-4131-bab0-55007057c9ec"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2324,10 +2718,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594638231697`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627871274853`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e5bd4f95-17d5-410c-a564-23388b2283f5"],
+In[74]:=",ExpressionUUID->"b45e0caf-2c85-440e-8b77-58c849232283"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2340,10 +2735,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594638256683`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787129849*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5d3c5a5f-dee4-4d6c-a713-912a9e520e2a"],
+In[74]:=",ExpressionUUID->"f3196f05-dd71-4394-a9c9-37a2cbc9e82f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2356,10 +2752,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594638277693`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627871358337`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"300a2ab9-38f5-4f1f-851f-b28cdd8f50f4"],
+In[74]:=",ExpressionUUID->"f6be694c-f797-49e6-b252-93e7671f096d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2372,10 +2769,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594638298807`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787138464*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2ced3c91-1241-49f4-a557-40a30b81a1a5"],
+In[74]:=",ExpressionUUID->"bc44026b-d242-428c-b8e9-13593e486950"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2388,10 +2786,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463831847*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787146235*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a5514407-1db2-4c40-ba8a-0a31c778d992"],
+In[74]:=",ExpressionUUID->"30dd78cc-2bbb-4ab3-bd36-9d50dabca8f5"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2404,10 +2803,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594638432837`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787174272*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dbb67bb4-f32a-4b7b-8b95-83d34f7d5b1e"],
+In[74]:=",ExpressionUUID->"edb182fb-c7b5-4466-b29a-8a8c9973679c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2420,10 +2820,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463871646*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787176981*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"923d5099-753e-4f4d-8018-32ac5eaa1f89"],
+In[74]:=",ExpressionUUID->"3ff1233c-f233-45fc-938e-f482d1a49f17"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2436,10 +2837,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463874282*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787179337*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6ea5d1f9-1fbf-4417-a2a8-b160b77c7fe6"],
+In[74]:=",ExpressionUUID->"6580ad1c-9d83-4695-97c0-a48d4a8fd159"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2452,10 +2854,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946387645*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787185059*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"69a1da54-4171-4e13-b646-75d9cba5d04f"],
+In[74]:=",ExpressionUUID->"7948a58a-031d-4916-bbe0-825daf5c04fa"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2468,10 +2871,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946387859*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787192793*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"434da721-a599-479c-ad6b-93110fd04329"],
+In[74]:=",ExpressionUUID->"81ba9ba9-592e-44d7-af39-49abb75a47dc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2484,10 +2888,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463887577*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787220196*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2ede39cf-4f2e-4da3-914d-21a2b9fdd75c"],
+In[74]:=",ExpressionUUID->"c489df7c-bd4e-488e-9f30-2abedded2ea2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2500,10 +2905,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463918126*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278722295*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"66d58f83-6d75-4746-9d91-c9df3ce86e79"],
+In[74]:=",ExpressionUUID->"331e388c-c291-4900-b2c0-90ff83cd483a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2516,10 +2922,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463924725*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627872255583`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"aa6e0b5c-3618-4adb-ab42-9a23b5320bd0"],
+In[74]:=",ExpressionUUID->"96ea70e3-4a93-4aed-a836-c8cca1b28f3b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2532,10 +2939,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594639269333`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787227976*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a62a8e34-2dd8-4cbd-bedd-8d2bb13f8857"],
+In[74]:=",ExpressionUUID->"fff23d30-0447-4838-a646-241a573b3ebe"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2548,10 +2956,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946392916*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787239159*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"122d9b93-89dd-49c8-b130-1b51ccf8104b"],
+In[74]:=",ExpressionUUID->"c0b66eed-9e73-441c-8914-562ddb84ab36"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2564,10 +2973,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959463936757*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787267302*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ae2a6549-0f75-4ecc-9d56-4913fa8dc215"],
+In[74]:=",ExpressionUUID->"4e8816cf-d4d7-4d91-80de-7ca13dbb27ca"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2580,10 +2990,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594639661417`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627872703743`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ca8814d1-2581-482d-ad0b-5ba922cbb50f"],
+In[74]:=",ExpressionUUID->"0126cb4a-fffb-4c37-9d77-618f89a765eb"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2596,10 +3007,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594639723387`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787272834*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ab48a4d3-ece6-4812-8440-1e5d04228663"],
+In[74]:=",ExpressionUUID->"2f3f0137-49b0-4a99-a921-b02046cc4d15"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2612,10 +3024,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594639753237`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627872754*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"cbbc4be4-5b41-4d3b-bf77-4ae4591e77fa"],
+In[74]:=",ExpressionUUID->"2fe2a0d7-67be-41cf-bf16-d05446a0d7ef"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2628,10 +3041,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594639775352`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787286614*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1bd8c931-2c09-4501-bff2-b9870e185e0a"],
+In[74]:=",ExpressionUUID->"4f9d789d-7a42-4f41-bc3f-87a62b0614c9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2644,10 +3058,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594639803247`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787316001*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f399e97f-54fb-46e8-b1f8-2e3ac38c57e4"],
+In[74]:=",ExpressionUUID->"9a19c8e3-a662-42b6-9519-c1896bafd92f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2660,10 +3075,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464011035*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787321178*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d8c22152-4c34-4508-b1fd-985970362c5e"],
+In[74]:=",ExpressionUUID->"105e8c92-2644-4498-a954-ed143cdc7ac9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2676,10 +3092,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464013916*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627873239727`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"28ca54e6-fabd-4375-b850-0c5d89160ae7"],
+In[74]:=",ExpressionUUID->"b52ba640-ed49-4b75-bafc-110c4b741e3b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2692,10 +3109,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464016036*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787326621*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8e10c818-905c-46d0-b00e-ed20dfd5097e"],
+In[74]:=",ExpressionUUID->"eb8fd40d-27a2-4102-b721-662054b0d834"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2708,10 +3126,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464018235*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787334075*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0c096991-0c84-45e3-92cf-1ecf105ec347"],
+In[74]:=",ExpressionUUID->"4eca64f9-b71d-49c3-86f3-6d41f38445c2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2724,10 +3143,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464030525*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787362171*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"56cf175d-8abb-49cd-943f-536b0ef03923"],
+In[74]:=",ExpressionUUID->"4c0888d2-098c-42f0-8de5-1ecb2cf32e96"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2740,10 +3160,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464060169*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627873670273`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"34a2f054-c27d-4c82-aacb-13322d322563"],
+In[74]:=",ExpressionUUID->"51399f54-a7b1-41f7-8b24-4995c2e4c181"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2756,10 +3177,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594640628777`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787371976*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"13d5827a-738f-4a77-850d-a619ed785b84"],
+In[74]:=",ExpressionUUID->"e0cd4f07-736e-4c4b-ada0-15537799ff3b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2772,10 +3194,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594640648823`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787374941*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"22ace566-b38c-4b8f-8b76-bfeec5e3fe58"],
+In[74]:=",ExpressionUUID->"e64ce777-61ca-495e-b1d1-b774ca2813f7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2788,10 +3211,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464066927*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278737796*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"08633297-2647-4b5b-b9df-1df37ef63b23"],
+In[74]:=",ExpressionUUID->"55950657-495f-4ce6-9954-4ccc1d008ba1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2804,10 +3228,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594640784817`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787405878*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e8120ba1-6fe0-4445-8bc9-63ff58ce0879"],
+In[74]:=",ExpressionUUID->"b27bb56d-16a0-4efc-8c0f-b77c0ca5b237"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2820,10 +3245,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946410811*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278740882*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"35bbe1c8-d40d-4023-97b0-c528d73be824"],
+In[74]:=",ExpressionUUID->"ff7e949c-b3e5-4050-8645-b2c9a8634924"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2836,10 +3262,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464111372*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787411252*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f0e45ed7-e501-4d3e-b528-514767856701"],
+In[74]:=",ExpressionUUID->"947f4441-fa04-4981-afad-fead85116e2e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2852,10 +3279,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464113434*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787413692*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"583f1fd2-76d9-4d67-bb4f-760d3988f5f1"],
+In[74]:=",ExpressionUUID->"548499f2-ce71-4d33-bed6-acec981c378b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2868,10 +3296,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594641154213`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627874248877`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bed89636-122e-41a1-bc87-d6c89517d95a"],
+In[74]:=",ExpressionUUID->"d857df5e-895e-47ab-b7d0-ee9d599c6824"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2884,10 +3313,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464119505*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627874520817`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"af0c623b-f361-451b-8571-598396d89901"],
+In[74]:=",ExpressionUUID->"4e272f6a-214e-422f-a78e-e9a6f3d0c261"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2900,10 +3330,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464152379*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787454961*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4600f1f8-854d-4403-8a85-5fc4a45fc2cf"],
+In[74]:=",ExpressionUUID->"cd52d99a-b269-43d7-85bc-c250b9fb745b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2916,10 +3347,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464155177*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278745758*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"488a8cb3-a257-4c0f-8f7d-2a7708effd72"],
+In[74]:=",ExpressionUUID->"b8abbe7b-62c5-479e-9a7d-6f7ffd90cb4b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2932,10 +3364,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594641581097`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787459996*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"eb2e5b42-6b67-4bee-9d03-6297444b37df"],
+In[74]:=",ExpressionUUID->"72891f6b-f40f-41b8-94cc-04a8ae336fb9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2948,10 +3381,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594641603537`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627874716187`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9479db8b-bed9-4999-b0a2-f611ec981434"],
+In[74]:=",ExpressionUUID->"da62e209-38fc-42c2-821f-7b4ffee434e9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2964,10 +3398,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594641682043`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787500352*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b2b4b8d3-0c1e-4f01-b4e1-9f8d4888f1f9"],
+In[74]:=",ExpressionUUID->"16b98302-49ba-430d-aefe-6649e74c9774"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2980,10 +3415,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594642023573`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627875031*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bfd7b7fc-ddd6-4c98-b85a-afe99550dcd8"],
+In[74]:=",ExpressionUUID->"3805fbc3-477d-495d-8701-dc77df462524"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -2996,10 +3432,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594642055597`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627875055113`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f65f890b-a2b3-478a-a41f-2a2ab6a36dd9"],
+In[74]:=",ExpressionUUID->"43a7b04e-48a7-4bc0-a239-5b91d984cfd2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3012,10 +3449,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594642076807`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787508135*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2fa135ac-d07b-4762-8e3e-72c973043264"],
+In[74]:=",ExpressionUUID->"b0aa5a61-d780-492f-8567-63a0eafd04b2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3028,10 +3466,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464209713*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787510803*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7a4b70af-152c-4028-9177-c438cac1c28a"],
+In[74]:=",ExpressionUUID->"ebaaf742-180e-494d-95c7-790b57511678"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3044,10 +3483,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464211933*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787542901*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"070744de-756e-44d3-a761-6f273f4a51a8"],
+In[74]:=",ExpressionUUID->"348fc0e7-2581-4572-9f35-f6d518a9abc9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3060,10 +3500,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594642236567`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787545594*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bd9282c9-8dff-4150-bb3e-ab03ceff4843"],
+In[74]:=",ExpressionUUID->"a091d1f3-9e28-4e28-95c4-0b5f181b3659"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3076,10 +3517,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594642522783`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787550325*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5f0c244f-83c9-42bc-9cdf-4681a432eb66"],
+In[74]:=",ExpressionUUID->"3157a799-e7b0-4b20-821a-654b1ad030de"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3092,10 +3534,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594642585*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787554373*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"934c229e-c880-4a18-a0cc-6915bcd77dbd"],
+In[74]:=",ExpressionUUID->"139dc464-0bea-483b-81ab-7c7e88bb0451"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3108,10 +3551,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464260812*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787562285*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3af3ef11-45c3-47d7-ba3c-f7e1196cbd06"],
+In[74]:=",ExpressionUUID->"10771fc1-8f30-4297-ac6a-5602e52c78a2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3124,10 +3568,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464263084*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627875917683`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a695f8ea-4a25-42f5-8049-f50aab1c91f8"],
+In[74]:=",ExpressionUUID->"2a1bdf5c-9496-46ff-8c4f-2abfe44fe505"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3140,10 +3585,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946426991*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787594727*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e5f14438-21d3-4256-a45a-ba4d0e2475fd"],
+In[74]:=",ExpressionUUID->"b2d717a8-f42a-4625-afcf-4fe461b55a36"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3156,10 +3602,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464298345*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787597929*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3ca6f5e9-8088-4ef8-9565-6f00950e169d"],
+In[74]:=",ExpressionUUID->"051d30e5-95d5-4424-98ce-d4c4f34ccbba"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3172,10 +3619,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464301244*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787604762*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"40016308-b295-43fd-b73b-eb10d60e526c"],
+In[74]:=",ExpressionUUID->"0e28227f-b532-4a73-b195-1252bc87b49c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3188,10 +3636,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464307378*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787607605*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"52270d11-e7f1-4cb0-9477-4f6b13dcfbe3"],
+In[74]:=",ExpressionUUID->"fe06394f-461d-4df6-a551-9099d85c716c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3204,10 +3653,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464309813*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787636785*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"93f68d45-2e35-4520-997b-b246dce55175"],
+In[74]:=",ExpressionUUID->"de8e07e8-567b-4bd1-84b3-5a0d83ee314d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3220,10 +3670,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464316938*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787639732*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c056b2a9-fd44-4dbc-83ff-02319cd2bb81"],
+In[74]:=",ExpressionUUID->"a064301d-faf6-42c5-9a53-aca27393b292"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3236,10 +3687,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464346064*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627876423273`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0484003e-b769-4e0a-b9f2-023718613678"],
+In[74]:=",ExpressionUUID->"7d6cc74f-da7a-414c-9380-c39bfb70205a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3252,10 +3704,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464348413*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787645071*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f7694f52-483d-47ca-9a9c-2d29e1be4a1a"],
+In[74]:=",ExpressionUUID->"4ac59094-b46e-4934-9c4f-5d06e34de6ca"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3268,10 +3721,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594643504763`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627876572638`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5491bd89-04c4-4ab1-8d42-b9f86dfcccf5"],
+In[74]:=",ExpressionUUID->"4449d3f1-8286-44a3-86db-194c8693e056"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3284,10 +3738,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464356865*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787687587*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e3d47759-a76b-493b-b7b7-406f4f2f661a"],
+In[74]:=",ExpressionUUID->"515cfc96-84a6-4649-96d9-c125bc3a56d1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3300,10 +3755,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464365834*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627876905937`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1dc0a80f-a258-4824-97f7-55e014f27f05"],
+In[74]:=",ExpressionUUID->"3626fa9b-b8fe-4ea4-904b-60ed12fc2ed2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3316,10 +3772,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464395204*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627876931343`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9aa452cd-c692-4d0c-98e0-5561434ee079"],
+In[74]:=",ExpressionUUID->"e1d5b86b-9e8a-453f-a16f-0accdcdc2c87"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3332,10 +3789,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946439802*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627876966753`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1ae56867-c22a-4d40-a4c7-8f4f2c96bd9b"],
+In[74]:=",ExpressionUUID->"93292a2b-f0ad-4492-829b-4eea07bb57b3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3348,10 +3806,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594644002438`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627877086573`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9fb10030-d969-40ad-82a2-256abe2e0b48"],
+In[74]:=",ExpressionUUID->"b206cc52-ff15-4dc2-a197-dafb4b374bf0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3364,10 +3823,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464406806*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787739986*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5d498866-1f80-4ae4-8c18-79ee316aa7ae"],
+In[74]:=",ExpressionUUID->"3f4e5136-0698-432a-92f4-0fb093f4500e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3380,10 +3840,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464409171*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787743759*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"75a9a327-94f7-42ac-8fd8-a3532197a8ed"],
+In[74]:=",ExpressionUUID->"0d784b3a-1374-48af-a932-5e988f518427"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3396,10 +3857,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464440431*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627877463703`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f15ae6da-b875-468d-a5a4-70eb30f89411"],
+In[74]:=",ExpressionUUID->"0751048b-0c48-42b1-ac27-23c88ef9a706"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3412,10 +3874,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464443368*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787752981*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a8032f62-3537-40b5-8fd4-b2b43296c70e"],
+In[74]:=",ExpressionUUID->"7a776c35-4069-4736-b7c2-72bac5737a11"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3428,10 +3891,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464445622*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787785214*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a7442eb7-6895-44b8-bf2f-c557f379e112"],
+In[74]:=",ExpressionUUID->"b301107f-e565-4755-b53f-43109f3432d9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3444,10 +3908,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464447714*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787788034*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f8cf99ac-69ce-4459-aef4-aeb5b7769804"],
+In[74]:=",ExpressionUUID->"9b8966a2-310d-4d27-add5-3ec9f9c97bbf"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3460,10 +3925,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464449923*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787791287*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6e926e95-7c35-45f3-a6ef-248b5d2c1b45"],
+In[74]:=",ExpressionUUID->"36df7a65-bac7-46c8-96d7-c02365d0452a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3476,10 +3942,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464486743*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278779564*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"cbb5a256-574b-420b-9d67-37d01f2029dc"],
+In[74]:=",ExpressionUUID->"d85a8d2b-99bc-4c6c-9f5d-902f07b773b3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3492,10 +3959,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464489476*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787809103*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d5cba22a-4b61-4759-91fd-1b489e929e7e"],
+In[74]:=",ExpressionUUID->"447afd86-4868-415e-8578-bd168d3c1f69"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3508,10 +3976,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464492228*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787839224*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"af15ff1d-fb6f-4cb9-b835-7aa8f1e0ff94"],
+In[74]:=",ExpressionUUID->"92dadf67-cc06-4b54-bfcf-b37c83936525"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3524,10 +3993,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946449436*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787844996*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6dbc6781-a72b-4415-9500-ac64eba8bc6f"],
+In[74]:=",ExpressionUUID->"43fade29-d335-4b89-b396-f802329dfca6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3540,10 +4010,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464501481*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787847475*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bdab83d5-7708-4f9d-a247-8abafc9daa2c"],
+In[74]:=",ExpressionUUID->"2d8efd03-bc11-4335-8633-da2f48a2fc98"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3556,10 +4027,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464534562*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787854229*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6d662308-4dea-462b-aec5-2858eda9d0d0"],
+In[74]:=",ExpressionUUID->"5e390f6f-3dcf-47a7-8049-879b5452ea1c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3572,10 +4044,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946454115*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787862129*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ea472cc6-5c19-4593-b9be-b891ac0c349f"],
+In[74]:=",ExpressionUUID->"09226ca6-df03-4b2b-a94a-0bcb8231967d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3588,10 +4061,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594645432243`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627878926077`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c2e88cfc-e32e-484e-b6fc-b1280abe2ae9"],
+In[74]:=",ExpressionUUID->"a5dec9c7-f605-4597-81a6-84e4212315bd"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3604,10 +4078,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464545636*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787895755*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c6ea5351-3123-4c4c-9912-9aa740cd0926"],
+In[74]:=",ExpressionUUID->"b16972b8-c948-49d5-8497-71f12b93a065"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3620,10 +4095,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946455343*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787901054*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c60e3104-675e-435a-8b92-4bdc25d5251d"],
+In[74]:=",ExpressionUUID->"0ce0d2ad-8f13-445a-a071-d2c5c534506c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3636,10 +4112,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464582803*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627879058533`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"44b5e9b5-bdcf-4a21-9cf2-7bae47ac03a8"],
+In[74]:=",ExpressionUUID->"f70b6e03-2322-463b-9d65-263b2562623b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3652,10 +4129,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594645873737`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787913402*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7b3cbad6-e6e8-42c9-8f3e-e75a9fc367c7"],
+In[74]:=",ExpressionUUID->"052957dc-6f0c-456a-877f-e1fd50c50ee3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3668,10 +4146,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464591898*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787941432*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d24273b0-e926-455b-a686-15a6cddd7ca7"],
+In[74]:=",ExpressionUUID->"e8c2df3b-e87a-4baa-900c-2f0e23f00c9c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3684,10 +4163,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946459426*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627879448566`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5fbe935f-33b6-4822-b139-c985ce37c32e"],
+In[74]:=",ExpressionUUID->"9120dc9b-74bc-44ac-a702-7d2f9f73eb96"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3700,10 +4180,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464596532*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627879474983`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"03cb2be8-cbb9-4dc9-959c-0aa8275f461a"],
+In[74]:=",ExpressionUUID->"ae29d652-21cd-4836-9ae0-fbf1dec1686e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3716,10 +4197,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594646259127`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787954103*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"28de003a-89ce-4d88-bded-a403b66fa740"],
+In[74]:=",ExpressionUUID->"ba94897a-d790-4eaf-b89b-ccc7802847e3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3732,10 +4214,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464628345*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787956896*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"717f0702-9b20-43de-8181-4f3594a4af72"],
+In[74]:=",ExpressionUUID->"36632854-3385-4e82-b182-721aa1466ff3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3748,10 +4231,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594646305304`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787985464*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5d6faffd-e3be-4552-8ce8-451fc4206e93"],
+In[74]:=",ExpressionUUID->"01db90ea-f5f8-43ef-a30f-ba8bb6290681"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3764,10 +4248,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594646330833`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787988429*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e92479df-1847-4bc2-89f0-e76719dfdb4e"],
+In[74]:=",ExpressionUUID->"c886a26e-4fa9-4988-a753-7fe21b53e604"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3780,10 +4265,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464643456*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278799116*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"02e16459-2910-493c-81d5-ff7609efc8cf"],
+In[74]:=",ExpressionUUID->"f7201ab4-aba6-4269-a4d7-b8a761ec3910"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3796,10 +4282,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464673333*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962787993638*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"49bdc29e-24a6-44cb-82cb-c6987d651c9a"],
+In[74]:=",ExpressionUUID->"cdc6e3e3-289a-41ba-8ecd-10dab12e221e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3812,10 +4299,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594646761217`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788004937*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"657a193e-bf30-4837-a98f-93ec87278966"],
+In[74]:=",ExpressionUUID->"2c8d081a-d61e-4fcd-b272-222e508efe06"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3828,10 +4316,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594646790457`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788034569*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d65e06ce-12bd-49aa-9268-e927ffd39624"],
+In[74]:=",ExpressionUUID->"624c83ae-d0ac-4a5f-9fe8-fead9c37e3d7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3844,10 +4333,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594646812143`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788037404*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e60f69fd-dc82-4fe9-b3e9-5da7ed4bd81f"],
+In[74]:=",ExpressionUUID->"fbfc843c-94d6-4a3e-ab39-78460c90307d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3860,10 +4350,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464683463*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627880400476`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"abd020c0-2f09-4da0-a5c4-3b1410fa7c1f"],
+In[74]:=",ExpressionUUID->"3fae94c1-4f4e-4b60-b0f3-65b9568e4bef"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3876,10 +4367,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464717013*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788042987*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"35210ebf-f11b-463b-9955-ceb504bb5380"],
+In[74]:=",ExpressionUUID->"24984f2b-5797-4978-9f10-06484afbe6ab"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3892,10 +4384,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946472379*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788053527*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"fbbe5d68-cf33-4d4a-8477-20df22f40c57"],
+In[74]:=",ExpressionUUID->"e3338577-2e3e-40bf-9561-920ef1089476"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3908,10 +4401,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464726753*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788082926*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bfdeea03-f77c-4eb4-8974-d5a8dc44336c"],
+In[74]:=",ExpressionUUID->"20dd1de1-a951-48f0-b6f3-f2c983b36f23"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3924,10 +4418,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464729104*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788087467*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2d058288-605b-463d-a326-face30c5d842"],
+In[74]:=",ExpressionUUID->"1a7146a5-687d-4a3e-84e3-c787c50e3c71"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3940,20 +4435,22 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464736842*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788090173*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dcc911bc-e0ff-4f04-94a6-fc674c4b2f7a"],
+In[74]:=",ExpressionUUID->"96a23575-b30f-497e-8ac7-d41502343579"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464739287*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627880930557`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a8a99339-540d-4cd2-bbf2-c2817bb4c38a"],
+In[74]:=",ExpressionUUID->"cb7c0cea-f860-41e7-99ce-847857463c0e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3965,10 +4462,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464741222*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788095471*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"340bda09-673e-40f8-92f4-bd7edff6b682"],
+In[74]:=",ExpressionUUID->"67e1e5fc-838c-4e16-afb5-4c6c7f02a34a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3980,10 +4478,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464743815*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627880981607`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dca8b00e-c973-43ca-8440-1bc0b10f6278"],
+In[74]:=",ExpressionUUID->"5b9020e6-02b1-49c1-8fdf-9bf0f148ad84"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -3999,10 +4498,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464773775*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788100937*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5f08b2ea-80c1-47ea-a418-303b6947d69d"],
+In[74]:=",ExpressionUUID->"9c60dfa7-261b-4721-839a-bb3d148d60b6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4018,10 +4518,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464777072*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788103706*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"65adca7f-247d-4014-96b8-cac989d11daa"],
+In[74]:=",ExpressionUUID->"ad6ecfed-0b7e-4cc2-a7ab-49a74e2854fa"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4037,10 +4538,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464779601*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788106441*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"051966fc-ddbb-473f-8ec0-ab9810d6bce4"],
+In[74]:=",ExpressionUUID->"597127a3-ecca-4efa-af70-8402c7256f5b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4056,10 +4558,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464781929*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788109351*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4da5bae5-9914-4784-b237-13eb79ea0d2b"],
+In[74]:=",ExpressionUUID->"aeb992a2-8666-4334-9b51-7cde392ec260"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4075,10 +4578,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464785161*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627881120167`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9bcf9a0b-2c84-4b17-b151-1f380ea44eff"],
+In[74]:=",ExpressionUUID->"c0e4fbe4-f8a4-49d6-9a59-d2f1b14cf323"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4094,10 +4598,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464792157*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788114851*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3a8508b6-558d-46d0-b98d-14e003be7461"],
+In[74]:=",ExpressionUUID->"47c0185a-21cc-4bcf-97cb-addd63834baf"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4113,10 +4618,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594647946157`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788117571*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8e16e312-278d-4b02-b7c4-e3817d460883"],
+In[74]:=",ExpressionUUID->"0c66a295-f98e-4ffc-84a1-ee2cd9e4601a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4132,10 +4638,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464796994*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788120194*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"02b373c1-b1f3-4c95-8a7e-77c9737544d5"],
+In[74]:=",ExpressionUUID->"346a332e-45fc-42d4-b477-871b1fb8eb66"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4151,10 +4658,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464799509*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627881230307`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"18e0ed55-ad1e-4541-87f2-53e2f941c811"],
+In[74]:=",ExpressionUUID->"fd8719cf-6ffd-4c7a-adce-1daf5dfad48c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4170,10 +4678,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464802206*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788125855*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"264bf818-c35d-4e35-bb43-2a44bb2edc43"],
+In[74]:=",ExpressionUUID->"42daa2dc-40df-4234-94e2-bf5b2addb871"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4189,10 +4698,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594648046083`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627881287203`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3441da39-4660-4eba-8342-80e797f6e037"],
+In[74]:=",ExpressionUUID->"09ae5d2d-df52-4d4d-9e03-bb439d6078ce"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4208,10 +4718,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594648067904`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788131329*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6d053d32-9faa-4d8b-9f9e-e841e3fa7dee"],
+In[74]:=",ExpressionUUID->"b036ce12-3837-4bc4-a37a-f3f46674cd07"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4227,10 +4738,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946480952*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627881339684`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2ed06bc0-d078-4855-a909-c65785f48883"],
+In[74]:=",ExpressionUUID->"8f75d936-b32f-4596-9bb9-e692218a372b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4246,10 +4758,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594648116703`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788136549*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4db98e93-f517-4331-813a-aabe3a18d90c"],
+In[74]:=",ExpressionUUID->"51fd0b18-56dd-428d-90d5-ba974e40c085"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4265,10 +4778,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464813987*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788139348*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7607fb7d-4bb2-41a0-b41f-46ab3e64fad1"],
+In[74]:=",ExpressionUUID->"b59dd960-3b69-4a0d-aa5f-642e24911df8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4284,10 +4798,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464816764*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788141995*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c6e98243-9cd9-4c57-bd5e-9fbe7774c786"],
+In[74]:=",ExpressionUUID->"6836c385-db42-4439-82c2-1fc29fdcda6a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4303,10 +4818,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594648190327`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788144669*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"df7deda7-9e26-4ad4-8814-ccec0ddc759e"],
+In[74]:=",ExpressionUUID->"6693d046-c3f0-4358-b8bb-1c58da903a84"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4322,10 +4838,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959464821312*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788147249*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8da0c6e9-cf2b-4907-a632-e6afa667895e"],
+In[74]:=",ExpressionUUID->"4ec321e4-96ee-4039-9014-dbafedd09ba2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -4341,10 +4858,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594648239822`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627881499653`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8a38a511-6c70-47c7-af42-0778df813d41"],
+In[74]:=",ExpressionUUID->"c6a479c8-30cd-4b26-91b4-cdc6e2a30152"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -7919,10 +8437,11 @@ sH8BRImRiQ==
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594655070333`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962788827948*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a6d4b13b-2ea2-4abd-bdbe-bbcfd86d1d94"],
+In[74]:=",ExpressionUUID->"6cb5a7b8-bdde-41d2-a1c4-a4b6677f6ecf"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -11484,10 +12003,11 @@ wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959465805956*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789044537*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ceb94f80-e404-4608-9818-2110ca148fe7"],
+In[74]:=",ExpressionUUID->"f6e58ed7-f06a-41d9-bd0c-ed91b5593c53"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -15315,10 +15835,11 @@ fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466076202*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278929636*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4cc094b6-dc31-491d-b145-cc815a4a3f99"],
+In[74]:=",ExpressionUUID->"a6e05591-e69a-4d0e-906e-5d9445e85c9b"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -19021,10 +19542,11 @@ xxO6LA==
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946628861*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789508477*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"71fca5b7-10ec-4ab3-8564-8043b70d6aec"],
+In[74]:=",ExpressionUUID->"abc3a301-7973-4147-ae4e-76eeac7fae1c"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -19804,10 +20326,11 @@ Vw==
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594663414097`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789559805*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f683d9ea-9b41-41a0-b548-8b188cbfdf3d"],
+In[74]:=",ExpressionUUID->"68844e1e-2871-4a28-94b0-01018303a9f2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19823,10 +20346,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946634762*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789566547*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"24729b15-801d-4c09-8851-e767fabc60e3"],
+In[74]:=",ExpressionUUID->"5d96d969-5a40-4695-8a2c-f7491f7b3401"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19842,10 +20366,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466349963*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789569415*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"58c54744-e36f-4730-a5d2-13e1ab41dd8d"],
+In[74]:=",ExpressionUUID->"4d4d838f-7d38-4eac-96b4-298ecfa018ae"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19861,10 +20386,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466352662*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627895721693`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d20d12fe-ff50-41aa-9b20-05a73842a41f"],
+In[74]:=",ExpressionUUID->"b9dae5e0-1113-42c0-83ed-3551b3312266"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19880,10 +20406,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946635546*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789574889*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"43452bfa-6ee0-4d96-b6b3-d6f0aec7fb87"],
+In[74]:=",ExpressionUUID->"62ddf54c-55f0-4225-a924-40b9412e317d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19899,10 +20426,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466357975*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789577558*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"beb9cb77-5e63-4d43-aa72-cd27fe63f5eb"],
+In[74]:=",ExpressionUUID->"aed23f70-69a3-4cdc-9c3d-af01745f4454"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19918,10 +20446,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466360515*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789580491*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d77ff665-8153-453c-ade7-4b634a4f8603"],
+In[74]:=",ExpressionUUID->"6dc9c6cf-2d5d-4180-bd51-2aefcb60d097"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19937,10 +20466,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466363616*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789583303*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"cacc93ae-93d8-4144-b39f-8a6afd4360b8"],
+In[74]:=",ExpressionUUID->"62ea1e7b-6880-4823-a9ea-5da3e8fd3f6e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19956,10 +20486,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466365932*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789586102*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"71d2e0e3-d885-417e-af66-b87957fdc681"],
+In[74]:=",ExpressionUUID->"d10d7d30-e876-4be8-b4df-5aad76a0d99f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19975,10 +20506,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946636835*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627895891333`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9faa5949-b109-4817-85ee-562675e0fc33"],
+In[74]:=",ExpressionUUID->"0bb631b7-0f98-4427-8c6b-a618738d4428"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -19994,10 +20526,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594663708773`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789591989*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c3660ab6-db37-4c0a-8272-0c9a4aa9c3bf"],
+In[74]:=",ExpressionUUID->"54d5425e-3b63-48fe-bc51-ca1b13e40f22"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20013,10 +20546,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466374446*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789594674*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1ec06353-374b-4cd1-bd0a-e0e4cad8b352"],
+In[74]:=",ExpressionUUID->"41a1f6d7-c5eb-42e0-9235-3aaa723df59b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20032,10 +20566,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594663776693`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196278959733*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c8d87ec7-6afe-48f4-b427-5936b95c9f1c"],
+In[74]:=",ExpressionUUID->"546ba414-8c45-48ac-8abc-6199cf4c399b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20051,10 +20586,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594663799763`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789599924*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"fe47bd76-6996-4613-9513-5c8e0f903ca1"],
+In[74]:=",ExpressionUUID->"ee23c09b-e2ce-45ad-9fcd-52f4338a3cb6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20070,10 +20606,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594663822536`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789602618*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a86165d0-b36d-4b8a-b123-57089e78f9b7"],
+In[74]:=",ExpressionUUID->"43bf9480-051d-435a-a2e3-511830b5c19a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20089,10 +20626,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466384451*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789605178*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"926de8ce-b5ff-409a-b7b0-2cbf4d9df240"],
+In[74]:=",ExpressionUUID->"3c2b6867-ce54-4af9-9a4d-5517d9377cc5"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20108,10 +20646,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594663866787`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789607855*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c2a8a7a1-b80f-45ea-b00d-de38911bf13d"],
+In[74]:=",ExpressionUUID->"cf269a5f-aa4a-41d8-843f-35737997e57e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20127,10 +20666,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594663895597`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789610383*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"29d03a2c-98e0-44b5-89ef-5ae512f3d3af"],
+In[74]:=",ExpressionUUID->"6ca93d6b-5082-410b-afdb-d2509e614ef1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20146,10 +20686,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466391899*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627896130457`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8625bf56-c3ff-4b71-8f0c-7af075cd8aa2"],
+In[74]:=",ExpressionUUID->"26bfc511-c2fa-4397-b319-46ee20290222"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20165,30 +20706,33 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959466394071*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962789615555*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4b6cce55-9ea4-4bab-aaae-453d21acde60"],
+In[74]:=",ExpressionUUID->"0d86c9ec-7015-4dec-b23a-e5fd680a498f"],
 
 Cell[BoxData["\<\"Boxes\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959468829626*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279169314*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4ae0ba4c-4792-411b-b605-8dcb20a90a75"],
+In[74]:=",ExpressionUUID->"46a5e98e-c39a-4f90-8178-7fc2a6af4461"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469012405*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627918873796`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f940fd30-6fcf-4045-860b-84efdd7b7988"],
+In[74]:=",ExpressionUUID->"20974ed1-622a-479e-b84c-431e78237400"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20202,20 +20746,22 @@ ones)\"\>"}],
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469015044*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627918907557`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"45f66351-27fc-48e6-abde-fd3de460ab0c"],
+In[74]:=",ExpressionUUID->"f71cff21-7456-4f22-a5ee-3f85729a0d0f"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469017519*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791893464*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dd3d69cd-d368-47ae-905c-a6aec371b33e"],
+In[74]:=",ExpressionUUID->"5396d7a4-d3e9-4325-b2d8-ffa52d48ee32"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20227,10 +20773,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469020136*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791895834*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"910b546e-33db-445e-be47-4a967519343c"],
+In[74]:=",ExpressionUUID->"1fb61007-ee05-4d11-8f53-8e44a32c8738"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20243,10 +20790,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469027512*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279190339*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0699f93a-ef22-4beb-ace2-0f6272848634"],
+In[74]:=",ExpressionUUID->"2efd9ff6-e01c-4732-bb0a-65244d738874"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20259,10 +20807,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594690652*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791930738*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"91070665-0d39-44d8-8887-7465f62f0acb"],
+In[74]:=",ExpressionUUID->"05c9dea2-85b7-43e2-b504-54bebb7e49f4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20275,10 +20824,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469067903*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791933454*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9103160b-860d-4dc4-a8ab-de6b8f5f3f23"],
+In[74]:=",ExpressionUUID->"19d8d665-696d-4a2c-8965-3682cd777cb5"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20291,10 +20841,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469070765*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791939217*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ad2c179f-9523-4073-9bba-dde5995c92a6"],
+In[74]:=",ExpressionUUID->"c31fecda-e35d-4ba3-b64e-319c0894ebe2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20307,10 +20858,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594690769157`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627919427643`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"fa86ff2c-edcd-4e07-81af-7e525ca7609c"],
+In[74]:=",ExpressionUUID->"9198564d-f0b5-49c8-a27d-f39b1359c1a7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20323,10 +20875,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469079286*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791970758*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5c1208ac-8140-4d40-854e-6c7ba8d31ff6"],
+In[74]:=",ExpressionUUID->"52f1e8d6-0086-47bf-80e9-1a5ab7fcf771"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20339,10 +20892,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594691097918`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791973737*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"269b8a4e-b953-45dd-a1c1-5ba55829ed1d"],
+In[74]:=",ExpressionUUID->"619ebbe5-0e1c-41b5-b046-1d87d47e9333"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20355,10 +20909,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594691120977`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962791976693*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8af52ff9-98d0-4e33-8e48-16f2f8b68989"],
+In[74]:=",ExpressionUUID->"3f059dd7-d4af-47a3-b413-8b764388481a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20371,10 +20926,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469114951*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279197933*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c389ad70-e2ca-47af-8107-3019f9bdb225"],
+In[74]:=",ExpressionUUID->"74d8d031-6e6e-4abf-8100-6b8db5cd15ac"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20387,10 +20943,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594691272593`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792012249*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ad3962db-63d5-4c2d-b267-bfb5b8ea165c"],
+In[74]:=",ExpressionUUID->"4dea7f1c-01e6-48e0-b927-96e8eae07a2d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20403,10 +20960,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594691720457`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627920153913`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a4f8efcd-193d-4c1a-9146-a01e62b7c729"],
+In[74]:=",ExpressionUUID->"04468c1a-62b1-438c-9578-1c92f93a3687"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20419,10 +20977,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594691765137`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792018108*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"164466b9-cdef-4b82-bf44-cd81a18f9f4c"],
+In[74]:=",ExpressionUUID->"91a8a1f7-4035-432b-b3d5-d9be2ab94b5f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20435,10 +20994,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469181361*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279202575*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8dd92bc0-d8fa-47c1-b36b-5dcff37b0616"],
+In[74]:=",ExpressionUUID->"069702f3-15f9-4d29-83c1-3bb5f36ce7dc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20451,10 +21011,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469198234*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627920538273`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d3670dba-c27f-442d-a68c-11b59829419f"],
+In[74]:=",ExpressionUUID->"9a1904cd-b8a4-4144-bfa3-d878c6e2c97c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20467,10 +21028,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469242744*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792056922*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"83d4e35c-2265-4e38-9575-6d41f0959a5a"],
+In[74]:=",ExpressionUUID->"29308435-04f2-4370-80d5-334e0a95b733"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20483,10 +21045,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469248096*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627920597973`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"81060a04-8a6c-4d5c-b113-c4423cfb137e"],
+In[74]:=",ExpressionUUID->"a12a8ab6-b265-4d0f-b1c5-fb347118249a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20499,10 +21062,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469251872*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627920672626`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"840fe47d-b9bd-4d0e-8a93-ee2eebbcb3eb"],
+In[74]:=",ExpressionUUID->"d42d114d-4647-4a3a-a8b9-e94b5358a700"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20515,10 +21079,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946926373*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627921000223`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f5ba6292-f9a6-4ab2-b8e3-15dac0f47521"],
+In[74]:=",ExpressionUUID->"3fd60cc4-f222-46ec-8694-0260a35423b9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20531,10 +21096,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469293374*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792105218*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"83e0ca17-c3dd-4e2a-a17f-0775f423ff8c"],
+In[74]:=",ExpressionUUID->"a8f2a3b9-9ac3-4054-83d1-dad4cae9b3df"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20547,10 +21113,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469296609*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627921093483`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"fe25e4b1-3d15-4fae-be00-f74c627483f8"],
+In[74]:=",ExpressionUUID->"f547eb36-aaa9-4619-b1a4-693332f481f8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20563,10 +21130,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594692991123`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792112261*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"290a79d6-a539-443f-b994-3e093b4b4b60"],
+In[74]:=",ExpressionUUID->"dda25a37-55e3-4462-955e-ea39c358dd04"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20579,10 +21147,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469301408*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792140533*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8d8c2b1d-6efd-4e43-841d-7e1ba0e63283"],
+In[74]:=",ExpressionUUID->"96ba9938-44fe-469d-b194-5d715304924a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20595,10 +21164,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469339416*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792143814*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a04c7428-86d6-4c07-96a6-d66bea628512"],
+In[74]:=",ExpressionUUID->"76871681-66aa-4898-8ed6-3c9deee9f555"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20611,10 +21181,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469342381*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627921465054`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"eb46821f-3657-4a0f-9b32-71a2dcc6af9f"],
+In[74]:=",ExpressionUUID->"52c0815d-cff8-420c-8d74-18dd56330023"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20627,10 +21198,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469345352*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627921491756`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"141c3fc7-c8ec-489c-ac34-d222aa3f7a43"],
+In[74]:=",ExpressionUUID->"48181460-6f56-42b3-96fa-9d29000a248a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20643,10 +21215,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469347691*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792181882*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a3db8d57-5e0a-421a-b9f9-a91573e46dfb"],
+In[74]:=",ExpressionUUID->"798cdf6f-76f7-445e-b738-5943bd7abe45"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20659,10 +21232,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469360269*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792184569*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4b71c102-1bad-467c-8be5-2a89540bef7a"],
+In[74]:=",ExpressionUUID->"c493fca1-b135-4819-bd82-81f736594971"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20675,10 +21249,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469394079*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792190539*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9485844a-0638-4ec3-aa4f-9d314da0b380"],
+In[74]:=",ExpressionUUID->"d9739cfc-5de1-49be-8573-da68ecb23dc0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20691,10 +21266,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469397027*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792193905*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0056ad2e-0df3-4286-a75d-1a2b50d940ca"],
+In[74]:=",ExpressionUUID->"0a9e77a4-8cef-4591-ad55-953ee064c981"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20707,10 +21283,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469399687*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792221819*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ea548d0f-9c17-40cd-a617-d6c68deb5230"],
+In[74]:=",ExpressionUUID->"eced675b-9879-4b94-9987-b66b6128840b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20723,10 +21300,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594694023647`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792224924*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c5473057-5663-481e-92f1-92f5c45f7617"],
+In[74]:=",ExpressionUUID->"1ed14472-9e25-4a14-b1b0-d1fb8f4aff2c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20739,10 +21317,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469413581*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792227994*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a8cfdc83-5127-4975-bc15-47d94f211de4"],
+In[74]:=",ExpressionUUID->"4855c77b-cc40-4afa-9c49-f38bc2584a42"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20755,10 +21334,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946944314*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792230659*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"87579733-1397-4c08-b7fb-81cdc0b01dd4"],
+In[74]:=",ExpressionUUID->"7e5b88eb-df67-4c97-88b1-ec700ae10044"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20771,10 +21351,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469446061*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627922642307`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d4c9eb29-394c-445e-8564-a883ce0a48fd"],
+In[74]:=",ExpressionUUID->"c23a1e22-c38c-4acc-9aa5-9c5e4f273aee"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20787,10 +21368,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469448886*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792270945*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"58b65e5c-693e-40ec-944c-53013b92e7b7"],
+In[74]:=",ExpressionUUID->"be8d251e-2d97-42f5-a13e-2a8d12f3a106"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20803,10 +21385,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594694513197`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627922780733`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e312d50b-8dbc-43c1-9831-125bd6219ced"],
+In[74]:=",ExpressionUUID->"8f6ea87b-5303-4158-a29b-1f40acc4a1a8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20819,10 +21402,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469486236*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792288373*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d0df5269-09e0-47b7-93c1-0022923f7658"],
+In[74]:=",ExpressionUUID->"3f2cfd25-54c0-4cc6-be62-82973024d900"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20835,10 +21419,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469493176*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792329348*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a6673923-7ece-46ce-9165-1ee9c3ef12be"],
+In[74]:=",ExpressionUUID->"b54faa9b-7862-4c5b-896e-7643988eba5c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20851,10 +21436,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469495947*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627923344812`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bd250cb4-6dfa-4f51-ae00-95a2dfb56f97"],
+In[74]:=",ExpressionUUID->"adec28d1-756c-4f08-867e-ee9ca8ba5ce2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20867,10 +21453,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469498382*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792342346*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1aa798be-3fe9-4a56-acda-7aa491bf3ae4"],
+In[74]:=",ExpressionUUID->"8d97e262-1bf3-4955-b041-728bfcda8de0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20883,10 +21470,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469506357*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627923451967`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"018301fd-b3bc-408f-8af3-cb946acafce8"],
+In[74]:=",ExpressionUUID->"bfe08e1e-99ec-4679-a112-d98996a5b6f0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20899,10 +21487,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469535719*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792354291*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ec4d984e-1885-4684-8718-1a94498069df"],
+In[74]:=",ExpressionUUID->"e8f75305-efbf-4ee9-92de-3a7ad767d3aa"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20915,10 +21504,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594695428267`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792383647*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"42fe32ed-3f4b-40f5-a023-21cf7dd580d1"],
+In[74]:=",ExpressionUUID->"152ab7f1-5825-47ee-9333-a1a55853d9de"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20931,10 +21521,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469545519*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627923907623`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0a7bfbab-db69-404b-86a8-eea16aac6e86"],
+In[74]:=",ExpressionUUID->"42c21416-066a-4908-9a05-09b78009aa09"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20947,10 +21538,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469548325*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627923942337`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a572586c-b7f0-4581-80b6-6c57b0829a49"],
+In[74]:=",ExpressionUUID->"94c9f7df-ce75-4d13-9c47-4b563d8af282"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20963,10 +21555,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469578067*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792396954*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"828a0590-4794-44cd-8979-f53aac63e384"],
+In[74]:=",ExpressionUUID->"e1ecaec2-dcc9-40e2-bbfe-9ea12032043d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20979,10 +21572,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594695810957`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792404812*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b075dfda-0aef-4971-a71b-1885857a0fe8"],
+In[74]:=",ExpressionUUID->"d1932679-fad4-437d-b150-d8d584a0ccf1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -20995,10 +21589,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469584243*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792437191*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"af52b51e-1b15-4d58-a82a-47de33cb8d16"],
+In[74]:=",ExpressionUUID->"715faf1e-fb00-4d8f-ac8a-1e09ccb69b0a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21011,10 +21606,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469587109*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792440338*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"fc468b4e-4e2e-4fef-a058-e68e2d70295f"],
+In[74]:=",ExpressionUUID->"fd12e2ad-39ca-426b-8e3c-f6ef6faee08b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21027,10 +21623,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469597665*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792443349*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"938812fc-c6c0-46db-b3e2-d84cfe7c8350"],
+In[74]:=",ExpressionUUID->"f1f7d8a0-07d7-4d6f-842e-28617aee1138"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21043,10 +21640,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594696268377`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627924461393`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"80eda4bc-c63d-4e02-83ca-1f37390f8046"],
+In[74]:=",ExpressionUUID->"25f43910-5c27-4d99-8cfa-3dfc74190c5c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21059,10 +21657,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469629879*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792479122*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"00a8e785-7b7e-4203-a35b-fa9bc9dc16f0"],
+In[74]:=",ExpressionUUID->"c801d38d-e11b-45e3-915e-ac0d0f532458"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21075,10 +21674,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469632483*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792482452*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"02e3c014-d706-46a7-8dfa-def553bbb30e"],
+In[74]:=",ExpressionUUID->"713dd9ff-91f4-4d34-a6ab-a3ddee0b071d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21091,10 +21691,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469635068*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792485512*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"56f6dc36-6e67-4cfb-812c-e9a6411aa010"],
+In[74]:=",ExpressionUUID->"011a32de-35b5-4dde-a028-f330cc490e67"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21107,10 +21708,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469646406*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627924951344`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f99742bc-f742-4619-a41a-6badc3b66bfe"],
+In[74]:=",ExpressionUUID->"1572dcad-fa8e-4937-b320-f0d440b42fd7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21123,10 +21725,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195946967726*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792524705*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1e0a8c72-215f-4be3-9215-f1176c631ac6"],
+In[74]:=",ExpressionUUID->"ad7934db-ece9-451a-b0fc-72a0d634d5f6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21139,10 +21742,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469679867*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792528393*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2a6fa490-f5bc-4b92-b8e6-da20728c3b75"],
+In[74]:=",ExpressionUUID->"f8571aff-21df-4e70-98ba-a319ee162803"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21155,10 +21759,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469682355*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792531098*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a47b356d-fe34-41bc-8c20-464fbf795cc2"],
+In[74]:=",ExpressionUUID->"feb1a159-83f3-4a3d-a977-26eb31d3d7f4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21171,10 +21776,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594696847258`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792533862*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8c8110cd-121d-4b34-a4b6-bfce3abf4741"],
+In[74]:=",ExpressionUUID->"6159094e-068a-4654-8163-afab6c6074eb"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21187,10 +21793,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594696963882`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279256638*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e3c6c2ea-4906-41c0-a904-388a2798d946"],
+In[74]:=",ExpressionUUID->"5fd7649a-15b4-46ea-b692-c575579883b4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21203,10 +21810,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469751911*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627926119213`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ffd566e8-87a3-4ac1-96b4-a3ac40d97300"],
+In[74]:=",ExpressionUUID->"62c239d2-7d6f-4b63-9d64-763823631b5c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21219,10 +21827,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469812978*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792670298*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"da0e36e0-fe06-4fe2-bf2d-1583170b776b"],
+In[74]:=",ExpressionUUID->"5d9d94f8-808b-4675-b196-1ed8a6382653"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21235,10 +21844,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594698801517`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792731783*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7c6a079b-2772-451d-839a-bd6025654ce3"],
+In[74]:=",ExpressionUUID->"669c9123-67c3-4f1a-ae74-87344a6b79bf"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21251,10 +21861,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469916259*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279276436*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6ef11fdb-c42a-48a2-a9fd-30581bb0135c"],
+In[74]:=",ExpressionUUID->"77514e2a-b6da-4634-a62f-ce88971fae3d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21267,10 +21878,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959469951634*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792803217*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e8bdc5aa-fcb0-455f-ac4f-da1ecc7bd06d"],
+In[74]:=",ExpressionUUID->"9e745511-324c-4485-bb7b-462d8b506c83"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21283,10 +21895,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594699917793`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792841185*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"28830cee-f597-4309-b1c8-44ad58d26b06"],
+In[74]:=",ExpressionUUID->"392b54cd-15ee-44b1-b583-9914c693792c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21299,10 +21912,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470031314*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792875743*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d0f5e4c0-6caa-4b60-afc5-ee641043674b"],
+In[74]:=",ExpressionUUID->"7549bb18-38a5-4e3a-b660-e92b1ac4b7e7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21315,10 +21929,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470065447*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627929137774`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d40fe467-a455-47b3-81c1-f35298ff7239"],
+In[74]:=",ExpressionUUID->"5d47261e-6564-4087-883a-92e5429151f8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21331,10 +21946,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470098689*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962792947563*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7f17794c-4ce1-4c6e-99d7-c34ac59e878d"],
+In[74]:=",ExpressionUUID->"bc1f211e-7adf-4951-a765-567b51e3a88f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21347,10 +21963,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470162706*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793014241*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a919ed37-0136-4f92-bb00-a41c11c17f81"],
+In[74]:=",ExpressionUUID->"d418375f-1e54-4088-831c-70a768ff759f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21363,10 +21980,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470229549*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793091076*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"225b8577-8b5c-4d92-8407-af51996af86b"],
+In[74]:=",ExpressionUUID->"ac64432b-37ae-41e3-a1b2-c08ec822ebe3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21379,10 +21997,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470297432*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627932064466`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"85243e84-572c-4956-80e3-8d4a5cfeaaf5"],
+In[74]:=",ExpressionUUID->"7343b51f-9418-461c-861f-25c6682890f8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21395,10 +22014,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594703735323`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793272724*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"69978ae1-82d6-4374-8149-107b7b33bde9"],
+In[74]:=",ExpressionUUID->"b3dc586d-4ebc-400e-b8cb-5ce02cdb9a6d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21411,10 +22031,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470449432*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793336328*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8f07521e-312b-4616-9d8f-4bfbd044f5c2"],
+In[74]:=",ExpressionUUID->"8ca2c10b-5aa6-49fd-91ed-ccb2ef8408f5"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21427,10 +22048,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470517497*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793399843*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3c8042b4-48c2-4888-8d6b-db64f0bf3600"],
+In[74]:=",ExpressionUUID->"c9364953-1c56-4d3e-85b2-a233468eab03"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21443,10 +22065,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594705475597`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627934324007`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ee106704-715a-4dc9-9b5b-fb9566b090e2"],
+In[74]:=",ExpressionUUID->"32bc5365-2e9f-4bdb-a76f-d27fa24c3804"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21459,10 +22082,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594705830793`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627934676323`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"63ecc48a-66f9-4cd8-953a-302a0b3c5fee"],
+In[74]:=",ExpressionUUID->"e37e6217-4194-4b16-a0be-6be83b0f1fb1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21475,10 +22099,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594706167173`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793683755*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"79150836-ee63-4592-ac5f-14e1e5184a04"],
+In[74]:=",ExpressionUUID->"25b4389c-a8bb-4846-80fd-bf8dcc9d79ac"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21491,10 +22116,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470713334*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793755002*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e0dca234-4e8d-4cd3-8e41-7227cf72d047"],
+In[74]:=",ExpressionUUID->"6d81ee86-c27f-4838-8473-dda724120873"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21507,10 +22133,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594707786922`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793815084*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"786dd580-d0c3-4065-824a-6622c6d95ab7"],
+In[74]:=",ExpressionUUID->"5681e58d-8d57-486f-99b9-1a6029eeb63c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21523,10 +22150,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470845338*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627938794727`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"334f3904-09bb-46e2-8d2e-9eafb259c63f"],
+In[74]:=",ExpressionUUID->"c15d523e-5225-40b3-985c-c9d79cabd344"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21539,10 +22167,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947091195*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962793939608*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"43961b27-1792-40c6-9e9c-dcd266fb6954"],
+In[74]:=",ExpressionUUID->"7bdcf1fc-3461-4599-bb2f-a050d11cb2c9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21555,10 +22184,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959470978801*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794001402*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"13d4933f-135a-4c42-9d81-897d52cb83f7"],
+In[74]:=",ExpressionUUID->"95a1529d-2bdb-4f95-b7e7-d5bd7bf9e7a1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21571,10 +22201,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471045871*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794068462*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d3224dbb-5aa8-406d-8246-153b270bd5b8"],
+In[74]:=",ExpressionUUID->"6e4a54eb-0853-4e92-9c5a-520d4cf5dbe5"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21587,10 +22218,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471081442*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794101695*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a959aa24-3acb-4011-8e46-624e006fe698"],
+In[74]:=",ExpressionUUID->"c02385be-d5f0-41e9-a647-2bcfca94a5e1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21603,10 +22235,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471114655*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627941465816`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d2cbfcba-a45f-4059-a491-1690f77a1f3e"],
+In[74]:=",ExpressionUUID->"31e4083d-d88d-4f58-9c66-3c1dc5b08e14"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21619,10 +22252,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471148738*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794201118*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ea27fc3b-8039-4120-ae1b-0b7364c9cb8d"],
+In[74]:=",ExpressionUUID->"c197b1fb-99c3-4250-bd3e-1c138c4b2a8b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21635,10 +22269,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471218637*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794284346*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f7bcf321-f004-401a-9848-4f681b4e1f3e"],
+In[74]:=",ExpressionUUID->"ce6bd9e2-187f-424a-aac1-cbc7e666e845"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21651,10 +22286,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947128616*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794365921*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c3f0f460-c5cd-4060-9df4-c7fb468f13ff"],
+In[74]:=",ExpressionUUID->"12987338-319b-443f-b492-2d8687e73832"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21667,10 +22303,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594713527308`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794429484*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a16a1fa1-09a9-4f0f-91f3-d64828a40020"],
+In[74]:=",ExpressionUUID->"3e79ad8c-0918-4810-b41a-d5e903bc0e57"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21683,10 +22320,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471359318*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794432939*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"53011f8d-55cd-4da5-8996-7b73e8134185"],
+In[74]:=",ExpressionUUID->"f42dc57d-bb75-43d6-8cc4-72d6e077cdb6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21699,10 +22337,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471363015*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794435986*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ecba514a-9661-4c02-8662-5c75ac37d287"],
+In[74]:=",ExpressionUUID->"138f5c4c-4650-44b8-97b0-a52892d354cf"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21715,10 +22354,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594713704767`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794443616*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6b903945-5288-4ba0-8af3-477f08c8afce"],
+In[74]:=",ExpressionUUID->"c8adf531-8daf-479a-977f-7505a8364557"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21731,10 +22371,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471373952*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627944469013`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"99a06e0f-d344-4f2f-bf20-db34a7d27a90"],
+In[74]:=",ExpressionUUID->"1ff22d62-f6fc-4ebc-aee3-10b8b2a6c119"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21747,10 +22388,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471376678*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794449617*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6b0e9ff1-7a42-4b85-89d3-1de8876b585d"],
+In[74]:=",ExpressionUUID->"1692b1b1-00b3-4b78-aa14-a19a3573ce9d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21763,10 +22405,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471379447*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794452221*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1a97c2a7-47cc-4487-83e7-dd696448241a"],
+In[74]:=",ExpressionUUID->"609830e7-5f67-4875-8e0f-c6a2c1256ebd"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21779,10 +22422,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471382704*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794454855*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5df778f9-b3d1-41db-b2fa-e60232b1b5ea"],
+In[74]:=",ExpressionUUID->"480653f5-6770-4dda-955f-c22767c662af"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21795,10 +22439,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947138547*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794481657*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5eca3a51-ce6c-40ec-8214-dae46f7cb7e2"],
+In[74]:=",ExpressionUUID->"ba320a6b-3c62-4d64-ad9a-a9b90e40efc6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21811,10 +22456,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947138815*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794484664*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9e7493b8-5dc9-48bf-9a48-c25f1aca3a6b"],
+In[74]:=",ExpressionUUID->"03d0dc7c-6950-465f-85de-1676bbe5fd78"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21827,10 +22473,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471391029*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794487626*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"19d7a8d4-718d-4af7-bd9b-701a4cc6e1db"],
+In[74]:=",ExpressionUUID->"8c6ff4ee-5a2f-41e9-8d47-6852ee824baf"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21843,10 +22490,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471422913*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627944957533`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b5ac976a-7892-4e1a-92b4-e2522751eba5"],
+In[74]:=",ExpressionUUID->"ca98ebdb-988d-42dd-af7d-df13c66aa61c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21859,10 +22507,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471425859*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279449995*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4a149592-d4b0-4edc-a43e-dbc56f303a65"],
+In[74]:=",ExpressionUUID->"38c67e12-e4b9-4287-b633-30a8b0cf3865"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21875,10 +22524,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471429237*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794503071*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"086cc1d3-e29a-46b3-910e-d7654b949b56"],
+In[74]:=",ExpressionUUID->"1c77c34b-24b7-4413-9d76-85cb00439782"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21891,10 +22541,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471432033*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794506358*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a8f24123-6157-4af7-b6e7-1fda7b0eba7f"],
+In[74]:=",ExpressionUUID->"2d0b8301-de75-453c-987e-87af3191aa60"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21907,10 +22558,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714350433`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794509214*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3fc83439-56ef-4521-824a-a7c30400e8ff"],
+In[74]:=",ExpressionUUID->"1412e375-605a-4af1-a7ae-43258764f730"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21923,10 +22575,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471438003*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279451227*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e5b66a26-df0c-4d7a-83b3-a06b7834c766"],
+In[74]:=",ExpressionUUID->"59f92e4d-bdc3-47c9-98f3-1bfba299c3c2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21939,10 +22592,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471444632*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794515283*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"db16eada-181b-4dcb-b837-44868a892b47"],
+In[74]:=",ExpressionUUID->"a8b0e6ac-581c-4d9e-aeeb-12a0151d046e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21955,10 +22609,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714473877`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794518201*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"54b7c288-5948-492b-ab77-2fdc88579d47"],
+In[74]:=",ExpressionUUID->"21d5453b-bcb6-4fb1-a675-1ac73bbbf7a4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21971,10 +22626,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471450192*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627945211*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d957cf13-60dd-4b15-b496-fe720a5296d6"],
+In[74]:=",ExpressionUUID->"82d82324-f67c-44fc-8795-675d574f09a4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -21987,10 +22643,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471452879*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794524025*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"87fe6c96-558f-4e6d-8070-121e2f4627c6"],
+In[74]:=",ExpressionUUID->"cf65a313-4aa8-4860-94e9-f75432946522"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22003,10 +22660,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947145569*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794527131*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"225e148f-090f-418b-baf5-b9e3415bd6c1"],
+In[74]:=",ExpressionUUID->"dd0e1e81-d013-491a-b2b0-a5f6b6fdb0ff"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22019,10 +22677,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714582367`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794529986*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"40ac4566-c5f3-427e-88ef-c84155c8e71f"],
+In[74]:=",ExpressionUUID->"10bdcead-728f-4848-b405-5f1c941c693d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22035,10 +22694,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714616833`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794532797*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"86b4db70-8bea-494b-8cb2-82fad55082ae"],
+In[74]:=",ExpressionUUID->"6591244c-dd72-4412-94c7-3d0268ea2897"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22051,10 +22711,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471464491*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794535591*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bc480597-8cc9-4117-ad43-698d6e206e4c"],
+In[74]:=",ExpressionUUID->"4862a992-835f-4b76-94bd-11cab6bd1349"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22067,10 +22728,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471467482*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279453881*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9dca0283-540d-48c2-89d5-fd1f6c05be7c"],
+In[74]:=",ExpressionUUID->"b7b9ade7-3d31-4630-b03b-af803e81de5e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22083,10 +22745,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471470748*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794541795*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ad3de335-fcd8-4f3e-9b83-3251295e47a4"],
+In[74]:=",ExpressionUUID->"99cf2a9f-2d24-4b8f-9907-677c73e06057"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22099,10 +22762,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471473713*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794544615*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e5589581-3c76-40bb-8a68-f0d8f8b86280"],
+In[74]:=",ExpressionUUID->"6a1146b3-d69d-4d43-9761-fec392018966"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22115,10 +22779,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714770937`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794547099*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"83f83b00-654c-4042-a013-65c1fa243363"],
+In[74]:=",ExpressionUUID->"c70b38cb-29ce-4618-a59b-fd4c4cee56a9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22131,10 +22796,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947147978*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794549865*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"56c50c91-b26b-4f6a-bbcf-470646cc2f19"],
+In[74]:=",ExpressionUUID->"39fe8443-fe79-48b3-9161-39c836bec30a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22147,20 +22813,22 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714825363`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627945524387`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5fc1a0ab-70f9-4558-97ad-f0f2ef607587"],
+In[74]:=",ExpressionUUID->"ce659c74-6228-45c1-ae19-1851eb659001"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471485652*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794555024*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2320b4e4-415b-4f4c-a32d-7dcfa9f8b9d8"],
+In[74]:=",ExpressionUUID->"b00c9a0e-34fb-4f74-94bf-db724d98d500"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22172,10 +22840,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471488182*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794557542*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f6718d76-92ef-4f51-bbed-860fa4ad3563"],
+In[74]:=",ExpressionUUID->"deb3941f-eba3-48d2-bfa0-31eea89b20b6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22187,10 +22856,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714907713`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794560191*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f0916e78-eeca-4ec6-9510-5af25c8d9d54"],
+In[74]:=",ExpressionUUID->"75c2ca29-b7b7-4005-8298-795092300120"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22206,10 +22876,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471494104*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627945629396`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3c1a5d98-e3e6-481c-b223-3e8fae697c98"],
+In[74]:=",ExpressionUUID->"c2190487-2e72-447b-9ff7-f848e6603662"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22225,10 +22896,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471496863*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279456563*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"26c1d369-54a9-43da-842f-a163a89ba6df"],
+In[74]:=",ExpressionUUID->"7b59d197-c868-4cc5-b1a1-ef60f2df65d3"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22244,10 +22916,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594714995213`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794568371*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"54b3b7fb-9cfc-4ce3-82ae-14b8453942a6"],
+In[74]:=",ExpressionUUID->"0798aee8-ddb6-4671-b1b8-533942f0bb59"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22263,10 +22936,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594715029373`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794571267*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"481ad3d9-f95f-49d5-8e49-e560e19617e8"],
+In[74]:=",ExpressionUUID->"7cbf9eae-0bb2-4fcd-beb3-69ce8009a9f8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22282,10 +22956,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471505801*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627945741787`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d02f8842-702b-4b66-abc6-be31ba522c17"],
+In[74]:=",ExpressionUUID->"2ff2a498-80b4-4a54-aaf4-80b77e4c20e8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22301,10 +22976,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471510399*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794576956*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"3008692a-6fde-41ca-b836-9eee069125b8"],
+In[74]:=",ExpressionUUID->"335d9373-7dbd-4725-b3e5-3561cf72ef5b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22320,10 +22996,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471513411*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794579865*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"cd432e25-5d22-49ad-a5fc-6ecfb2b9b963"],
+In[74]:=",ExpressionUUID->"27fb4bfc-68ce-470a-bc6d-779fa2a2476a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22339,10 +23016,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594715168123`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794582633*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b36f4246-10ab-4209-b6b3-b9fd832f18c4"],
+In[74]:=",ExpressionUUID->"84bbee73-40b4-4153-8877-9878d947bc05"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22358,10 +23036,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471520267*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794585582*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4a5544fd-eba3-4580-906f-8a22021675c5"],
+In[74]:=",ExpressionUUID->"a0b9f349-f01f-4b56-aa22-104aeb07523c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22377,10 +23056,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594715232897`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794588431*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0abf9554-756b-42a6-940e-52822bb425f7"],
+In[74]:=",ExpressionUUID->"ba505887-8e78-475a-a8a9-9db3d4bac1fd"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22396,10 +23076,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471526497*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794591236*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"12bf3772-2727-4439-9e1e-dfc3c4d0ced3"],
+In[74]:=",ExpressionUUID->"0714c39f-3d6d-40a2-b704-98d27f147980"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22415,10 +23096,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471529228*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794594039*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f2711a32-dea9-4eca-a459-1659aa82071e"],
+In[74]:=",ExpressionUUID->"e4d9a7fb-8dfe-48c8-8d51-b239daa25093"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22434,10 +23116,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471531929*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794596998*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7d6ffa14-56ee-418f-965a-b04886153a15"],
+In[74]:=",ExpressionUUID->"9d97d9e5-6d19-49fb-a924-9a50c978e046"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22453,10 +23136,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471535672*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794599963*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ddfc3d1a-46bb-47f2-bd16-7d39d1903679"],
+In[74]:=",ExpressionUUID->"2edf46d0-6e5f-4e30-aa9a-89f1d2b647e7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22472,10 +23156,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594715382423`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627946028957`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7e990b52-218e-484d-b07f-d5eb95c62e17"],
+In[74]:=",ExpressionUUID->"01b467b2-d84d-4d32-9ef0-2457ba9c1c8c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22491,10 +23176,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471541595*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794607048*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"47e26678-238b-459c-ac1c-b33b9c58e419"],
+In[74]:=",ExpressionUUID->"768d4280-2555-4d53-a86a-5c287600a818"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22510,10 +23196,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594715445967`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794609913*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a52888f1-8092-4793-b28a-36f402acc328"],
+In[74]:=",ExpressionUUID->"7b2c8ba5-e531-4fad-924d-19ce24d14c75"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -22529,10 +23216,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959471547274*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962794613035*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"17e59487-d67e-4b18-9f1e-8aa88eaa6bc6"],
+In[74]:=",ExpressionUUID->"fd40e96e-6c31-413b-87c6-f006a390ed42"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -25818,10 +26506,11 @@ Rwlgaw==
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472173257*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627951127033`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"39eda230-48f9-46f4-9d19-c2648b3f90b1"],
+In[74]:=",ExpressionUUID->"43e18308-972b-4767-9950-dcd2b611ebe7"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -29396,10 +30085,11 @@ D2PLr+rSIt/HbC3W9uXk/edzJLk/XYM657/B73HugT+3hMGRVlkH98E88vcg
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472444775*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627953240967`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2b58d533-cd5f-4b65-b3d0-29d28b258ae3"],
+In[74]:=",ExpressionUUID->"a281930c-93ac-4a18-939a-4861b0076926"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -33093,10 +33783,11 @@ z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594726811943`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795546372*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9d49d1bc-2943-4f2d-94a6-d47cca2be56f"],
+In[74]:=",ExpressionUUID->"26b31771-ae9b-4a1a-8373-97329aa54623"],
 
 Cell[BoxData[
  GraphicsBox[{InsetBox[
@@ -36103,10 +36794,11 @@ f4x6CwPzueOw4PhWv7PwOjnIOvl/ZtL/AbFTDo0=
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472893963*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795750885*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5b836978-b4c0-42ac-8874-b5b4fcdc3318"],
+In[74]:=",ExpressionUUID->"3b23959e-b3c8-4442-aa8d-6ecb8927d8b8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36122,10 +36814,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472911261*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957679167`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5e767eb7-656e-4e0f-91be-40bd4f81611e"],
+In[74]:=",ExpressionUUID->"39a9cec1-26e6-4ee2-b77e-f15d11939d1e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36141,10 +36834,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472914317*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957710857`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b5a21b2a-5b5e-412b-9d79-ddb0b84b5fdf"],
+In[74]:=",ExpressionUUID->"63050aea-57c5-463b-bed9-1c10c0aa36c5"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36160,10 +36854,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472917104*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957739353`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"837b59a4-ffff-4039-879f-5c239d5649fe"],
+In[74]:=",ExpressionUUID->"ed58d815-8e24-4227-93ca-2f60d3f2fc8c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36179,10 +36874,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594729198647`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957766037`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dea7c88f-b6a2-46e5-a5ef-3d83ec299985"],
+In[74]:=",ExpressionUUID->"3197b41f-6f83-49d5-8e09-07d8dfc9092d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36198,10 +36894,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472923435*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795779529*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0d0e50ba-3e01-4319-af2d-520791b21d3c"],
+In[74]:=",ExpressionUUID->"585f7a1b-5a01-4e6f-8ed7-dc05e0c9fb3c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36217,10 +36914,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594729263687`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795782463*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e4153089-77b8-400b-a763-523db2bdaf5d"],
+In[74]:=",ExpressionUUID->"6dfa12bd-10a9-4748-8502-126c019346e9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36236,10 +36934,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472929078*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957851553`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bf2f1a11-80b7-484a-b8fc-bfd18e1b6838"],
+In[74]:=",ExpressionUUID->"2e1f0bb2-e05f-4c98-bc52-5eb37500cbd7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36255,10 +36954,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594729325943`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957879353`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f57126d2-aed0-4933-ace0-37757e2ce933"],
+In[74]:=",ExpressionUUID->"8ef0091e-4a8d-46a7-8b1f-8f42386e9882"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36274,10 +36974,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472935484*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279579065*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8ed12e54-53e1-481e-95c2-3d2859249f93"],
+In[74]:=",ExpressionUUID->"5d651794-502e-4efd-8b0f-b73fe8f2e9e4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36293,10 +36994,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472938706*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795793521*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"85851ee1-7d2a-4c36-a4ab-66ac3867cb1c"],
+In[74]:=",ExpressionUUID->"710fcab8-5052-4e1d-b640-79a8dcfd5b3a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36312,10 +37014,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472941605*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957966003`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ed18ad1d-e7ca-46ad-83af-d68c69de4343"],
+In[74]:=",ExpressionUUID->"4b2225bf-ae89-4945-8bb5-faa5599ba77a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36331,10 +37034,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594729441357`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627957995872`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"abf13e3c-fae2-478d-8f87-93393367ee2c"],
+In[74]:=",ExpressionUUID->"0c338596-ebc8-4a51-93ba-7e12fb5240f6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36350,10 +37054,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472947171*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795802472*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7a23c73e-d5f2-4f7b-8eec-54a24e55d396"],
+In[74]:=",ExpressionUUID->"e2807b31-e616-49ef-b46e-5c683c771ad9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36369,10 +37074,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472950199*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795805584*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b7872e6b-7d31-49b0-ae02-457091e45cd6"],
+In[74]:=",ExpressionUUID->"cfc799dc-22f9-4ada-b14f-3a2423d55ce9"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36388,10 +37094,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472952723*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795808577*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4015f056-ceb4-4bd2-89da-62db69dfd5c4"],
+In[74]:=",ExpressionUUID->"fef6d33c-2ccd-4607-ae7b-1e080bac577e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36407,10 +37114,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472955648*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795811751*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bfb43957-9d49-4114-994b-0ae73643ed33"],
+In[74]:=",ExpressionUUID->"a8a71d73-ba36-43b5-a013-833dbedba0de"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36426,10 +37134,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472958523*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795814863*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4d091f7f-8256-4ea1-a59d-2aae93e44d23"],
+In[74]:=",ExpressionUUID->"f74b3b69-cdc0-4e86-bdfb-2330418038e7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36445,10 +37154,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959472961317*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962795818074*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"add8b043-05b5-4f22-92c5-711ff9565e64"]
+In[74]:=",ExpressionUUID->"965b5775-c453-4f50-9616-9f1331870819"]
 }, Open  ]],
 
 Cell[BoxData["\.1c"], "Output",
@@ -36456,9 +37166,9 @@ Cell[BoxData["\.1c"], "Output",
   3.769411576455082*^9, 3.7694193356910152`*^9, 3.76941969430898*^9, 
   3.774370761349127*^9, 3.774370837493993*^9, 3.775821532143385*^9, 
   3.779123665847465*^9, 3.779124027972493*^9, 3.7819584170284977`*^9, 
-  3.7819585635818443`*^9, 3.781959474941798*^9},
- CellLabel->
-  "Out[100]=",ExpressionUUID->"a1308c92-a45c-47be-b7af-10c4ba7409a0"],
+  3.7819585635818443`*^9, 3.781959474941798*^9, 3.78196065596029*^9, 
+  3.7819627978369493`*^9},
+ CellLabel->"Out[85]=",ExpressionUUID->"99f47719-ca07-4c8e-905b-3e8d8451abaf"],
 
 Cell[CellGroupData[{
 
@@ -36467,10 +37177,11 @@ Cell[BoxData["\<\"\"\>"], "Print",
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947494768*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797843836*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"495dcb55-2d44-4f71-af5d-5e5dcc2c0882"],
+In[74]:=",ExpressionUUID->"028cea9c-a641-4dc7-a676-d8921ec8c8c4"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36482,10 +37193,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959474951179*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797848131*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dbc6980a-671c-4398-8cfb-731e87a236f5"],
+In[74]:=",ExpressionUUID->"5e1b8205-e2a6-4770-95a9-70ddfa3f9670"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36498,10 +37210,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594749558773`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797854002*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"cd71e4ef-e0ee-49ad-a640-8fd8eca7a818"],
+In[74]:=",ExpressionUUID->"f81eaa7b-f315-4320-87f9-18482a76cf96"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36514,10 +37227,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594750020437`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797902795*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a19d277a-7a62-433b-8576-856552490a7f"],
+In[74]:=",ExpressionUUID->"9918ca88-8d1f-42b9-b8c9-a5865e5a60b1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36530,10 +37244,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594750050707`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627979061813`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e3363e94-5ad2-49d7-8dde-b2e2200fd400"],
+In[74]:=",ExpressionUUID->"b1e55a28-ec28-4d6c-9f52-0164afb56f50"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36546,10 +37261,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594750109987`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797913982*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a8722bb5-61ca-42eb-9f4b-58d6ef3ca458"],
+In[74]:=",ExpressionUUID->"74a986fa-f68c-4a05-bd85-bdb6c9b7fb67"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36562,10 +37278,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475015236*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797917522*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9d7786ed-a4ed-447e-9245-028f8ac65c5b"],
+In[74]:=",ExpressionUUID->"8a4ee6fe-e31a-4187-83df-15cf4b757e54"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36578,10 +37295,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475049673*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196279795371*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f0b352e1-f25a-4d4a-99c5-cb6f3060ec82"],
+In[74]:=",ExpressionUUID->"f2b67bb4-28b1-4ce2-a667-652fd92b3565"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36594,10 +37312,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475052897*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797958528*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"95b59cfa-0275-416e-9c53-0fe7e98d3daf"],
+In[74]:=",ExpressionUUID->"470c7dee-1f8f-48ec-93a1-9195b2eae671"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36610,10 +37329,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475055822*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962797993595*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"81cbdcf5-30c3-4696-bc83-ac1b29adc15e"],
+In[74]:=",ExpressionUUID->"1989777a-b636-4f7f-a3f7-50bcf7ebcca2"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36626,10 +37346,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594750913353`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627979972477`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"81cc5fab-0de3-4236-a05f-c1a923efb506"],
+In[74]:=",ExpressionUUID->"54310362-3c5c-43dc-b562-02028c423a26"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36642,10 +37363,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947509404*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798006062*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d40fae7c-ada5-4070-8c05-8d195ed96e8d"],
+In[74]:=",ExpressionUUID->"c91b31a7-c605-4534-a09d-656a88a79fb7"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36658,10 +37380,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475129834*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627980427303`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f469ce12-8abf-4e6e-b735-817741323bda"],
+In[74]:=",ExpressionUUID->"ccea84e8-4b1c-47cd-ba3c-1f5728ffeeaa"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36674,10 +37397,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475132835*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627980462027`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a76acedb-0395-41b1-a623-3daf5a1ef1e1"],
+In[74]:=",ExpressionUUID->"b154d7d9-62ac-4bf4-944d-66dfcb5a1410"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36690,10 +37414,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475135738*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798054572*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"422c474b-2981-4dd9-b3bb-f95048fcb3ab"],
+In[74]:=",ExpressionUUID->"4b25875e-5405-41dd-995c-e4a6e761364a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36706,10 +37431,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475174177*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798091258*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"0b7cadba-55f5-47a5-a1b4-f9cc0694dfa7"],
+In[74]:=",ExpressionUUID->"9bf30ba5-fe16-4839-bacc-d23d0e80cc5a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36722,10 +37448,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475180526*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798094695*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"71071fc7-cec5-49bb-9b31-2c7fd0831668"],
+In[74]:=",ExpressionUUID->"1fe833bb-4f34-4708-a5ee-8846f6b06144"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36738,10 +37465,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475188467*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798133039*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"60e59462-ef7a-45e2-a54b-81288158004f"],
+In[74]:=",ExpressionUUID->"47f8b868-25d0-4723-8f32-7e51875c214d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36754,10 +37482,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475222517*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627981370792`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e8c7aeba-022b-48af-90af-d1d6326605be"],
+In[74]:=",ExpressionUUID->"b0cdadd7-8689-4d7f-8c3b-d0cb94d1f6f0"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36770,10 +37499,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475230563*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798142786*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b80c76ba-0682-4611-acba-1aa37bdb1db6"],
+In[74]:=",ExpressionUUID->"dd331ce9-7dbc-4379-991e-cc9eb19ed201"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36786,10 +37516,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475240467*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627981771793`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"e6f3b3b8-c87f-4f0a-b921-a8c05e43cd4c"],
+In[74]:=",ExpressionUUID->"c7a4f1b6-c358-49bf-a1b3-b9a109e6c743"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -36801,38 +37532,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475243631*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"68cd1f73-5695-42be-aa6d-fc9deb54c801"]
-}, Open  ]],
-
-Cell[BoxData[
- TemplateBox[{
-  "Transpose","nmtx",
-   "\"The first two levels of \\\\!\\\\(\\\\*RowBox[{\\\"{\\\", \\\"}\\\"}]\\\
-\\) cannot be transposed.\"",2,101,106,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.78195947534087*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"3887c287-6984-429b-b6b0-538a3a18f2f7"],
-
-Cell[BoxData[
- TemplateBox[{
-  "StringJoin","string",
-   "\"String expected at position \\\\!\\\\(\\\\*RowBox[{\\\"2\\\"}]\\\\) in \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\[LeftSkeleton]\\\", \\\"1\\\", \
-\\\"\\\\[RightSkeleton]\\\"}]\\\\).\"",2,101,107,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959475397481*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798180749*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5ad1bfe8-af33-4ec5-841e-32b697b6370d"],
+In[74]:=",ExpressionUUID->"f00fe8e0-84fb-4edf-9e0a-d8c5c65fe941"],
 
 Cell[BoxData["\<\"\\npreparing FORM code in \
 /Users/josegabrielreyes/Documents/hj-scattering-amplitudes/fc-amp-1.frm\"\>"],\
@@ -36841,276 +37545,44 @@ Cell[BoxData["\<\"\\npreparing FORM code in \
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959475523366*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"183a45fa-00f7-4de4-b162-d6fe01ca2e02"],
-
-Cell[BoxData[
- TemplateBox[{
-  "StringJoin","string",
-   "\"String expected at position \\\\!\\\\(\\\\*RowBox[{\\\"2\\\"}]\\\\) in \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"!\\\\\\\\\\\\\\\"\\\\\\\"\\\", \\\"<>\\\", \
-RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \\\
-\"[\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \
-\\\"File\\\", \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"MacOSX-x86-64\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"ToForm\\\\\\\"\\\"}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\\\\\\\
-\\\\\\\\\" > \
-\\\\\\\\\\\\\\\"/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/fc-\
-amp-1.frm\\\\\\\\\\\\\\\"\\\\\\\"\\\"}]\\\\).\"",2,101,108,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.78195947557952*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"d35413f8-9975-4099-9807-117f93d60a33"],
-
-Cell[BoxData[
- TemplateBox[{
-  "OpenWrite","noopen",
-   "\"Cannot open \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"!\\\\\\\\\\\\\\\"\\\\\\\"\\\", \\\"<>\\\", \
-RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \\\
-\"[\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \
-\\\"File\\\", \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"MacOSX-x86-64\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"ToForm\\\\\\\"\\\"}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\\\\\\\
-\\\\\\\\\" > \
-\\\\\\\\\\\\\\\"/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/fc-\
-amp-1.frm\\\\\\\\\\\\\\\"\\\\\\\"\\\"}]\\\\).\"",2,101,109,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959475637053*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"aa5a8248-0304-418e-8578-fb5e76e9a469"],
-
-Cell[BoxData[
- TemplateBox[{
-  "WriteString","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,101,110,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959475703389*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962798427511*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"40952299-4323-42bd-abac-8817acee6149"],
-
-Cell[BoxData[
- TemplateBox[{
-  "WriteString","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,101,111,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594757845173`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"63ebc729-3606-4b74-ba25-48f73158cb4d"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Write","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,101,112,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959475835629*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"b96fbdd4-f116-4832-a980-475e4b163f3f"],
-
-Cell[BoxData[
- TemplateBox[{
-  "WriteString","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,101,113,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594759180803`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"f0df7602-e692-48df-8762-c7a5b96403d7"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"WriteString\\\", \
-\\\"::\\\", \\\"strml\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
-during this calculation.\"",2,101,114,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476003504*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"c6237e0e-6230-4cfa-b1cf-13f6d9b810b9"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Write","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,101,115,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476054082*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"95aba39c-1eef-4697-8d9a-94b9bc5f9deb"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Write","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,101,116,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476137257*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"49d936c4-c2c8-4227-afb2-f235e0b4de83"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"Write\\\", \\\"::\
-\\\", \\\"strml\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed during \
-this calculation.\"",2,101,117,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476201791*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"6f69bad0-8429-4022-8c53-73e0b2b5c9fb"],
-
-Cell[BoxData[
- TemplateBox[{
-  "StringJoin","string",
-   "\"String expected at position \\\\!\\\\(\\\\*RowBox[{\\\"2\\\"}]\\\\) in \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\[LeftSkeleton]\\\", \\\"1\\\", \
-\\\"\\\\[RightSkeleton]\\\"}]\\\\).\"",2,101,118,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476255746*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"1890ded9-974c-45da-be2b-dc5fcb5957d1"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"StringJoin\\\", \
-\\\"::\\\", \\\"string\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
-during this calculation.\"",2,101,119,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594763144608`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"a3c37b7f-5fe8-4cfa-bdac-037da9db19ee"],
-
-Cell[BoxData[
- TemplateBox[{
-  "ReadList","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"ToFileName\\\", \\\"[\\\", \
-RowBox[{RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{\\\"{\\\", \
-RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \\\"File\\\", \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"FormCalc\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"Common.frm\\\\\\\"\\\"}], \\\"]\\\"}]\\\\) is not a \
-string, SocketObject, InputStream[ ], or OutputStream[ ].\"",2,101,120,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594763705273`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"c0829a5d-6b4f-400a-a40a-f9fe13d475f8"],
-
-Cell[BoxData[
- TemplateBox[{
-  "ReadList","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"ToFileName\\\", \\\"[\\\", \
-RowBox[{RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{\\\"{\\\", \
-RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \\\"File\\\", \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"FormCalc\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"CalcFeynAmp.frm\\\\\\\"\\\"}], \\\"]\\\"}]\\\\) is not \
-a string, SocketObject, InputStream[ ], or OutputStream[ ].\"",2,101,121,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476429412*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"5bf0b7f7-ced1-4263-92f5-ebe100fd6703"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Close","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, \
-SocketObject, InputStream[ ], or OutputStream[ ].\"",2,101,122,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476483774*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"a21f2af1-feb6-4625-a1dd-591b7a41e6ce"],
+In[74]:=",ExpressionUUID->"6040d29e-6d53-44d0-8153-6fc39f3c7ad0"],
 
 Cell[BoxData["\<\"running FORM... \"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959476491509*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819627984335318`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1825d951-ca38-49d7-8f25-0b615db179a5"],
-
-Cell[BoxData[
- TemplateBox[{
-  "DeleteFile","fdnfnd",
-   "\"Directory or file \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"/Users/josegabrielreyes/Documents/hj-\
-scattering-amplitudes/fc-amp-1.frm\\\\\\\"\\\"}]\\\\) not found.\"",2,101,123,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476539225*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"2adb9349-ca47-4a46-a525-0baaa86b5576"],
-
-Cell[CellGroupData[{
+In[74]:=",ExpressionUUID->"bb6dbc3a-13d4-408e-96dc-bb945f8ae988"],
 
 Cell[BoxData["\<\"ok\\n\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594765996304`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962805504345*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f824d8cf-8500-4ec1-98d9-e11a94785d76"],
+In[74]:=",ExpressionUUID->"91f41a42-36a8-4f0d-ac3f-33d2721a360a"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594766370564`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962814415193*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"8cdcb266-0c05-433f-b649-6e7fa26db875"],
+In[74]:=",ExpressionUUID->"4d541f4b-6be4-42a9-865f-08d3e4f02f7f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37122,10 +37594,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959476646103*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962814419075*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"69af9d3c-d0b7-457f-8a9d-00674c437709"],
+In[74]:=",ExpressionUUID->"c3a632d3-c811-4930-994a-86a578306a39"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37138,10 +37611,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959476649516*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628144614973`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f84202f6-2149-4433-a810-6a2ff72659fb"],
+In[74]:=",ExpressionUUID->"5705f1c0-a9f7-406c-8b56-178385e02a8f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37154,10 +37628,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947669165*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962814466323*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c0f906f7-0bb7-429a-ac7e-8b831bf0055a"],
+In[74]:=",ExpressionUUID->"751f2a4f-1c25-4863-ad62-e37d5ee5391d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37170,10 +37645,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959476695331*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962814474002*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"58ec6fca-690b-404e-9692-a062b967c773"],
+In[74]:=",ExpressionUUID->"4979249c-da8e-4be3-a949-1348bde39d08"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37186,10 +37662,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959476698056*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962814518714*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"22e5c388-9bab-403c-bab7-c3571f64e1ed"],
+In[74]:=",ExpressionUUID->"963f0eb3-2c59-441c-b86c-1db226782a26"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37202,10 +37679,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959476738834*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628145260067`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"10eae351-a782-49b3-999c-af61bff42929"],
+In[74]:=",ExpressionUUID->"de4b0d6d-64df-493f-81eb-63d90b54b983"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37217,10 +37695,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594767455072`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962814530445*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1c2ff272-58a9-4de5-af72-9af89269e256"],
+In[74]:=",ExpressionUUID->"e64d20da-e798-4c8d-92f2-05ce99feed2e"],
 
 Cell[BoxData["\<\"\\npreparing FORM code in \
 /Users/josegabrielreyes/Documents/hj-scattering-amplitudes/feynamps/fc-amp-1.\
@@ -37229,307 +37708,44 @@ frm\"\>"], "Print",
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594767841043`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628145797167`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"7a327b67-e88b-486f-a58e-307ef31db7ff"]
-}, Open  ]],
-
-Cell[BoxData[
- TemplateBox[{
-  "StringJoin","string",
-   "\"String expected at position \\\\!\\\\(\\\\*RowBox[{\\\"2\\\"}]\\\\) in \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"!\\\\\\\\\\\\\\\"\\\\\\\"\\\", \\\"<>\\\", \
-RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \\\
-\"[\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \
-\\\"File\\\", \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"MacOSX-x86-64\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"ToForm\\\\\\\"\\\"}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\\\\\\\
-\\\\\\\\\" > \
-\\\\\\\\\\\\\\\"/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/\
-feynamps/fc-amp-1.frm\\\\\\\\\\\\\\\"\\\\\\\"\\\"}]\\\\).\"",2,112,124,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476787497*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"4c0b981a-c809-450f-b872-94f579a9c19c"],
-
-Cell[BoxData[
- TemplateBox[{
-  "OpenWrite","noopen",
-   "\"Cannot open \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"!\\\\\\\\\\\\\\\"\\\\\\\"\\\", \\\"<>\\\", \
-RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \\\
-\"[\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \
-\\\"File\\\", \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"MacOSX-x86-64\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"ToForm\\\\\\\"\\\"}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\\\\\\\
-\\\\\\\\\" > \
-\\\\\\\\\\\\\\\"/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/\
-feynamps/fc-amp-1.frm\\\\\\\\\\\\\\\"\\\\\\\"\\\"}]\\\\).\"",2,112,125,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594768023443`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"9e7e0064-e4d2-4dc0-b63c-6da6d16ff77a"],
-
-Cell[BoxData[
- TemplateBox[{
-  "WriteString","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,112,126,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476814589*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"cb5d4ee3-40f1-46d5-8f9e-2052a088f2b8"],
-
-Cell[BoxData[
- TemplateBox[{
-  "WriteString","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,112,127,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.78195947685646*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"e3082f24-6052-43f3-852f-a5136c2054cb"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Write","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,112,128,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594768685017`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"8a65e9bb-5712-4a45-8206-9e7bd7889592"],
-
-Cell[BoxData[
- TemplateBox[{
-  "WriteString","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,112,129,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476877268*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"41670ace-84fa-468e-bf17-f61fa8c9a50c"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"WriteString\\\", \
-\\\"::\\\", \\\"strml\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
-during this calculation.\"",2,112,130,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594769307737`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"21b2f468-36e1-4b5c-afe0-f06cd4827904"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Write","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,112,131,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476939103*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"f103e958-4f0d-4f72-94c3-e3d8bde1511b"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Write","strml",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, stream, \
-or list of strings and streams.\"",2,112,132,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959476952073*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"fca65804-27da-4c9e-9738-c55957a2bcdd"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"Write\\\", \\\"::\
-\\\", \\\"strml\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed during \
-this calculation.\"",2,112,133,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477010391*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"75d6f361-b47d-4e3f-98e0-092ff4b67bd9"],
-
-Cell[BoxData[
- TemplateBox[{
-  "StringJoin","string",
-   "\"String expected at position \\\\!\\\\(\\\\*RowBox[{\\\"2\\\"}]\\\\) in \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\[LeftSkeleton]\\\", \\\"1\\\", \
-\\\"\\\\[RightSkeleton]\\\"}]\\\\).\"",2,112,134,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594770208607`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"0e979e32-870d-40f4-a01d-9470d17ce6f6"],
-
-Cell[BoxData[
- TemplateBox[{
-  "ReadList","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"ToFileName\\\", \\\"[\\\", \
-RowBox[{RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{\\\"{\\\", \
-RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \\\"File\\\", \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"FormCalc\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"Common.frm\\\\\\\"\\\"}], \\\"]\\\"}]\\\\) is not a \
-string, SocketObject, InputStream[ ], or OutputStream[ ].\"",2,112,135,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477035112*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"69881004-e68e-4211-8085-689d11af2480"],
-
-Cell[BoxData[
- TemplateBox[{
-  "ReadList","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"ToFileName\\\", \\\"[\\\", \
-RowBox[{RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{\\\"{\\\", \
-RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \\\"File\\\", \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"FormCalc\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"CalcFeynAmp.frm\\\\\\\"\\\"}], \\\"]\\\"}]\\\\) is not \
-a string, SocketObject, InputStream[ ], or OutputStream[ ].\"",2,112,136,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477045413*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"365cb634-5c1b-4226-aa8c-81f70fbca746"],
-
-Cell[BoxData[
- TemplateBox[{
-  "StringJoin","string",
-   "\"String expected at position \\\\!\\\\(\\\\*RowBox[{\\\"2\\\"}]\\\\) in \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"#endprocedure\\\\\\\\n\\\\\\\\n##\\\\\\\\n\
-\\\\\\\\n\\\\\\\"\\\", \\\"<>\\\", RowBox[{\\\"ReadList\\\", \\\"[\\\", \
-RowBox[{RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\
-\\\", \\\"[\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"DirectoryName\\\", \\\
-\"[\\\", \\\"File\\\", \\\"]\\\"}], \\\",\\\", \\\"\\\\\\\"FormCalc\\\\\\\"\\\
-\"}], \\\"}\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"Common.frm\\\\\\\"\\\"}], \\\"]\\\"}], \\\",\\\", \\\"Record\\\", \
-\\\",\\\", RowBox[{\\\"RecordSeparators\\\", \\\"\\\\[Rule]\\\", \
-RowBox[{\\\"{\\\", \\\"}\\\"}]}]}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\\\\\
-\\\\n##\\\\\\\\n##\\\\\\\\n\\\\\\\\n\\\\\\\"\\\", \\\"<>\\\", \
-RowBox[{\\\"ReadList\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \
-\\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{\\\"{\\\", \
-RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \\\"File\\\", \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"FormCalc\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"CalcFeynAmp.frm\\\\\\\"\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"Record\\\", \\\",\\\", RowBox[{\\\"RecordSeparators\\\", \\\"\\\\[Rule]\\\
-\", RowBox[{\\\"{\\\", \\\"}\\\"}]}]}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\
-\\\\\\\\n##\\\\\\\\n\\\\\\\"\\\"}]\\\\).\"",2,112,137,17521385326807766193,
-   "Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477059545*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"2bc4569a-2e94-40b0-890d-4e5adeec2445"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"StringJoin\\\", \
-\\\"::\\\", \\\"string\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
-during this calculation.\"",2,112,138,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477111924*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"9e44b148-e7be-4495-9867-b51eeefd581f"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Close","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, \
-SocketObject, InputStream[ ], or OutputStream[ ].\"",2,112,139,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594771204023`*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"66efbb15-49b9-4580-a6d8-9f98cd817bc7"],
+In[74]:=",ExpressionUUID->"aef5aa6f-c12e-4ade-9da5-cbdc9bf8e6d6"],
 
 Cell[BoxData["\<\"running FORM... \"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947713268*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"323f4a19-9b44-40a6-a5b7-7ef532ce83e7"],
-
-Cell[BoxData[
- TemplateBox[{
-  "DeleteFile","fdnfnd",
-   "\"Directory or file \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"/Users/josegabrielreyes/Documents/hj-\
-scattering-amplitudes/feynamps/fc-amp-1.frm\\\\\\\"\\\"}]\\\\) not found.\"",
-   2,112,140,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477135511*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628145846148`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"35316a06-b089-4882-9f4f-16fd11462929"],
-
-Cell[CellGroupData[{
+In[74]:=",ExpressionUUID->"ee35f8ee-5ffb-4c30-a332-a3f39f927483"],
 
 Cell[BoxData["\<\"ok\\n\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477144128*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962820859514*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"d051a9ef-eb6b-403f-84a4-da1eb7da81bd"],
+In[74]:=",ExpressionUUID->"10f45da7-6d44-4076-8e48-7a7279b328ca"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477147189*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835574505*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"1278ecf9-4652-4d3f-a23f-84d073cecef3"],
+In[74]:=",ExpressionUUID->"012bb82c-b12f-4eb5-ba4a-61a5d2c30e22"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37541,10 +37757,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477152196*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835578508*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"16e0b70a-378c-4c34-b499-072729980156"],
+In[74]:=",ExpressionUUID->"3bc49a64-8d42-4a7c-9b15-952daa8d84af"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37557,10 +37774,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477156502*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835615191*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"90722922-52de-41f4-ba7e-8ce8aa88a62b"],
+In[74]:=",ExpressionUUID->"d158b529-d400-46ed-853b-8fc7c259fd9a"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37573,10 +37791,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477160982*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628356194677`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"84d77609-21f0-42fd-9cc1-5ad9e6a6e509"],
+In[74]:=",ExpressionUUID->"1417d32f-28c1-4c88-b012-acc03f98dbb6"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37589,10 +37808,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477166799*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835623246*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a340a438-a68c-4037-a749-e9fdf55d5bed"],
+In[74]:=",ExpressionUUID->"e4514c64-e2c0-4d65-affb-dfb598f43e52"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37605,10 +37825,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477216811*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835662486*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"a8a2e19c-014c-42df-b310-1bbbc304785a"],
+In[74]:=",ExpressionUUID->"d6989616-a8aa-450e-ac2d-147bfb45aa9e"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37621,10 +37842,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594772204857`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835669333*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6f891700-86b1-4da2-862d-deb2151026a0"],
+In[74]:=",ExpressionUUID->"fc03f14e-3edd-4ece-923e-593ae6734f14"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37636,10 +37858,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477223227*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835672722*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"5adca53d-916f-4b5f-b1a2-a352e6046575"],
+In[74]:=",ExpressionUUID->"fde60955-dd63-44fa-b19a-6f72da8ac468"],
 
 Cell[BoxData["\<\"\\npreparing FORM code in \
 /Users/josegabrielreyes/Documents/hj-scattering-amplitudes/feynamps/fc-amp-1.\
@@ -37648,121 +37871,44 @@ frm\"\>"], "Print",
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477278743*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"3eeacd61-15da-43fb-a625-3f95bb87efd1"]
-}, Open  ]],
-
-Cell[BoxData[
- TemplateBox[{
-  "OpenWrite","noopen",
-   "\"Cannot open \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"!\\\\\\\\\\\\\\\"\\\\\\\"\\\", \\\"<>\\\", \
-RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \\\
-\"[\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \
-\\\"File\\\", \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"MacOSX-x86-64\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"ToForm\\\\\\\"\\\"}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\\\\\\\
-\\\\\\\\\" > \
-\\\\\\\\\\\\\\\"/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/\
-feynamps/fc-amp-1.frm\\\\\\\\\\\\\\\"\\\\\\\"\\\"}]\\\\).\"",2,112,141,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477281522*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"0bb3d531-ded4-41d1-aaed-d3556e64e169"],
-
-Cell[BoxData[
- TemplateBox[{
-  "ReadList","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"ToFileName\\\", \\\"[\\\", \
-RowBox[{RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{\\\"{\\\", \
-RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \\\"File\\\", \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"FormCalc\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \
-\\\",\\\", \\\"\\\\\\\"Common.frm\\\\\\\"\\\"}], \\\"]\\\"}]\\\\) is not a \
-string, SocketObject, InputStream[ ], or OutputStream[ ].\"",2,112,142,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477291416*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"41c7cf33-c2ca-46bf-9995-5c518e07cd30"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"ReadList\\\", \
-\\\"::\\\", \\\"stream\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
-during this calculation.\"",2,112,143,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.7819594773089237`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835707169*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dbc44a70-cb3e-4163-8875-84c47bffc997"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Close","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, \
-SocketObject, InputStream[ ], or OutputStream[ ].\"",2,112,144,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477355588*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"9d7ad334-b887-41cd-bcc1-39688a8ed771"],
+In[74]:=",ExpressionUUID->"fc43e771-d461-421b-8bf4-22dd3c957724"],
 
 Cell[BoxData["\<\"running FORM... \"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477366613*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"f1cae797-5040-4f66-9453-28604c8079a4"],
-
-Cell[BoxData[
- TemplateBox[{
-  "DeleteFile","fdnfnd",
-   "\"Directory or file \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"/Users/josegabrielreyes/Documents/hj-\
-scattering-amplitudes/feynamps/fc-amp-1.frm\\\\\\\"\\\"}]\\\\) not found.\"",
-   2,112,145,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477369135*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962835722221*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"6892c07c-5ef4-4da1-9f24-a80a83684312"],
-
-Cell[CellGroupData[{
+In[74]:=",ExpressionUUID->"0b6743ad-73b7-4fe8-9167-10c878a8d4e7"],
 
 Cell[BoxData["\<\"ok\\n\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477378181*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962841388188*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"ec2d74df-b01c-4aa6-b3d2-40587648fdc3"],
+In[74]:=",ExpressionUUID->"327de8e5-a8e3-4ce2-ab53-850288d74a80"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477380862*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628777669983`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"351318da-7aa6-4207-89c7-920e18b40ffc"],
+In[74]:=",ExpressionUUID->"fa57134d-23e9-4e2f-a0a1-57a75c407b6d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37774,10 +37920,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477386166*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628777709913`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9f31b12d-7be6-4893-aeea-3becccb10376"],
+In[74]:=",ExpressionUUID->"2bee25e7-fe13-45dc-9768-04858a0bef7d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37790,10 +37937,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477389391*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628778125896`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"9ac7bbcd-214d-4feb-8c8a-165a5d3443be"],
+In[74]:=",ExpressionUUID->"f91df3c9-f1af-4bf2-9fd3-424777247bda"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37806,10 +37954,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477392712*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196287781781*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"4cb2de73-bd5e-4b6a-b758-41fcee23acdb"],
+In[74]:=",ExpressionUUID->"e854471a-1851-40a7-becb-1ff08282542d"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37822,10 +37971,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477405324*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962877826984*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"304e1669-dae0-42ed-9732-9ba0908fe66d"],
+In[74]:=",ExpressionUUID->"0b36bc86-4cb0-4a05-b035-23a8686d58e1"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37838,10 +37988,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594774502363`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.78196287787267*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b1fd5e1e-9775-4922-9349-cf2237db41e2"],
+In[74]:=",ExpressionUUID->"326f31b4-0e36-4ac6-8534-f3bc2fd54298"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37854,10 +38005,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477453768*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628778768272`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f5ff0d35-4c64-47da-920d-e61d25e811c1"],
+In[74]:=",ExpressionUUID->"10afec88-1590-42fa-93aa-c7b11528b555"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -37869,10 +38021,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477456545*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628778814287`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"fd915ac0-aada-41ba-9282-42bc50db68e7"],
+In[74]:=",ExpressionUUID->"2a48ed9d-efd8-4ad8-bf78-1d438b60dbc5"],
 
 Cell[BoxData["\<\"\\npreparing FORM code in \
 /Users/josegabrielreyes/Documents/hj-scattering-amplitudes/feynamps/fc-amp-1.\
@@ -37881,130 +38034,44 @@ frm\"\>"], "Print",
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477504201*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"dcdb3dfd-1123-4e78-af24-e9a863c6a42b"]
-}, Open  ]],
-
-Cell[BoxData[
- TemplateBox[{
-  "OpenWrite","noopen",
-   "\"Cannot open \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"!\\\\\\\\\\\\\\\"\\\\\\\"\\\", \\\"<>\\\", \
-RowBox[{\\\"ToFileName\\\", \\\"[\\\", RowBox[{RowBox[{\\\"ToFileName\\\", \\\
-\"[\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"DirectoryName\\\", \\\"[\\\", \
-\\\"File\\\", \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"MacOSX-x86-64\\\\\\\"\\\"}], \\\"}\\\"}], \\\"]\\\"}], \\\",\\\", \
-\\\"\\\\\\\"ToForm\\\\\\\"\\\"}], \\\"]\\\"}], \\\"<>\\\", \\\"\\\\\\\"\\\\\\\
-\\\\\\\\\" > \
-\\\\\\\\\\\\\\\"/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/\
-feynamps/fc-amp-1.frm\\\\\\\\\\\\\\\"\\\\\\\"\\\"}]\\\\).\"",2,112,146,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477507188*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"bd66cc97-4dbf-461a-a939-1f5fbfe05127"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"OpenWrite\\\", \\\
-\"::\\\", \\\"noopen\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
-during this calculation.\"",2,112,147,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477521385*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"d743d06d-6650-471b-a118-a077028aa16e"],
-
-Cell[BoxData[
- TemplateBox[{
-  "Close","stream",
-   "\"\\\\!\\\\(\\\\*RowBox[{\\\"$Failed\\\"}]\\\\) is not a string, \
-SocketObject, InputStream[ ], or OutputStream[ ].\"",2,112,148,
-   17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.78195947752931*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"05444902-d25e-478f-95f9-d78197b85596"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"Close\\\", \\\"::\
-\\\", \\\"stream\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed during \
-this calculation.\"",2,112,149,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.78195947754389*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962877929078*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"dcb0b40d-17c2-4006-922a-b4f80b73377f"],
+In[74]:=",ExpressionUUID->"146b555c-f748-4d8c-8a0b-5caec38174d4"],
 
 Cell[BoxData["\<\"running FORM... \"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477551572*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"1701221e-01f0-42a1-bde1-2a53299f7358"],
-
-Cell[BoxData[
- TemplateBox[{
-  "DeleteFile","fdnfnd",
-   "\"Directory or file \
-\\\\!\\\\(\\\\*RowBox[{\\\"\\\\\\\"/Users/josegabrielreyes/Documents/hj-\
-scattering-amplitudes/feynamps/fc-amp-1.frm\\\\\\\"\\\"}]\\\\) not found.\"",
-   2,112,150,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.781959477602816*^9},
- CellLabel->
-  "During evaluation of \
-In[89]:=",ExpressionUUID->"5f547f44-7231-4bad-b790-ecbee6bb9b5d"],
-
-Cell[BoxData[
- TemplateBox[{
-  "General","stop",
-   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"DeleteFile\\\", \
-\\\"::\\\", \\\"fdnfnd\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
-during this calculation.\"",2,112,151,17521385326807766193,"Alternate Kernel"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.781958417428768*^9, 3.781958563974804*^9, 
-  3.78195947761628*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819628779451313`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"68151637-80a0-4c89-a223-0b1c78e104f7"],
-
-Cell[CellGroupData[{
+In[74]:=",ExpressionUUID->"037cf7c7-d26e-4c50-ba58-a1dc6118b841"],
 
 Cell[BoxData["\<\"ok\\n\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477625618*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962883886524*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"db22554a-e423-4e4a-afa6-e61232a97867"],
+In[74]:=",ExpressionUUID->"0fb0bddc-5ad9-4893-91de-d9907cffd57e"],
 
 Cell[BoxData["\<\"\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477628793*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819629106144247`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"563b9d67-c487-4795-9f2c-29a5a7f7ccfa"],
+In[74]:=",ExpressionUUID->"dd3299fe-39bd-448d-aaf9-2bd8437a32fc"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -38016,10 +38083,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477634837*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819629106180696`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f24af2a3-8bd2-489d-b116-c10aec3eaca4"],
+In[74]:=",ExpressionUUID->"6cc5300b-82e9-4dec-a203-fbc22742a26c"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -38032,10 +38100,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594776380568`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819629106600027`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"be1f4e25-9701-4ffd-b865-ad544e2bd37f"],
+In[74]:=",ExpressionUUID->"ee972d17-2be9-4949-8bac-6e311cc19548"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -38048,10 +38117,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594776414137`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819629106640778`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"cada948e-c3f6-47b0-9d56-5dedb1089048"],
+In[74]:=",ExpressionUUID->"7778620a-a11b-4bb7-9466-7dace532b3be"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -38064,10 +38134,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947764441*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962910678331*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"11a9b131-8f4b-48a2-8a6d-b7e26644489f"],
+In[74]:=",ExpressionUUID->"19e05a26-9b30-44cb-b2df-abedd8c9993b"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -38080,10 +38151,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477700945*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819629107120132`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"b1bb6c64-5263-41ac-a1ee-6d592e4a692e"],
+In[74]:=",ExpressionUUID->"26e74d0e-ac56-4a07-a8f3-3c8822bd90a8"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -38096,10 +38168,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594777042933`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962910716014*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"2d7a06c5-4643-4bfb-86e8-378777dc120c"],
+In[74]:=",ExpressionUUID->"80f18fdd-fed9-44b4-8d1d-bd6d351be73f"],
 
 Cell[BoxData[
  InterpretationBox[
@@ -38111,10 +38184,11 @@ Cell[BoxData[
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594777074633`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819629107233953`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"c5cc88d8-7013-4595-8b3a-c6dabe70a5c8"],
+In[74]:=",ExpressionUUID->"899c41f4-e386-4fd6-b113-ec40cbd9b330"],
 
 Cell[BoxData["\<\"\\npreparing FORM code in \
 /Users/josegabrielreyes/Documents/hj-scattering-amplitudes/feynamps/fc-amp-1.\
@@ -38123,30 +38197,33 @@ frm\"\>"], "Print",
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.78195947775465*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962910760874*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"60a21c09-a8f1-4a16-8f69-af9c92b2ffa9"],
+In[74]:=",ExpressionUUID->"6a8a4354-3175-4957-80d5-366d64282bfc"],
 
 Cell[BoxData["\<\"running FORM... \"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.781959477758123*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.781962910776026*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"bc392163-5781-4d6e-9e71-f258b993dfb9"],
+In[74]:=",ExpressionUUID->"a55dee86-a5c1-4ec0-b23b-925c46b2b554"],
 
 Cell[BoxData["\<\"ok\\n\"\>"], "Print",
  CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
   3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
   3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9, 
   3.779123655439589*^9, 3.779124011156674*^9, 3.781958402457677*^9, 
-  3.781958549727667*^9, 3.7819594777652407`*^9},
+  3.781958549727667*^9, 3.781959460910985*^9, 3.781960641742058*^9, 
+  3.7819629162674026`*^9},
  CellLabel->
   "During evaluation of \
-In[89]:=",ExpressionUUID->"f89d40fd-0014-446e-9840-8ee110c68b0a"]
+In[74]:=",ExpressionUUID->"247be3c5-77c8-4e54-a460-74b332d77fb9"]
 }, Open  ]]
 }, Open  ]],
 
@@ -63085,1058 +63162,38239 @@ Cell[BoxData[
 Cell[BoxData[""], "Input",
  CellChangeTimes->{{3.7754901336565437`*^9, 
   3.7754901394427156`*^9}},ExpressionUUID->"e983dc9e-7c02-4e79-995f-\
-db0add5406de"]
-},
-WindowSize->{908, 679},
-WindowMargins->{{143, Automatic}, {Automatic, 19}},
-FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)",
-StyleDefinitions->"Default.nb"
-]
-(* End of Notebook Content *)
+db0add5406de"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"dB1", " ", "=", " ", 
+     RowBox[{"DiagramExtract", "[", 
+      RowBox[{"insB", ",", 
+       RowBox[{"{", 
+        RowBox[{
+        "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", 
+         "8", ",", "9"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"dB2", " ", "=", " ", 
+     RowBox[{"DiagramExtract", "[", 
+      RowBox[{"insB", ",", 
+       RowBox[{"{", 
+        RowBox[{
+        "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15", ",", 
+         "16", ",", "17", ",", "18"}], "}"}]}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"dB3", " ", "=", " ", 
+     RowBox[{"DiagramExtract", "[", 
+      RowBox[{"insB", ",", 
+       RowBox[{"{", 
+        RowBox[{
+        "19", ",", "20", ",", "21", ",", "22", ",", "23", ",", "24", ",", 
+         "25", ",", "26", ",", "27"}], "}"}]}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"dB4", " ", "=", " ", 
+     RowBox[{"DiagramExtract", "[", 
+      RowBox[{"insB", ",", 
+       RowBox[{"{", 
+        RowBox[{
+        "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", 
+         "34", ",", "35", ",", "36"}], "}"}]}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"box", "=", 
+     RowBox[{"{", 
+      RowBox[{"box1", ",", "box2", ",", "box3", ",", "box4"}], "}"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"dB", "=", 
+     RowBox[{"{", 
+      RowBox[{"dB1", ",", "dB2", ",", "dB3", ",", "dB4"}], "}"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{"Do", "[", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"box", "[", 
+        RowBox[{"[", "n", "]"}], "]"}], "=", " ", 
+       RowBox[{"CalcFeynAmp", "[", 
+        RowBox[{
+         RowBox[{"CreateFeynAmp", "[", 
+          RowBox[{"dB", "[", 
+           RowBox[{"[", "n", "]"}], "]"}], "]"}], ",", 
+         RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], ";", 
+      "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"box", "[", 
+        RowBox[{"[", "n", "]"}], "]"}], "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{
+          RowBox[{"box", "[", 
+           RowBox[{"[", "n", "]"}], "]"}], "//.", 
+          RowBox[{"Abbr", "[", "]"}]}], "//.", 
+         RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+        RowBox[{"Abbr", "[", "]"}]}]}], ";", "\[IndentingNewLine]", 
+      RowBox[{"Export", "[", 
+       RowBox[{
+        RowBox[{"\"\<ggHgg_box_\>\"", "<>", 
+         RowBox[{"ToString", "[", "n", "]"}], "<>", 
+         "\"\<_FeynAmp_9diags.m\>\""}], ",", 
+        RowBox[{"box", "[", 
+         RowBox[{"[", "n", "]"}], "]"}]}], "]"}], ";"}], 
+     "\[IndentingNewLine]", ",", 
+     RowBox[{"{", 
+      RowBox[{"n", ",", 
+       RowBox[{"Length", "[", "box", "]"}]}], "}"}]}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.781961533617432*^9, 
+  3.7819615509048443`*^9}},ExpressionUUID->"e564c25e-e726-4972-89b1-\
+0a2f41bf3658"],
 
-(* Internal cache information *)
-(*CellTagsOutline
-CellTagsIndex->{}
-*)
-(*CellTagsIndex
-CellTagsIndex->{}
-*)
-(*NotebookFileOutline
-Notebook[{
-Cell[558, 20, 621, 13, 84, "Input",ExpressionUUID->"5ed94a23-f6b7-4858-b120-72e0fcc40a50"],
-Cell[CellGroupData[{
-Cell[1204, 37, 826, 12, 73, "Input",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
-Cell[CellGroupData[{
-Cell[2055, 53, 278, 6, 24, "Print",ExpressionUUID->"0bed2b69-2169-43c0-bccb-6555417f2018"],
-Cell[2336, 61, 303, 6, 24, "Print",ExpressionUUID->"69fb9c11-7db8-4625-8c94-5ff2f87bf757"],
-Cell[2642, 69, 292, 6, 24, "Print",ExpressionUUID->"094c767f-d8a2-4418-ba3f-3933a257d77c"]
-}, Open  ]],
-Cell[2949, 78, 792, 16, 42, "Message",ExpressionUUID->"e90079bd-ddd6-4cb0-b0e8-0cd6005736b3"],
-Cell[CellGroupData[{
-Cell[3766, 98, 278, 6, 24, "Print",ExpressionUUID->"b5b7f0c8-4024-435a-930d-7d1443290e28"],
-Cell[4047, 106, 305, 6, 24, "Print",ExpressionUUID->"d8717242-fa34-4d45-b99f-ddf95a6dea6c"],
-Cell[4355, 114, 325, 6, 24, "Print",ExpressionUUID->"a4551807-5683-4009-9950-6ad824410832"]
-}, Open  ]]
-}, Open  ]],
-Cell[4707, 124, 2377, 60, 220, "Input",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
-Cell[CellGroupData[{
-Cell[7109, 188, 6469, 173, 766, "Input",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
-Cell[CellGroupData[{
-Cell[13603, 365, 465, 8, 24, "Print",ExpressionUUID->"c850d677-e0e6-4b48-aba1-96ad819dedbc"],
-Cell[14071, 375, 456, 8, 24, "Print",ExpressionUUID->"bae17365-a1f3-4753-8ab3-acea7c57a94e"],
-Cell[14530, 385, 716, 15, 24, "Print",ExpressionUUID->"90f70628-7671-42be-b09b-b5ce0390fe29"],
-Cell[15249, 402, 456, 8, 24, "Print",ExpressionUUID->"60540d0c-7bcd-49ba-86a3-096e98027ac1"],
-Cell[15708, 412, 653, 13, 24, "Print",ExpressionUUID->"6d66d71c-a9c9-49d7-b2be-67f6515f2405"],
-Cell[16364, 427, 702, 14, 24, "Print",ExpressionUUID->"bdaf03fd-6e39-4812-8667-6c7d1f939140"],
-Cell[17069, 443, 702, 14, 24, "Print",ExpressionUUID->"64225ca4-f071-4b26-a3e8-3aa2b9d3ba52"],
-Cell[17774, 459, 702, 14, 24, "Print",ExpressionUUID->"5f6df367-ac98-497d-a329-faebfec24d47"],
-Cell[18479, 475, 702, 14, 24, "Print",ExpressionUUID->"589a2794-93e0-4242-a46b-a87daccc5dbc"],
-Cell[19184, 491, 702, 14, 24, "Print",ExpressionUUID->"d083104b-4f3e-4392-a45f-e44b9da55db8"],
-Cell[19889, 507, 702, 14, 24, "Print",ExpressionUUID->"681e2ccc-23b4-48f1-8e87-daecf2d22374"],
-Cell[20594, 523, 702, 14, 24, "Print",ExpressionUUID->"a6841b51-8e80-4541-9f5f-0babfa258262"],
-Cell[21299, 539, 702, 14, 24, "Print",ExpressionUUID->"05b0a2a3-db60-41cf-bd9c-6cd2096a51cd"],
-Cell[22004, 555, 702, 14, 24, "Print",ExpressionUUID->"0f96c639-3496-4e32-adf9-3f41cadaf204"],
-Cell[22709, 571, 704, 14, 24, "Print",ExpressionUUID->"1bde26ee-32fa-4f24-bd86-5e20c1815fb9"],
-Cell[23416, 587, 704, 14, 24, "Print",ExpressionUUID->"83593b22-52ec-412f-89b5-e02520615c63"],
-Cell[24123, 603, 706, 14, 24, "Print",ExpressionUUID->"ceaaabcd-38a2-4a24-96e9-317d28e10f6a"],
-Cell[24832, 619, 704, 14, 24, "Print",ExpressionUUID->"15be3f24-bcf8-41f7-89d4-e93133a906f5"],
-Cell[25539, 635, 706, 14, 24, "Print",ExpressionUUID->"154d4dea-25a9-41ce-a4ed-92135bdc20e7"],
-Cell[26248, 651, 704, 14, 24, "Print",ExpressionUUID->"74129927-374d-42db-803c-b8ad3e0951f3"],
-Cell[26955, 667, 706, 14, 24, "Print",ExpressionUUID->"03cc396e-e006-4425-8edc-fe9c7e9b57b8"],
-Cell[27664, 683, 706, 14, 24, "Print",ExpressionUUID->"16961e49-9bd6-425a-bb29-357aca493e03"],
-Cell[28373, 699, 704, 14, 24, "Print",ExpressionUUID->"62c06080-02df-4610-99f2-ff0e9faedbd0"],
-Cell[29080, 715, 704, 14, 24, "Print",ExpressionUUID->"436e53c2-e465-46d4-8929-72477b072964"],
-Cell[29787, 731, 704, 14, 24, "Print",ExpressionUUID->"9323b055-e714-47a6-8646-75fd64777fc7"],
-Cell[30494, 747, 702, 14, 24, "Print",ExpressionUUID->"54f676b2-b4a7-42c4-a989-639191ef1ab1"],
-Cell[31199, 763, 706, 14, 24, "Print",ExpressionUUID->"8bd39f42-4ce1-4bd5-9c9b-58e7d10263f9"],
-Cell[31908, 779, 704, 14, 24, "Print",ExpressionUUID->"1cc4f86e-b088-48fa-aed6-181f177d1579"],
-Cell[32615, 795, 704, 14, 24, "Print",ExpressionUUID->"39563a07-3629-42ee-abfc-59e31424e412"],
-Cell[33322, 811, 704, 14, 24, "Print",ExpressionUUID->"f009df17-a1a1-4686-bdbf-05063e39494d"],
-Cell[34029, 827, 704, 14, 24, "Print",ExpressionUUID->"424560fc-97c5-4cd4-82ca-816ae618e300"],
-Cell[34736, 843, 704, 14, 24, "Print",ExpressionUUID->"5d643c12-f300-40d2-a463-931180a52644"],
-Cell[35443, 859, 702, 14, 24, "Print",ExpressionUUID->"a1db9c2a-9026-4465-aa07-8eb6c27df223"],
-Cell[36148, 875, 706, 14, 24, "Print",ExpressionUUID->"ae680557-7ef5-4bbc-8daf-9869f0b9e8ea"],
-Cell[36857, 891, 703, 14, 24, "Print",ExpressionUUID->"ef2ef909-0cdb-4f23-be10-d734b958dc09"],
-Cell[37563, 907, 704, 14, 24, "Print",ExpressionUUID->"af2c2d58-6c09-4558-8823-4780a0890b14"],
-Cell[38270, 923, 704, 14, 24, "Print",ExpressionUUID->"2bf8c6e7-55f0-4590-bb3c-cab1798f55cc"],
-Cell[38977, 939, 706, 14, 24, "Print",ExpressionUUID->"abd733aa-e9c6-478c-9b23-4b97d43776af"],
-Cell[39686, 955, 704, 14, 24, "Print",ExpressionUUID->"1e42c595-5049-46ca-afb4-79a937e1e7bb"],
-Cell[40393, 971, 704, 14, 24, "Print",ExpressionUUID->"77a502a0-c28a-457a-bfcf-ed4694e545d7"],
-Cell[41100, 987, 703, 14, 24, "Print",ExpressionUUID->"ad0dd7c2-5fc8-480a-a9f8-0dcab87b4a22"],
-Cell[41806, 1003, 704, 14, 24, "Print",ExpressionUUID->"8c08d05d-2850-4a93-b33d-561a57ef067b"],
-Cell[42513, 1019, 704, 14, 24, "Print",ExpressionUUID->"6f634f8c-37c6-4a79-ba3c-f8af40cb8595"],
-Cell[43220, 1035, 704, 14, 24, "Print",ExpressionUUID->"7b35ef0c-aba0-4502-a158-9bf408411481"],
-Cell[43927, 1051, 704, 14, 24, "Print",ExpressionUUID->"c9f971bd-32e0-4a8b-870d-4986d217427e"],
-Cell[44634, 1067, 704, 14, 24, "Print",ExpressionUUID->"9b698cd0-632c-44eb-a4ff-1b3b026e4778"],
-Cell[45341, 1083, 704, 14, 24, "Print",ExpressionUUID->"96cd34e5-fea2-4277-8f08-94f70f1c0c30"],
-Cell[46048, 1099, 706, 14, 24, "Print",ExpressionUUID->"1f3d92f4-847f-47c2-8329-018da04e3eb3"],
-Cell[46757, 1115, 704, 14, 24, "Print",ExpressionUUID->"78fe6544-15e2-478b-b014-529fb2a00ae8"],
-Cell[47464, 1131, 704, 14, 24, "Print",ExpressionUUID->"a86ffb47-09c1-4b4a-bc3d-eec8761cff3e"],
-Cell[48171, 1147, 704, 14, 24, "Print",ExpressionUUID->"d3a847fc-28da-4b71-ab07-67ace23dbbcf"],
-Cell[48878, 1163, 704, 14, 24, "Print",ExpressionUUID->"5a3929e2-73d0-4791-8ca8-243d5688bbf8"],
-Cell[49585, 1179, 704, 14, 24, "Print",ExpressionUUID->"5257a772-5ad7-4d22-bc6c-4271c64c1b5b"],
-Cell[50292, 1195, 704, 14, 24, "Print",ExpressionUUID->"1ffda7ae-fbac-44a9-b04b-ac8a16b140e9"],
-Cell[50999, 1211, 704, 14, 24, "Print",ExpressionUUID->"c820008d-039b-4927-b06d-f593790877f7"],
-Cell[51706, 1227, 704, 14, 24, "Print",ExpressionUUID->"32735ec1-a7fa-4c71-ba43-64d52ca8e1d6"],
-Cell[52413, 1243, 704, 14, 24, "Print",ExpressionUUID->"6566d7ca-1f53-4ce3-b441-ef611a44288c"],
-Cell[53120, 1259, 704, 14, 24, "Print",ExpressionUUID->"a0fcd42c-295f-4f6f-b104-d9c9f53509a8"],
-Cell[53827, 1275, 704, 14, 24, "Print",ExpressionUUID->"8299240b-d49a-4810-a9cc-0de9ae75ef76"],
-Cell[54534, 1291, 704, 14, 24, "Print",ExpressionUUID->"c932a75f-9ab8-4c23-8597-b9521385dde9"],
-Cell[55241, 1307, 702, 14, 24, "Print",ExpressionUUID->"63f8f3b6-35c6-4200-9e84-95bfac4e3c3d"],
-Cell[55946, 1323, 703, 14, 24, "Print",ExpressionUUID->"15fd22f2-21fe-4c08-8853-424952289d33"],
-Cell[56652, 1339, 704, 14, 24, "Print",ExpressionUUID->"8749d1b6-f0ab-4b1f-9527-c8e18881b4e7"],
-Cell[57359, 1355, 704, 14, 24, "Print",ExpressionUUID->"d1b82f21-de4d-4d42-bf8b-3d8bff221138"],
-Cell[58066, 1371, 706, 14, 24, "Print",ExpressionUUID->"d37adc0f-39cb-4aff-80f0-5fe623081fe1"],
-Cell[58775, 1387, 706, 14, 24, "Print",ExpressionUUID->"a6a2a9f5-ad8e-4043-b860-cc5d73fee99e"],
-Cell[59484, 1403, 704, 14, 24, "Print",ExpressionUUID->"02072772-4753-4438-9d49-2132fc43cc39"],
-Cell[60191, 1419, 704, 14, 24, "Print",ExpressionUUID->"e0778a6b-8c51-42ec-8a1d-4ad8ae57677b"],
-Cell[60898, 1435, 706, 14, 24, "Print",ExpressionUUID->"0f5e8a55-79ce-4f83-b9d6-7763f9994784"],
-Cell[61607, 1451, 706, 14, 24, "Print",ExpressionUUID->"37a09b94-d126-4172-a433-5df6a29de41c"],
-Cell[62316, 1467, 704, 14, 24, "Print",ExpressionUUID->"051b2c62-5d07-4b29-beb5-a09abbcfa9d9"],
-Cell[63023, 1483, 704, 14, 24, "Print",ExpressionUUID->"3b26fd04-92e4-4b46-8b99-46001cfa4f92"],
-Cell[63730, 1499, 703, 14, 24, "Print",ExpressionUUID->"832a06f3-f1b0-44e1-beb9-fe960216df29"],
-Cell[64436, 1515, 703, 14, 24, "Print",ExpressionUUID->"345a1730-740d-4123-b8ef-0b7b44b294d2"],
-Cell[65142, 1531, 704, 14, 24, "Print",ExpressionUUID->"57db4d4f-8833-4f56-99cf-7198c6ed4713"],
-Cell[65849, 1547, 704, 14, 24, "Print",ExpressionUUID->"25f8f075-cc2d-4974-9b65-3f83c429f2c8"],
-Cell[66556, 1563, 704, 14, 24, "Print",ExpressionUUID->"11bb23c9-26ce-476b-a6fa-8b75ff419a75"],
-Cell[67263, 1579, 704, 14, 24, "Print",ExpressionUUID->"b439e80a-3c2c-48f6-9d85-1ccc3497a121"],
-Cell[67970, 1595, 706, 14, 24, "Print",ExpressionUUID->"f2f7e84a-84cf-420d-9ac7-2ae21258ee61"],
-Cell[68679, 1611, 704, 14, 24, "Print",ExpressionUUID->"49798cdd-b00a-44df-a4a4-90ae3824838a"],
-Cell[69386, 1627, 704, 14, 24, "Print",ExpressionUUID->"038b5a3a-813c-4c2d-8fca-fa12137d3320"],
-Cell[70093, 1643, 704, 14, 24, "Print",ExpressionUUID->"ca2726ba-edba-490e-b617-f2a3cacc0d6c"],
-Cell[70800, 1659, 706, 14, 24, "Print",ExpressionUUID->"900a6a4f-b04c-44f1-9905-fbf1fdf830e4"],
-Cell[71509, 1675, 704, 14, 24, "Print",ExpressionUUID->"e7c339e0-3ae1-4f98-b019-bca42abd2074"],
-Cell[72216, 1691, 704, 14, 24, "Print",ExpressionUUID->"f3ac1ff3-bec4-4edd-8d8e-9ad17a92a45c"],
-Cell[72923, 1707, 706, 14, 24, "Print",ExpressionUUID->"2895d9a1-6902-4c1c-a020-104078d58139"],
-Cell[73632, 1723, 704, 14, 24, "Print",ExpressionUUID->"13b313b1-e851-4fe1-9b93-0ebbc6be86d3"],
-Cell[74339, 1739, 706, 14, 24, "Print",ExpressionUUID->"ea262980-fd99-4864-8d5a-330f2ef9088c"],
-Cell[75048, 1755, 704, 14, 24, "Print",ExpressionUUID->"5d9b924c-5b8f-40be-b152-cf1cd182955a"],
-Cell[75755, 1771, 706, 14, 24, "Print",ExpressionUUID->"dfae0ed5-3c4f-42e7-bb93-ebbb1f577594"],
-Cell[76464, 1787, 704, 14, 24, "Print",ExpressionUUID->"71921be3-82f7-4203-9861-6cccbe4f332d"],
-Cell[77171, 1803, 706, 14, 24, "Print",ExpressionUUID->"634f61b3-bac1-4008-acb8-be710f1b5fa5"],
-Cell[77880, 1819, 704, 14, 24, "Print",ExpressionUUID->"b64bd75c-bd91-462d-a640-7a0034bca74d"],
-Cell[78587, 1835, 706, 14, 24, "Print",ExpressionUUID->"473d7dbc-aa36-4030-8594-227c0793ad5c"],
-Cell[79296, 1851, 704, 14, 24, "Print",ExpressionUUID->"50f6ba73-b6b4-42c8-8b43-cf76506b0b9f"],
-Cell[80003, 1867, 704, 14, 24, "Print",ExpressionUUID->"a4e737e8-178e-422b-ba7f-bf235683f1ff"],
-Cell[80710, 1883, 704, 14, 24, "Print",ExpressionUUID->"2d39a445-4b29-46c7-8755-4f0230375d72"],
-Cell[81417, 1899, 704, 14, 24, "Print",ExpressionUUID->"d63e306c-7aae-4c26-968f-32af0cbdff1c"],
-Cell[82124, 1915, 704, 14, 24, "Print",ExpressionUUID->"ce111455-c597-4ed8-a0d2-eda46ffc6419"],
-Cell[82831, 1931, 704, 14, 24, "Print",ExpressionUUID->"73d41ad4-1e8e-485b-b8c8-fc9c9b82eb5c"],
-Cell[83538, 1947, 704, 14, 24, "Print",ExpressionUUID->"62381954-131e-4de8-ac4c-b4a3eff1e81d"],
-Cell[84245, 1963, 706, 14, 24, "Print",ExpressionUUID->"8204de00-fc41-42f4-8a6c-d581ae66d937"],
-Cell[84954, 1979, 704, 14, 24, "Print",ExpressionUUID->"c2df9ba6-714d-411d-af6e-97f7981a3381"],
-Cell[85661, 1995, 704, 14, 24, "Print",ExpressionUUID->"d83b4e5b-5247-4076-8242-5d7d44c59980"],
-Cell[86368, 2011, 708, 14, 24, "Print",ExpressionUUID->"76ef28e9-99d6-423c-be69-22516ac045d7"],
-Cell[87079, 2027, 706, 14, 24, "Print",ExpressionUUID->"db7a6c57-d37b-4c14-9317-c2b8a13a2d76"],
-Cell[87788, 2043, 706, 14, 24, "Print",ExpressionUUID->"828db509-28a9-416e-918c-fb2d80a1c32f"],
-Cell[88497, 2059, 708, 14, 24, "Print",ExpressionUUID->"3391780e-53ce-4ded-be16-f8942ef78cc1"],
-Cell[89208, 2075, 706, 14, 24, "Print",ExpressionUUID->"d24b97ab-9d1c-4603-b9b5-66293745e9c6"],
-Cell[89917, 2091, 706, 14, 24, "Print",ExpressionUUID->"e69c1e97-dbee-458e-97b8-b4f95e96db94"],
-Cell[90626, 2107, 708, 14, 24, "Print",ExpressionUUID->"98300ab1-2f7f-4a0d-b0f5-edfd9669a851"],
-Cell[91337, 2123, 705, 14, 24, "Print",ExpressionUUID->"9194c07e-062c-49cd-9fef-f1e20525d6b0"],
-Cell[92045, 2139, 705, 14, 24, "Print",ExpressionUUID->"81ad9ea6-8585-410a-a67f-48db9e1676e4"],
-Cell[92753, 2155, 706, 14, 24, "Print",ExpressionUUID->"9b2cbc66-e4f9-402a-89ab-ba82d2b6085b"],
-Cell[93462, 2171, 706, 14, 24, "Print",ExpressionUUID->"d50f4031-a14e-4c5e-8589-fc408b884a67"],
-Cell[94171, 2187, 706, 14, 24, "Print",ExpressionUUID->"732c45ab-9112-42e8-935d-0b70d3cda20c"],
-Cell[94880, 2203, 708, 14, 24, "Print",ExpressionUUID->"160ab324-b3e6-4a12-979c-63c0fa73ef6e"],
-Cell[95591, 2219, 708, 14, 24, "Print",ExpressionUUID->"dfed45ef-2fd1-4e30-a93a-27200b496168"],
-Cell[96302, 2235, 706, 14, 24, "Print",ExpressionUUID->"0e6d1ad0-af17-429d-84b6-3ce6104f90fa"],
-Cell[97011, 2251, 706, 14, 24, "Print",ExpressionUUID->"71c63d52-344f-40a2-a4d5-3a0c1c1d98ff"],
-Cell[97720, 2267, 708, 14, 24, "Print",ExpressionUUID->"4e51b3fe-cdf5-4b4f-983c-2b2dca17e96b"],
-Cell[98431, 2283, 708, 14, 24, "Print",ExpressionUUID->"583b57b5-d1c8-41d2-84dd-a7006b416386"],
-Cell[99142, 2299, 705, 14, 24, "Print",ExpressionUUID->"0c965ee1-980e-43c6-88fb-a37ff9cd4e9d"],
-Cell[99850, 2315, 708, 14, 24, "Print",ExpressionUUID->"e5bd4f95-17d5-410c-a564-23388b2283f5"],
-Cell[100561, 2331, 708, 14, 24, "Print",ExpressionUUID->"5d3c5a5f-dee4-4d6c-a713-912a9e520e2a"],
-Cell[101272, 2347, 708, 14, 24, "Print",ExpressionUUID->"300a2ab9-38f5-4f1f-851f-b28cdd8f50f4"],
-Cell[101983, 2363, 708, 14, 24, "Print",ExpressionUUID->"2ced3c91-1241-49f4-a557-40a30b81a1a5"],
-Cell[102694, 2379, 706, 14, 24, "Print",ExpressionUUID->"a5514407-1db2-4c40-ba8a-0a31c778d992"],
-Cell[103403, 2395, 708, 14, 24, "Print",ExpressionUUID->"dbb67bb4-f32a-4b7b-8b95-83d34f7d5b1e"],
-Cell[104114, 2411, 706, 14, 24, "Print",ExpressionUUID->"923d5099-753e-4f4d-8018-32ac5eaa1f89"],
-Cell[104823, 2427, 706, 14, 24, "Print",ExpressionUUID->"6ea5d1f9-1fbf-4417-a2a8-b160b77c7fe6"],
-Cell[105532, 2443, 705, 14, 24, "Print",ExpressionUUID->"69a1da54-4171-4e13-b646-75d9cba5d04f"],
-Cell[106240, 2459, 705, 14, 24, "Print",ExpressionUUID->"434da721-a599-479c-ad6b-93110fd04329"],
-Cell[106948, 2475, 706, 14, 24, "Print",ExpressionUUID->"2ede39cf-4f2e-4da3-914d-21a2b9fdd75c"],
-Cell[107657, 2491, 706, 14, 24, "Print",ExpressionUUID->"66d58f83-6d75-4746-9d91-c9df3ce86e79"],
-Cell[108366, 2507, 706, 14, 24, "Print",ExpressionUUID->"aa6e0b5c-3618-4adb-ab42-9a23b5320bd0"],
-Cell[109075, 2523, 708, 14, 24, "Print",ExpressionUUID->"a62a8e34-2dd8-4cbd-bedd-8d2bb13f8857"],
-Cell[109786, 2539, 705, 14, 24, "Print",ExpressionUUID->"122d9b93-89dd-49c8-b130-1b51ccf8104b"],
-Cell[110494, 2555, 706, 14, 24, "Print",ExpressionUUID->"ae2a6549-0f75-4ecc-9d56-4913fa8dc215"],
-Cell[111203, 2571, 708, 14, 24, "Print",ExpressionUUID->"ca8814d1-2581-482d-ad0b-5ba922cbb50f"],
-Cell[111914, 2587, 708, 14, 24, "Print",ExpressionUUID->"ab48a4d3-ece6-4812-8440-1e5d04228663"],
-Cell[112625, 2603, 708, 14, 24, "Print",ExpressionUUID->"cbbc4be4-5b41-4d3b-bf77-4ae4591e77fa"],
-Cell[113336, 2619, 708, 14, 24, "Print",ExpressionUUID->"1bd8c931-2c09-4501-bff2-b9870e185e0a"],
-Cell[114047, 2635, 708, 14, 24, "Print",ExpressionUUID->"f399e97f-54fb-46e8-b1f8-2e3ac38c57e4"],
-Cell[114758, 2651, 706, 14, 24, "Print",ExpressionUUID->"d8c22152-4c34-4508-b1fd-985970362c5e"],
-Cell[115467, 2667, 706, 14, 24, "Print",ExpressionUUID->"28ca54e6-fabd-4375-b850-0c5d89160ae7"],
-Cell[116176, 2683, 706, 14, 24, "Print",ExpressionUUID->"8e10c818-905c-46d0-b00e-ed20dfd5097e"],
-Cell[116885, 2699, 706, 14, 24, "Print",ExpressionUUID->"0c096991-0c84-45e3-92cf-1ecf105ec347"],
-Cell[117594, 2715, 706, 14, 24, "Print",ExpressionUUID->"56cf175d-8abb-49cd-943f-536b0ef03923"],
-Cell[118303, 2731, 706, 14, 24, "Print",ExpressionUUID->"34a2f054-c27d-4c82-aacb-13322d322563"],
-Cell[119012, 2747, 708, 14, 24, "Print",ExpressionUUID->"13d5827a-738f-4a77-850d-a619ed785b84"],
-Cell[119723, 2763, 708, 14, 24, "Print",ExpressionUUID->"22ace566-b38c-4b8f-8b76-bfeec5e3fe58"],
-Cell[120434, 2779, 706, 14, 24, "Print",ExpressionUUID->"08633297-2647-4b5b-b9df-1df37ef63b23"],
-Cell[121143, 2795, 708, 14, 24, "Print",ExpressionUUID->"e8120ba1-6fe0-4445-8bc9-63ff58ce0879"],
-Cell[121854, 2811, 705, 14, 24, "Print",ExpressionUUID->"35bbe1c8-d40d-4023-97b0-c528d73be824"],
-Cell[122562, 2827, 706, 14, 24, "Print",ExpressionUUID->"f0e45ed7-e501-4d3e-b528-514767856701"],
-Cell[123271, 2843, 706, 14, 24, "Print",ExpressionUUID->"583f1fd2-76d9-4d67-bb4f-760d3988f5f1"],
-Cell[123980, 2859, 708, 14, 24, "Print",ExpressionUUID->"bed89636-122e-41a1-bc87-d6c89517d95a"],
-Cell[124691, 2875, 706, 14, 24, "Print",ExpressionUUID->"af0c623b-f361-451b-8571-598396d89901"],
-Cell[125400, 2891, 706, 14, 24, "Print",ExpressionUUID->"4600f1f8-854d-4403-8a85-5fc4a45fc2cf"],
-Cell[126109, 2907, 706, 14, 24, "Print",ExpressionUUID->"488a8cb3-a257-4c0f-8f7d-2a7708effd72"],
-Cell[126818, 2923, 708, 14, 24, "Print",ExpressionUUID->"eb2e5b42-6b67-4bee-9d03-6297444b37df"],
-Cell[127529, 2939, 708, 14, 24, "Print",ExpressionUUID->"9479db8b-bed9-4999-b0a2-f611ec981434"],
-Cell[128240, 2955, 708, 14, 24, "Print",ExpressionUUID->"b2b4b8d3-0c1e-4f01-b4e1-9f8d4888f1f9"],
-Cell[128951, 2971, 708, 14, 24, "Print",ExpressionUUID->"bfd7b7fc-ddd6-4c98-b85a-afe99550dcd8"],
-Cell[129662, 2987, 708, 14, 24, "Print",ExpressionUUID->"f65f890b-a2b3-478a-a41f-2a2ab6a36dd9"],
-Cell[130373, 3003, 708, 14, 24, "Print",ExpressionUUID->"2fa135ac-d07b-4762-8e3e-72c973043264"],
-Cell[131084, 3019, 706, 14, 24, "Print",ExpressionUUID->"7a4b70af-152c-4028-9177-c438cac1c28a"],
-Cell[131793, 3035, 706, 14, 24, "Print",ExpressionUUID->"070744de-756e-44d3-a761-6f273f4a51a8"],
-Cell[132502, 3051, 708, 14, 24, "Print",ExpressionUUID->"bd9282c9-8dff-4150-bb3e-ab03ceff4843"],
-Cell[133213, 3067, 708, 14, 24, "Print",ExpressionUUID->"5f0c244f-83c9-42bc-9cdf-4681a432eb66"],
-Cell[133924, 3083, 704, 14, 24, "Print",ExpressionUUID->"934c229e-c880-4a18-a0cc-6915bcd77dbd"],
-Cell[134631, 3099, 706, 14, 24, "Print",ExpressionUUID->"3af3ef11-45c3-47d7-ba3c-f7e1196cbd06"],
-Cell[135340, 3115, 706, 14, 24, "Print",ExpressionUUID->"a695f8ea-4a25-42f5-8049-f50aab1c91f8"],
-Cell[136049, 3131, 705, 14, 24, "Print",ExpressionUUID->"e5f14438-21d3-4256-a45a-ba4d0e2475fd"],
-Cell[136757, 3147, 706, 14, 24, "Print",ExpressionUUID->"3ca6f5e9-8088-4ef8-9565-6f00950e169d"],
-Cell[137466, 3163, 706, 14, 24, "Print",ExpressionUUID->"40016308-b295-43fd-b73b-eb10d60e526c"],
-Cell[138175, 3179, 706, 14, 24, "Print",ExpressionUUID->"52270d11-e7f1-4cb0-9477-4f6b13dcfbe3"],
-Cell[138884, 3195, 706, 14, 24, "Print",ExpressionUUID->"93f68d45-2e35-4520-997b-b246dce55175"],
-Cell[139593, 3211, 706, 14, 24, "Print",ExpressionUUID->"c056b2a9-fd44-4dbc-83ff-02319cd2bb81"],
-Cell[140302, 3227, 706, 14, 24, "Print",ExpressionUUID->"0484003e-b769-4e0a-b9f2-023718613678"],
-Cell[141011, 3243, 706, 14, 24, "Print",ExpressionUUID->"f7694f52-483d-47ca-9a9c-2d29e1be4a1a"],
-Cell[141720, 3259, 708, 14, 24, "Print",ExpressionUUID->"5491bd89-04c4-4ab1-8d42-b9f86dfcccf5"],
-Cell[142431, 3275, 706, 14, 24, "Print",ExpressionUUID->"e3d47759-a76b-493b-b7b7-406f4f2f661a"],
-Cell[143140, 3291, 706, 14, 24, "Print",ExpressionUUID->"1dc0a80f-a258-4824-97f7-55e014f27f05"],
-Cell[143849, 3307, 706, 14, 24, "Print",ExpressionUUID->"9aa452cd-c692-4d0c-98e0-5561434ee079"],
-Cell[144558, 3323, 705, 14, 24, "Print",ExpressionUUID->"1ae56867-c22a-4d40-a4c7-8f4f2c96bd9b"],
-Cell[145266, 3339, 708, 14, 24, "Print",ExpressionUUID->"9fb10030-d969-40ad-82a2-256abe2e0b48"],
-Cell[145977, 3355, 706, 14, 24, "Print",ExpressionUUID->"5d498866-1f80-4ae4-8c18-79ee316aa7ae"],
-Cell[146686, 3371, 706, 14, 24, "Print",ExpressionUUID->"75a9a327-94f7-42ac-8fd8-a3532197a8ed"],
-Cell[147395, 3387, 706, 14, 24, "Print",ExpressionUUID->"f15ae6da-b875-468d-a5a4-70eb30f89411"],
-Cell[148104, 3403, 706, 14, 24, "Print",ExpressionUUID->"a8032f62-3537-40b5-8fd4-b2b43296c70e"],
-Cell[148813, 3419, 706, 14, 24, "Print",ExpressionUUID->"a7442eb7-6895-44b8-bf2f-c557f379e112"],
-Cell[149522, 3435, 706, 14, 24, "Print",ExpressionUUID->"f8cf99ac-69ce-4459-aef4-aeb5b7769804"],
-Cell[150231, 3451, 706, 14, 24, "Print",ExpressionUUID->"6e926e95-7c35-45f3-a6ef-248b5d2c1b45"],
-Cell[150940, 3467, 706, 14, 24, "Print",ExpressionUUID->"cbb5a256-574b-420b-9d67-37d01f2029dc"],
-Cell[151649, 3483, 706, 14, 24, "Print",ExpressionUUID->"d5cba22a-4b61-4759-91fd-1b489e929e7e"],
-Cell[152358, 3499, 706, 14, 24, "Print",ExpressionUUID->"af15ff1d-fb6f-4cb9-b835-7aa8f1e0ff94"],
-Cell[153067, 3515, 705, 14, 24, "Print",ExpressionUUID->"6dbc6781-a72b-4415-9500-ac64eba8bc6f"],
-Cell[153775, 3531, 706, 14, 24, "Print",ExpressionUUID->"bdab83d5-7708-4f9d-a247-8abafc9daa2c"],
-Cell[154484, 3547, 706, 14, 24, "Print",ExpressionUUID->"6d662308-4dea-462b-aec5-2858eda9d0d0"],
-Cell[155193, 3563, 705, 14, 24, "Print",ExpressionUUID->"ea472cc6-5c19-4593-b9be-b891ac0c349f"],
-Cell[155901, 3579, 708, 14, 24, "Print",ExpressionUUID->"c2e88cfc-e32e-484e-b6fc-b1280abe2ae9"],
-Cell[156612, 3595, 706, 14, 24, "Print",ExpressionUUID->"c6ea5351-3123-4c4c-9912-9aa740cd0926"],
-Cell[157321, 3611, 705, 14, 24, "Print",ExpressionUUID->"c60e3104-675e-435a-8b92-4bdc25d5251d"],
-Cell[158029, 3627, 706, 14, 24, "Print",ExpressionUUID->"44b5e9b5-bdcf-4a21-9cf2-7bae47ac03a8"],
-Cell[158738, 3643, 708, 14, 24, "Print",ExpressionUUID->"7b3cbad6-e6e8-42c9-8f3e-e75a9fc367c7"],
-Cell[159449, 3659, 706, 14, 24, "Print",ExpressionUUID->"d24273b0-e926-455b-a686-15a6cddd7ca7"],
-Cell[160158, 3675, 705, 14, 24, "Print",ExpressionUUID->"5fbe935f-33b6-4822-b139-c985ce37c32e"],
-Cell[160866, 3691, 706, 14, 24, "Print",ExpressionUUID->"03cb2be8-cbb9-4dc9-959c-0aa8275f461a"],
-Cell[161575, 3707, 708, 14, 24, "Print",ExpressionUUID->"28de003a-89ce-4d88-bded-a403b66fa740"],
-Cell[162286, 3723, 706, 14, 24, "Print",ExpressionUUID->"717f0702-9b20-43de-8181-4f3594a4af72"],
-Cell[162995, 3739, 708, 14, 24, "Print",ExpressionUUID->"5d6faffd-e3be-4552-8ce8-451fc4206e93"],
-Cell[163706, 3755, 708, 14, 24, "Print",ExpressionUUID->"e92479df-1847-4bc2-89f0-e76719dfdb4e"],
-Cell[164417, 3771, 706, 14, 24, "Print",ExpressionUUID->"02e16459-2910-493c-81d5-ff7609efc8cf"],
-Cell[165126, 3787, 706, 14, 24, "Print",ExpressionUUID->"49bdc29e-24a6-44cb-82cb-c6987d651c9a"],
-Cell[165835, 3803, 708, 14, 24, "Print",ExpressionUUID->"657a193e-bf30-4837-a98f-93ec87278966"],
-Cell[166546, 3819, 708, 14, 24, "Print",ExpressionUUID->"d65e06ce-12bd-49aa-9268-e927ffd39624"],
-Cell[167257, 3835, 708, 14, 24, "Print",ExpressionUUID->"e60f69fd-dc82-4fe9-b3e9-5da7ed4bd81f"],
-Cell[167968, 3851, 706, 14, 24, "Print",ExpressionUUID->"abd020c0-2f09-4da0-a5c4-3b1410fa7c1f"],
-Cell[168677, 3867, 706, 14, 24, "Print",ExpressionUUID->"35210ebf-f11b-463b-9955-ceb504bb5380"],
-Cell[169386, 3883, 705, 14, 24, "Print",ExpressionUUID->"fbbe5d68-cf33-4d4a-8477-20df22f40c57"],
-Cell[170094, 3899, 706, 14, 24, "Print",ExpressionUUID->"bfdeea03-f77c-4eb4-8974-d5a8dc44336c"],
-Cell[170803, 3915, 706, 14, 24, "Print",ExpressionUUID->"2d058288-605b-463d-a326-face30c5d842"],
-Cell[171512, 3931, 706, 14, 24, "Print",ExpressionUUID->"dcc911bc-e0ff-4f04-94a6-fc674c4b2f7a"],
-Cell[172221, 3947, 456, 8, 24, "Print",ExpressionUUID->"a8a99339-540d-4cd2-bbf2-c2817bb4c38a"],
-Cell[172680, 3957, 651, 13, 24, "Print",ExpressionUUID->"340bda09-673e-40f8-92f4-bd7edff6b682"],
-Cell[173334, 3972, 636, 13, 24, "Print",ExpressionUUID->"dca8b00e-c973-43ca-8440-1bc0b10f6278"],
-Cell[173973, 3987, 809, 17, 24, "Print",ExpressionUUID->"5f08b2ea-80c1-47ea-a418-303b6947d69d"],
-Cell[174785, 4006, 809, 17, 24, "Print",ExpressionUUID->"65adca7f-247d-4014-96b8-cac989d11daa"],
-Cell[175597, 4025, 809, 17, 24, "Print",ExpressionUUID->"051966fc-ddbb-473f-8ec0-ab9810d6bce4"],
-Cell[176409, 4044, 809, 17, 24, "Print",ExpressionUUID->"4da5bae5-9914-4784-b237-13eb79ea0d2b"],
-Cell[177221, 4063, 813, 17, 24, "Print",ExpressionUUID->"9bcf9a0b-2c84-4b17-b151-1f380ea44eff"],
-Cell[178037, 4082, 813, 17, 24, "Print",ExpressionUUID->"3a8508b6-558d-46d0-b98d-14e003be7461"],
-Cell[178853, 4101, 815, 17, 24, "Print",ExpressionUUID->"8e16e312-278d-4b02-b7c4-e3817d460883"],
-Cell[179671, 4120, 813, 17, 24, "Print",ExpressionUUID->"02b373c1-b1f3-4c95-8a7e-77c9737544d5"],
-Cell[180487, 4139, 813, 17, 24, "Print",ExpressionUUID->"18e0ed55-ad1e-4541-87f2-53e2f941c811"],
-Cell[181303, 4158, 815, 17, 24, "Print",ExpressionUUID->"264bf818-c35d-4e35-bb43-2a44bb2edc43"],
-Cell[182121, 4177, 817, 17, 24, "Print",ExpressionUUID->"3441da39-4660-4eba-8342-80e797f6e037"],
-Cell[182941, 4196, 817, 17, 24, "Print",ExpressionUUID->"6d053d32-9faa-4d8b-9f9e-e841e3fa7dee"],
-Cell[183761, 4215, 814, 17, 24, "Print",ExpressionUUID->"2ed06bc0-d078-4855-a909-c65785f48883"],
-Cell[184578, 4234, 817, 17, 24, "Print",ExpressionUUID->"4db98e93-f517-4331-813a-aabe3a18d90c"],
-Cell[185398, 4253, 815, 17, 24, "Print",ExpressionUUID->"7607fb7d-4bb2-41a0-b41f-46ab3e64fad1"],
-Cell[186216, 4272, 815, 17, 24, "Print",ExpressionUUID->"c6e98243-9cd9-4c57-bd5e-9fbe7774c786"],
-Cell[187034, 4291, 817, 17, 24, "Print",ExpressionUUID->"df7deda7-9e26-4ad4-8814-ccec0ddc759e"],
-Cell[187854, 4310, 815, 17, 24, "Print",ExpressionUUID->"8da0c6e9-cf2b-4907-a632-e6afa667895e"],
-Cell[188672, 4329, 817, 17, 24, "Print",ExpressionUUID->"8a38a511-6c70-47c7-af42-0778df813d41"],
-Cell[189492, 4348, 187439, 3576, 296, "Print",ExpressionUUID->"a6d4b13b-2ea2-4abd-bdbe-bbcfd86d1d94"],
-Cell[376934, 7926, 183503, 3563, 296, "Print",ExpressionUUID->"ceb94f80-e404-4608-9818-2110ca148fe7"],
-Cell[560440, 11491, 199802, 3829, 296, "Print",ExpressionUUID->"4cc094b6-dc31-491d-b145-cc815a4a3f99"],
-Cell[760245, 15322, 192183, 3704, 296, "Print",ExpressionUUID->"71fca5b7-10ec-4ab3-8564-8043b70d6aec"],
-Cell[952431, 19028, 38821, 781, 296, "Print",ExpressionUUID->"f683d9ea-9b41-41a0-b548-8b188cbfdf3d"],
-Cell[991255, 19811, 808, 17, 24, "Print",ExpressionUUID->"24729b15-801d-4c09-8851-e767fabc60e3"],
-Cell[992066, 19830, 809, 17, 24, "Print",ExpressionUUID->"58c54744-e36f-4730-a5d2-13e1ab41dd8d"],
-Cell[992878, 19849, 809, 17, 24, "Print",ExpressionUUID->"d20d12fe-ff50-41aa-9b20-05a73842a41f"],
-Cell[993690, 19868, 808, 17, 24, "Print",ExpressionUUID->"43452bfa-6ee0-4d96-b6b3-d6f0aec7fb87"],
-Cell[994501, 19887, 813, 17, 24, "Print",ExpressionUUID->"beb9cb77-5e63-4d43-aa72-cd27fe63f5eb"],
-Cell[995317, 19906, 813, 17, 24, "Print",ExpressionUUID->"d77ff665-8153-453c-ade7-4b634a4f8603"],
-Cell[996133, 19925, 813, 17, 24, "Print",ExpressionUUID->"cacc93ae-93d8-4144-b39f-8a6afd4360b8"],
-Cell[996949, 19944, 813, 17, 24, "Print",ExpressionUUID->"71d2e0e3-d885-417e-af66-b87957fdc681"],
-Cell[997765, 19963, 812, 17, 24, "Print",ExpressionUUID->"9faa5949-b109-4817-85ee-562675e0fc33"],
-Cell[998580, 19982, 817, 17, 24, "Print",ExpressionUUID->"c3660ab6-db37-4c0a-8272-0c9a4aa9c3bf"],
-Cell[999400, 20001, 815, 17, 24, "Print",ExpressionUUID->"1ec06353-374b-4cd1-bd0a-e0e4cad8b352"],
-Cell[1000218, 20020, 817, 17, 24, "Print",ExpressionUUID->"c8d87ec7-6afe-48f4-b427-5936b95c9f1c"],
-Cell[1001038, 20039, 817, 17, 24, "Print",ExpressionUUID->"fe47bd76-6996-4613-9513-5c8e0f903ca1"],
-Cell[1001858, 20058, 817, 17, 24, "Print",ExpressionUUID->"a86165d0-b36d-4b8a-b123-57089e78f9b7"],
-Cell[1002678, 20077, 815, 17, 24, "Print",ExpressionUUID->"926de8ce-b5ff-409a-b7b0-2cbf4d9df240"],
-Cell[1003496, 20096, 817, 17, 24, "Print",ExpressionUUID->"c2a8a7a1-b80f-45ea-b00d-de38911bf13d"],
-Cell[1004316, 20115, 817, 17, 24, "Print",ExpressionUUID->"29d03a2c-98e0-44b5-89ef-5ae512f3d3af"],
-Cell[1005136, 20134, 815, 17, 24, "Print",ExpressionUUID->"8625bf56-c3ff-4b71-8f0c-7af075cd8aa2"],
-Cell[1005954, 20153, 815, 17, 24, "Print",ExpressionUUID->"4b6cce55-9ea4-4bab-aaae-453d21acde60"],
-Cell[1006772, 20172, 461, 8, 24, "Print",ExpressionUUID->"4ae0ba4c-4792-411b-b605-8dcb20a90a75"],
-Cell[1007236, 20182, 456, 8, 24, "Print",ExpressionUUID->"f940fd30-6fcf-4045-860b-84efdd7b7988"],
-Cell[1007695, 20192, 716, 15, 24, "Print",ExpressionUUID->"45f66351-27fc-48e6-abde-fd3de460ab0c"],
-Cell[1008414, 20209, 456, 8, 24, "Print",ExpressionUUID->"dd3d69cd-d368-47ae-905c-a6aec371b33e"],
-Cell[1008873, 20219, 653, 13, 24, "Print",ExpressionUUID->"910b546e-33db-445e-be47-4a967519343c"],
-Cell[1009529, 20234, 702, 14, 24, "Print",ExpressionUUID->"0699f93a-ef22-4beb-ace2-0f6272848634"],
-Cell[1010234, 20250, 700, 14, 24, "Print",ExpressionUUID->"91070665-0d39-44d8-8887-7465f62f0acb"],
-Cell[1010937, 20266, 702, 14, 24, "Print",ExpressionUUID->"9103160b-860d-4dc4-a8ab-de6b8f5f3f23"],
-Cell[1011642, 20282, 702, 14, 24, "Print",ExpressionUUID->"ad2c179f-9523-4073-9bba-dde5995c92a6"],
-Cell[1012347, 20298, 704, 14, 24, "Print",ExpressionUUID->"fa86ff2c-edcd-4e07-81af-7e525ca7609c"],
-Cell[1013054, 20314, 702, 14, 24, "Print",ExpressionUUID->"5c1208ac-8140-4d40-854e-6c7ba8d31ff6"],
-Cell[1013759, 20330, 704, 14, 24, "Print",ExpressionUUID->"269b8a4e-b953-45dd-a1c1-5ba55829ed1d"],
-Cell[1014466, 20346, 704, 14, 24, "Print",ExpressionUUID->"8af52ff9-98d0-4e33-8e48-16f2f8b68989"],
-Cell[1015173, 20362, 702, 14, 24, "Print",ExpressionUUID->"c389ad70-e2ca-47af-8107-3019f9bdb225"],
-Cell[1015878, 20378, 706, 14, 24, "Print",ExpressionUUID->"ad3962db-63d5-4c2d-b267-bfb5b8ea165c"],
-Cell[1016587, 20394, 706, 14, 24, "Print",ExpressionUUID->"a4f8efcd-193d-4c1a-9146-a01e62b7c729"],
-Cell[1017296, 20410, 706, 14, 24, "Print",ExpressionUUID->"164466b9-cdef-4b82-bf44-cd81a18f9f4c"],
-Cell[1018005, 20426, 704, 14, 24, "Print",ExpressionUUID->"8dd92bc0-d8fa-47c1-b36b-5dcff37b0616"],
-Cell[1018712, 20442, 704, 14, 24, "Print",ExpressionUUID->"d3670dba-c27f-442d-a68c-11b59829419f"],
-Cell[1019419, 20458, 704, 14, 24, "Print",ExpressionUUID->"83d4e35c-2265-4e38-9575-6d41f0959a5a"],
-Cell[1020126, 20474, 704, 14, 24, "Print",ExpressionUUID->"81060a04-8a6c-4d5c-b113-c4423cfb137e"],
-Cell[1020833, 20490, 704, 14, 24, "Print",ExpressionUUID->"840fe47d-b9bd-4d0e-8a93-ee2eebbcb3eb"],
-Cell[1021540, 20506, 703, 14, 24, "Print",ExpressionUUID->"f5ba6292-f9a6-4ab2-b8e3-15dac0f47521"],
-Cell[1022246, 20522, 704, 14, 24, "Print",ExpressionUUID->"83e0ca17-c3dd-4e2a-a17f-0775f423ff8c"],
-Cell[1022953, 20538, 704, 14, 24, "Print",ExpressionUUID->"fe25e4b1-3d15-4fae-be00-f74c627483f8"],
-Cell[1023660, 20554, 706, 14, 24, "Print",ExpressionUUID->"290a79d6-a539-443f-b994-3e093b4b4b60"],
-Cell[1024369, 20570, 704, 14, 24, "Print",ExpressionUUID->"8d8c2b1d-6efd-4e43-841d-7e1ba0e63283"],
-Cell[1025076, 20586, 704, 14, 24, "Print",ExpressionUUID->"a04c7428-86d6-4c07-96a6-d66bea628512"],
-Cell[1025783, 20602, 704, 14, 24, "Print",ExpressionUUID->"eb46821f-3657-4a0f-9b32-71a2dcc6af9f"],
-Cell[1026490, 20618, 704, 14, 24, "Print",ExpressionUUID->"141c3fc7-c8ec-489c-ac34-d222aa3f7a43"],
-Cell[1027197, 20634, 704, 14, 24, "Print",ExpressionUUID->"a3db8d57-5e0a-421a-b9f9-a91573e46dfb"],
-Cell[1027904, 20650, 704, 14, 24, "Print",ExpressionUUID->"4b71c102-1bad-467c-8be5-2a89540bef7a"],
-Cell[1028611, 20666, 704, 14, 24, "Print",ExpressionUUID->"9485844a-0638-4ec3-aa4f-9d314da0b380"],
-Cell[1029318, 20682, 704, 14, 24, "Print",ExpressionUUID->"0056ad2e-0df3-4286-a75d-1a2b50d940ca"],
-Cell[1030025, 20698, 704, 14, 24, "Print",ExpressionUUID->"ea548d0f-9c17-40cd-a617-d6c68deb5230"],
-Cell[1030732, 20714, 706, 14, 24, "Print",ExpressionUUID->"c5473057-5663-481e-92f1-92f5c45f7617"],
-Cell[1031441, 20730, 704, 14, 24, "Print",ExpressionUUID->"a8cfdc83-5127-4975-bc15-47d94f211de4"],
-Cell[1032148, 20746, 703, 14, 24, "Print",ExpressionUUID->"87579733-1397-4c08-b7fb-81cdc0b01dd4"],
-Cell[1032854, 20762, 704, 14, 24, "Print",ExpressionUUID->"d4c9eb29-394c-445e-8564-a883ce0a48fd"],
-Cell[1033561, 20778, 704, 14, 24, "Print",ExpressionUUID->"58b65e5c-693e-40ec-944c-53013b92e7b7"],
-Cell[1034268, 20794, 706, 14, 24, "Print",ExpressionUUID->"e312d50b-8dbc-43c1-9831-125bd6219ced"],
-Cell[1034977, 20810, 704, 14, 24, "Print",ExpressionUUID->"d0df5269-09e0-47b7-93c1-0022923f7658"],
-Cell[1035684, 20826, 704, 14, 24, "Print",ExpressionUUID->"a6673923-7ece-46ce-9165-1ee9c3ef12be"],
-Cell[1036391, 20842, 704, 14, 24, "Print",ExpressionUUID->"bd250cb4-6dfa-4f51-ae00-95a2dfb56f97"],
-Cell[1037098, 20858, 704, 14, 24, "Print",ExpressionUUID->"1aa798be-3fe9-4a56-acda-7aa491bf3ae4"],
-Cell[1037805, 20874, 704, 14, 24, "Print",ExpressionUUID->"018301fd-b3bc-408f-8af3-cb946acafce8"],
-Cell[1038512, 20890, 704, 14, 24, "Print",ExpressionUUID->"ec4d984e-1885-4684-8718-1a94498069df"],
-Cell[1039219, 20906, 706, 14, 24, "Print",ExpressionUUID->"42fe32ed-3f4b-40f5-a023-21cf7dd580d1"],
-Cell[1039928, 20922, 704, 14, 24, "Print",ExpressionUUID->"0a7bfbab-db69-404b-86a8-eea16aac6e86"],
-Cell[1040635, 20938, 704, 14, 24, "Print",ExpressionUUID->"a572586c-b7f0-4581-80b6-6c57b0829a49"],
-Cell[1041342, 20954, 704, 14, 24, "Print",ExpressionUUID->"828a0590-4794-44cd-8979-f53aac63e384"],
-Cell[1042049, 20970, 706, 14, 24, "Print",ExpressionUUID->"b075dfda-0aef-4971-a71b-1885857a0fe8"],
-Cell[1042758, 20986, 704, 14, 24, "Print",ExpressionUUID->"af52b51e-1b15-4d58-a82a-47de33cb8d16"],
-Cell[1043465, 21002, 704, 14, 24, "Print",ExpressionUUID->"fc468b4e-4e2e-4fef-a058-e68e2d70295f"],
-Cell[1044172, 21018, 704, 14, 24, "Print",ExpressionUUID->"938812fc-c6c0-46db-b3e2-d84cfe7c8350"],
-Cell[1044879, 21034, 706, 14, 24, "Print",ExpressionUUID->"80eda4bc-c63d-4e02-83ca-1f37390f8046"],
-Cell[1045588, 21050, 704, 14, 24, "Print",ExpressionUUID->"00a8e785-7b7e-4203-a35b-fa9bc9dc16f0"],
-Cell[1046295, 21066, 704, 14, 24, "Print",ExpressionUUID->"02e3c014-d706-46a7-8dfa-def553bbb30e"],
-Cell[1047002, 21082, 704, 14, 24, "Print",ExpressionUUID->"56f6dc36-6e67-4cfb-812c-e9a6411aa010"],
-Cell[1047709, 21098, 704, 14, 24, "Print",ExpressionUUID->"f99742bc-f742-4619-a41a-6badc3b66bfe"],
-Cell[1048416, 21114, 703, 14, 24, "Print",ExpressionUUID->"1e0a8c72-215f-4be3-9215-f1176c631ac6"],
-Cell[1049122, 21130, 704, 14, 24, "Print",ExpressionUUID->"2a6fa490-f5bc-4b92-b8e6-da20728c3b75"],
-Cell[1049829, 21146, 704, 14, 24, "Print",ExpressionUUID->"a47b356d-fe34-41bc-8c20-464fbf795cc2"],
-Cell[1050536, 21162, 706, 14, 24, "Print",ExpressionUUID->"8c8110cd-121d-4b34-a4b6-bfce3abf4741"],
-Cell[1051245, 21178, 706, 14, 24, "Print",ExpressionUUID->"e3c6c2ea-4906-41c0-a904-388a2798d946"],
-Cell[1051954, 21194, 704, 14, 24, "Print",ExpressionUUID->"ffd566e8-87a3-4ac1-96b4-a3ac40d97300"],
-Cell[1052661, 21210, 704, 14, 24, "Print",ExpressionUUID->"da0e36e0-fe06-4fe2-bf2d-1583170b776b"],
-Cell[1053368, 21226, 706, 14, 24, "Print",ExpressionUUID->"7c6a079b-2772-451d-839a-bd6025654ce3"],
-Cell[1054077, 21242, 704, 14, 24, "Print",ExpressionUUID->"6ef11fdb-c42a-48a2-a9fd-30581bb0135c"],
-Cell[1054784, 21258, 704, 14, 24, "Print",ExpressionUUID->"e8bdc5aa-fcb0-455f-ac4f-da1ecc7bd06d"],
-Cell[1055491, 21274, 706, 14, 24, "Print",ExpressionUUID->"28830cee-f597-4309-b1c8-44ad58d26b06"],
-Cell[1056200, 21290, 704, 14, 24, "Print",ExpressionUUID->"d0f5e4c0-6caa-4b60-afc5-ee641043674b"],
-Cell[1056907, 21306, 704, 14, 24, "Print",ExpressionUUID->"d40fe467-a455-47b3-81c1-f35298ff7239"],
-Cell[1057614, 21322, 704, 14, 24, "Print",ExpressionUUID->"7f17794c-4ce1-4c6e-99d7-c34ac59e878d"],
-Cell[1058321, 21338, 704, 14, 24, "Print",ExpressionUUID->"a919ed37-0136-4f92-bb00-a41c11c17f81"],
-Cell[1059028, 21354, 704, 14, 24, "Print",ExpressionUUID->"225b8577-8b5c-4d92-8407-af51996af86b"],
-Cell[1059735, 21370, 704, 14, 24, "Print",ExpressionUUID->"85243e84-572c-4956-80e3-8d4a5cfeaaf5"],
-Cell[1060442, 21386, 706, 14, 24, "Print",ExpressionUUID->"69978ae1-82d6-4374-8149-107b7b33bde9"],
-Cell[1061151, 21402, 704, 14, 24, "Print",ExpressionUUID->"8f07521e-312b-4616-9d8f-4bfbd044f5c2"],
-Cell[1061858, 21418, 704, 14, 24, "Print",ExpressionUUID->"3c8042b4-48c2-4888-8d6b-db64f0bf3600"],
-Cell[1062565, 21434, 706, 14, 24, "Print",ExpressionUUID->"ee106704-715a-4dc9-9b5b-fb9566b090e2"],
-Cell[1063274, 21450, 706, 14, 24, "Print",ExpressionUUID->"63ecc48a-66f9-4cd8-953a-302a0b3c5fee"],
-Cell[1063983, 21466, 706, 14, 24, "Print",ExpressionUUID->"79150836-ee63-4592-ac5f-14e1e5184a04"],
-Cell[1064692, 21482, 704, 14, 24, "Print",ExpressionUUID->"e0dca234-4e8d-4cd3-8e41-7227cf72d047"],
-Cell[1065399, 21498, 706, 14, 24, "Print",ExpressionUUID->"786dd580-d0c3-4065-824a-6622c6d95ab7"],
-Cell[1066108, 21514, 704, 14, 24, "Print",ExpressionUUID->"334f3904-09bb-46e2-8d2e-9eafb259c63f"],
-Cell[1066815, 21530, 703, 14, 24, "Print",ExpressionUUID->"43961b27-1792-40c6-9e9c-dcd266fb6954"],
-Cell[1067521, 21546, 704, 14, 24, "Print",ExpressionUUID->"13d4933f-135a-4c42-9d81-897d52cb83f7"],
-Cell[1068228, 21562, 704, 14, 24, "Print",ExpressionUUID->"d3224dbb-5aa8-406d-8246-153b270bd5b8"],
-Cell[1068935, 21578, 704, 14, 24, "Print",ExpressionUUID->"a959aa24-3acb-4011-8e46-624e006fe698"],
-Cell[1069642, 21594, 704, 14, 24, "Print",ExpressionUUID->"d2cbfcba-a45f-4059-a491-1690f77a1f3e"],
-Cell[1070349, 21610, 704, 14, 24, "Print",ExpressionUUID->"ea27fc3b-8039-4120-ae1b-0b7364c9cb8d"],
-Cell[1071056, 21626, 704, 14, 24, "Print",ExpressionUUID->"f7bcf321-f004-401a-9848-4f681b4e1f3e"],
-Cell[1071763, 21642, 703, 14, 24, "Print",ExpressionUUID->"c3f0f460-c5cd-4060-9df4-c7fb468f13ff"],
-Cell[1072469, 21658, 706, 14, 24, "Print",ExpressionUUID->"a16a1fa1-09a9-4f0f-91f3-d64828a40020"],
-Cell[1073178, 21674, 704, 14, 24, "Print",ExpressionUUID->"53011f8d-55cd-4da5-8996-7b73e8134185"],
-Cell[1073885, 21690, 704, 14, 24, "Print",ExpressionUUID->"ecba514a-9661-4c02-8662-5c75ac37d287"],
-Cell[1074592, 21706, 706, 14, 24, "Print",ExpressionUUID->"6b903945-5288-4ba0-8af3-477f08c8afce"],
-Cell[1075301, 21722, 704, 14, 24, "Print",ExpressionUUID->"99a06e0f-d344-4f2f-bf20-db34a7d27a90"],
-Cell[1076008, 21738, 704, 14, 24, "Print",ExpressionUUID->"6b0e9ff1-7a42-4b85-89d3-1de8876b585d"],
-Cell[1076715, 21754, 704, 14, 24, "Print",ExpressionUUID->"1a97c2a7-47cc-4487-83e7-dd696448241a"],
-Cell[1077422, 21770, 704, 14, 24, "Print",ExpressionUUID->"5df778f9-b3d1-41db-b2fa-e60232b1b5ea"],
-Cell[1078129, 21786, 703, 14, 24, "Print",ExpressionUUID->"5eca3a51-ce6c-40ec-8214-dae46f7cb7e2"],
-Cell[1078835, 21802, 703, 14, 24, "Print",ExpressionUUID->"9e7493b8-5dc9-48bf-9a48-c25f1aca3a6b"],
-Cell[1079541, 21818, 706, 14, 24, "Print",ExpressionUUID->"19d7a8d4-718d-4af7-bd9b-701a4cc6e1db"],
-Cell[1080250, 21834, 706, 14, 24, "Print",ExpressionUUID->"b5ac976a-7892-4e1a-92b4-e2522751eba5"],
-Cell[1080959, 21850, 706, 14, 24, "Print",ExpressionUUID->"4a149592-d4b0-4edc-a43e-dbc56f303a65"],
-Cell[1081668, 21866, 706, 14, 24, "Print",ExpressionUUID->"086cc1d3-e29a-46b3-910e-d7654b949b56"],
-Cell[1082377, 21882, 706, 14, 24, "Print",ExpressionUUID->"a8f24123-6157-4af7-b6e7-1fda7b0eba7f"],
-Cell[1083086, 21898, 708, 14, 24, "Print",ExpressionUUID->"3fc83439-56ef-4521-824a-a7c30400e8ff"],
-Cell[1083797, 21914, 706, 14, 24, "Print",ExpressionUUID->"e5b66a26-df0c-4d7a-83b3-a06b7834c766"],
-Cell[1084506, 21930, 706, 14, 24, "Print",ExpressionUUID->"db16eada-181b-4dcb-b837-44868a892b47"],
-Cell[1085215, 21946, 708, 14, 24, "Print",ExpressionUUID->"54b7c288-5948-492b-ab77-2fdc88579d47"],
-Cell[1085926, 21962, 706, 14, 24, "Print",ExpressionUUID->"d957cf13-60dd-4b15-b496-fe720a5296d6"],
-Cell[1086635, 21978, 706, 14, 24, "Print",ExpressionUUID->"87fe6c96-558f-4e6d-8070-121e2f4627c6"],
-Cell[1087344, 21994, 705, 14, 24, "Print",ExpressionUUID->"225e148f-090f-418b-baf5-b9e3415bd6c1"],
-Cell[1088052, 22010, 708, 14, 24, "Print",ExpressionUUID->"40ac4566-c5f3-427e-88ef-c84155c8e71f"],
-Cell[1088763, 22026, 708, 14, 24, "Print",ExpressionUUID->"86b4db70-8bea-494b-8cb2-82fad55082ae"],
-Cell[1089474, 22042, 706, 14, 24, "Print",ExpressionUUID->"bc480597-8cc9-4117-ad43-698d6e206e4c"],
-Cell[1090183, 22058, 706, 14, 24, "Print",ExpressionUUID->"9dca0283-540d-48c2-89d5-fd1f6c05be7c"],
-Cell[1090892, 22074, 706, 14, 24, "Print",ExpressionUUID->"ad3de335-fcd8-4f3e-9b83-3251295e47a4"],
-Cell[1091601, 22090, 706, 14, 24, "Print",ExpressionUUID->"e5589581-3c76-40bb-8a68-f0d8f8b86280"],
-Cell[1092310, 22106, 708, 14, 24, "Print",ExpressionUUID->"83f83b00-654c-4042-a013-65c1fa243363"],
-Cell[1093021, 22122, 705, 14, 24, "Print",ExpressionUUID->"56c50c91-b26b-4f6a-bbcf-470646cc2f19"],
-Cell[1093729, 22138, 708, 14, 24, "Print",ExpressionUUID->"5fc1a0ab-70f9-4558-97ad-f0f2ef607587"],
-Cell[1094440, 22154, 456, 8, 24, "Print",ExpressionUUID->"2320b4e4-415b-4f4c-a32d-7dcfa9f8b9d8"],
-Cell[1094899, 22164, 651, 13, 24, "Print",ExpressionUUID->"f6718d76-92ef-4f51-bbed-860fa4ad3563"],
-Cell[1095553, 22179, 638, 13, 24, "Print",ExpressionUUID->"f0916e78-eeca-4ec6-9510-5af25c8d9d54"],
-Cell[1096194, 22194, 813, 17, 24, "Print",ExpressionUUID->"3c1a5d98-e3e6-481c-b223-3e8fae697c98"],
-Cell[1097010, 22213, 813, 17, 24, "Print",ExpressionUUID->"26c1d369-54a9-43da-842f-a163a89ba6df"],
-Cell[1097826, 22232, 815, 17, 24, "Print",ExpressionUUID->"54b3b7fb-9cfc-4ce3-82ae-14b8453942a6"],
-Cell[1098644, 22251, 815, 17, 24, "Print",ExpressionUUID->"481ad3d9-f95f-49d5-8e49-e560e19617e8"],
-Cell[1099462, 22270, 813, 17, 24, "Print",ExpressionUUID->"d02f8842-702b-4b66-abc6-be31ba522c17"],
-Cell[1100278, 22289, 813, 17, 24, "Print",ExpressionUUID->"3008692a-6fde-41ca-b836-9eee069125b8"],
-Cell[1101094, 22308, 813, 17, 24, "Print",ExpressionUUID->"cd432e25-5d22-49ad-a5fc-6ecfb2b9b963"],
-Cell[1101910, 22327, 815, 17, 24, "Print",ExpressionUUID->"b36f4246-10ab-4209-b6b3-b9fd832f18c4"],
-Cell[1102728, 22346, 813, 17, 24, "Print",ExpressionUUID->"4a5544fd-eba3-4580-906f-8a22021675c5"],
-Cell[1103544, 22365, 817, 17, 24, "Print",ExpressionUUID->"0abf9554-756b-42a6-940e-52822bb425f7"],
-Cell[1104364, 22384, 815, 17, 24, "Print",ExpressionUUID->"12bf3772-2727-4439-9e1e-dfc3c4d0ced3"],
-Cell[1105182, 22403, 815, 17, 24, "Print",ExpressionUUID->"f2711a32-dea9-4eca-a459-1659aa82071e"],
-Cell[1106000, 22422, 815, 17, 24, "Print",ExpressionUUID->"7d6ffa14-56ee-418f-965a-b04886153a15"],
-Cell[1106818, 22441, 815, 17, 24, "Print",ExpressionUUID->"ddfc3d1a-46bb-47f2-bd16-7d39d1903679"],
-Cell[1107636, 22460, 817, 17, 24, "Print",ExpressionUUID->"7e990b52-218e-484d-b07f-d5eb95c62e17"],
-Cell[1108456, 22479, 815, 17, 24, "Print",ExpressionUUID->"47e26678-238b-459c-ac1c-b33b9c58e419"],
-Cell[1109274, 22498, 817, 17, 24, "Print",ExpressionUUID->"a52888f1-8092-4793-b28a-36f402acc328"],
-Cell[1110094, 22517, 815, 17, 24, "Print",ExpressionUUID->"17e59487-d67e-4b18-9f1e-8aa88eaa6bc6"],
-Cell[1110912, 22536, 169267, 3287, 296, "Print",ExpressionUUID->"39eda230-48f9-46f4-9d19-c2648b3f90b1"],
-Cell[1280182, 25825, 186621, 3576, 296, "Print",ExpressionUUID->"2b58d533-cd5f-4b65-b3d0-29d28b258ae3"],
-Cell[1466806, 29403, 194169, 3695, 296, "Print",ExpressionUUID->"9d49d1bc-2943-4f2d-94a6-d47cca2be56f"],
-Cell[1660978, 33100, 152484, 3008, 296, "Print",ExpressionUUID->"5b836978-b4c0-42ac-8874-b5b4fcdc3318"],
-Cell[1813465, 36110, 813, 17, 24, "Print",ExpressionUUID->"5e767eb7-656e-4e0f-91be-40bd4f81611e"],
-Cell[1814281, 36129, 813, 17, 24, "Print",ExpressionUUID->"b5a21b2a-5b5e-412b-9d79-ddb0b84b5fdf"],
-Cell[1815097, 36148, 813, 17, 24, "Print",ExpressionUUID->"837b59a4-ffff-4039-879f-5c239d5649fe"],
-Cell[1815913, 36167, 815, 17, 24, "Print",ExpressionUUID->"dea7c88f-b6a2-46e5-a5ef-3d83ec299985"],
-Cell[1816731, 36186, 813, 17, 24, "Print",ExpressionUUID->"0d0e50ba-3e01-4319-af2d-520791b21d3c"],
-Cell[1817547, 36205, 815, 17, 24, "Print",ExpressionUUID->"e4153089-77b8-400b-a763-523db2bdaf5d"],
-Cell[1818365, 36224, 813, 17, 24, "Print",ExpressionUUID->"bf2f1a11-80b7-484a-b8fc-bfd18e1b6838"],
-Cell[1819181, 36243, 815, 17, 24, "Print",ExpressionUUID->"f57126d2-aed0-4933-ace0-37757e2ce933"],
-Cell[1819999, 36262, 813, 17, 24, "Print",ExpressionUUID->"8ed12e54-53e1-481e-95c2-3d2859249f93"],
-Cell[1820815, 36281, 815, 17, 24, "Print",ExpressionUUID->"85851ee1-7d2a-4c36-a4ab-66ac3867cb1c"],
-Cell[1821633, 36300, 815, 17, 24, "Print",ExpressionUUID->"ed18ad1d-e7ca-46ad-83af-d68c69de4343"],
-Cell[1822451, 36319, 817, 17, 24, "Print",ExpressionUUID->"abf13e3c-fae2-478d-8f87-93393367ee2c"],
-Cell[1823271, 36338, 815, 17, 24, "Print",ExpressionUUID->"7a23c73e-d5f2-4f7b-8eec-54a24e55d396"],
-Cell[1824089, 36357, 815, 17, 24, "Print",ExpressionUUID->"b7872e6b-7d31-49b0-ae02-457091e45cd6"],
-Cell[1824907, 36376, 815, 17, 24, "Print",ExpressionUUID->"4015f056-ceb4-4bd2-89da-62db69dfd5c4"],
-Cell[1825725, 36395, 815, 17, 24, "Print",ExpressionUUID->"bfb43957-9d49-4114-994b-0ae73643ed33"],
-Cell[1826543, 36414, 815, 17, 24, "Print",ExpressionUUID->"4d091f7f-8256-4ea1-a59d-2aae93e44d23"],
-Cell[1827361, 36433, 815, 17, 24, "Print",ExpressionUUID->"add8b043-05b5-4f22-92c5-711ff9565e64"]
-}, Open  ]],
-Cell[1828191, 36453, 439, 7, 34, "Output",ExpressionUUID->"a1308c92-a45c-47be-b7af-10c4ba7409a0"],
-Cell[CellGroupData[{
-Cell[1828655, 36464, 455, 8, 24, "Print",ExpressionUUID->"495dcb55-2d44-4f71-af5d-5e5dcc2c0882"],
-Cell[1829113, 36474, 673, 13, 24, "Print",ExpressionUUID->"dbc6980a-671c-4398-8cfb-731e87a236f5"],
-Cell[1829789, 36489, 704, 14, 24, "Print",ExpressionUUID->"cd71e4ef-e0ee-49ad-a640-8fd8eca7a818"],
-Cell[1830496, 36505, 704, 14, 24, "Print",ExpressionUUID->"a19d277a-7a62-433b-8576-856552490a7f"],
-Cell[1831203, 36521, 704, 14, 24, "Print",ExpressionUUID->"e3363e94-5ad2-49d7-8dde-b2e2200fd400"],
-Cell[1831910, 36537, 704, 14, 24, "Print",ExpressionUUID->"a8722bb5-61ca-42eb-9f4b-58d6ef3ca458"],
-Cell[1832617, 36553, 702, 14, 24, "Print",ExpressionUUID->"9d7786ed-a4ed-447e-9245-028f8ac65c5b"],
-Cell[1833322, 36569, 702, 14, 24, "Print",ExpressionUUID->"f0b352e1-f25a-4d4a-99c5-cb6f3060ec82"],
-Cell[1834027, 36585, 702, 14, 24, "Print",ExpressionUUID->"95b59cfa-0275-416e-9c53-0fe7e98d3daf"],
-Cell[1834732, 36601, 702, 14, 24, "Print",ExpressionUUID->"81cbdcf5-30c3-4696-bc83-ac1b29adc15e"],
-Cell[1835437, 36617, 704, 14, 24, "Print",ExpressionUUID->"81cc5fab-0de3-4236-a05f-c1a923efb506"],
-Cell[1836144, 36633, 703, 14, 24, "Print",ExpressionUUID->"d40fae7c-ada5-4070-8c05-8d195ed96e8d"],
-Cell[1836850, 36649, 704, 14, 24, "Print",ExpressionUUID->"f469ce12-8abf-4e6e-b735-817741323bda"],
-Cell[1837557, 36665, 704, 14, 24, "Print",ExpressionUUID->"a76acedb-0395-41b1-a623-3daf5a1ef1e1"],
-Cell[1838264, 36681, 704, 14, 24, "Print",ExpressionUUID->"422c474b-2981-4dd9-b3bb-f95048fcb3ab"],
-Cell[1838971, 36697, 704, 14, 24, "Print",ExpressionUUID->"0b7cadba-55f5-47a5-a1b4-f9cc0694dfa7"],
-Cell[1839678, 36713, 704, 14, 24, "Print",ExpressionUUID->"71071fc7-cec5-49bb-9b31-2c7fd0831668"],
-Cell[1840385, 36729, 704, 14, 24, "Print",ExpressionUUID->"60e59462-ef7a-45e2-a54b-81288158004f"],
-Cell[1841092, 36745, 704, 14, 24, "Print",ExpressionUUID->"e8c7aeba-022b-48af-90af-d1d6326605be"],
-Cell[1841799, 36761, 704, 14, 24, "Print",ExpressionUUID->"b80c76ba-0682-4611-acba-1aa37bdb1db6"],
-Cell[1842506, 36777, 704, 14, 24, "Print",ExpressionUUID->"e6f3b3b8-c87f-4f0a-b921-a8c05e43cd4c"],
-Cell[1843213, 36793, 636, 13, 24, "Print",ExpressionUUID->"68cd1f73-5695-42be-aa6d-fc9deb54c801"]
-}, Open  ]],
-Cell[1843864, 36809, 448, 11, 24, "Message",ExpressionUUID->"3887c287-6984-429b-b6b0-538a3a18f2f7"],
-Cell[1844315, 36822, 526, 12, 24, "Message",ExpressionUUID->"5ad1bfe8-af33-4ec5-841e-32b697b6370d"],
-Cell[1844844, 36836, 557, 10, 44, "Print",ExpressionUUID->"183a45fa-00f7-4de4-b162-d6fe01ca2e02"],
-Cell[1845404, 36848, 1004, 19, 59, "Message",ExpressionUUID->"d35413f8-9975-4099-9807-117f93d60a33"],
-Cell[1846411, 36869, 945, 19, 59, "Message",ExpressionUUID->"aa5a8248-0304-418e-8578-fb5e76e9a469"],
-Cell[1847359, 36890, 458, 11, 24, "Message",ExpressionUUID->"40952299-4323-42bd-abac-8817acee6149"],
-Cell[1847820, 36903, 460, 11, 24, "Message",ExpressionUUID->"63ebc729-3606-4b74-ba25-48f73158cb4d"],
-Cell[1848283, 36916, 452, 11, 24, "Message",ExpressionUUID->"b96fbdd4-f116-4832-a980-475e4b163f3f"],
-Cell[1848738, 36929, 460, 11, 24, "Message",ExpressionUUID->"f0df7602-e692-48df-8762-c7a5b96403d7"],
-Cell[1849201, 36942, 518, 11, 24, "Message",ExpressionUUID->"c6237e0e-6230-4cfa-b1cf-13f6d9b810b9"],
-Cell[1849722, 36955, 452, 11, 24, "Message",ExpressionUUID->"95aba39c-1eef-4697-8d9a-94b9bc5f9deb"],
-Cell[1850177, 36968, 452, 11, 24, "Message",ExpressionUUID->"49d936c4-c2c8-4227-afb2-f235e0b4de83"],
-Cell[1850632, 36981, 512, 11, 24, "Message",ExpressionUUID->"6f69bad0-8429-4022-8c53-73e0b2b5c9fb"],
-Cell[1851147, 36994, 526, 12, 24, "Message",ExpressionUUID->"1890ded9-974c-45da-be2b-dc5fcb5957d1"],
-Cell[1851676, 37008, 520, 11, 24, "Message",ExpressionUUID->"a3c37b7f-5fe8-4cfa-bdac-037da9db19ee"],
-Cell[1852199, 37021, 766, 15, 42, "Message",ExpressionUUID->"c0829a5d-6b4f-400a-a40a-f9fe13d475f8"],
-Cell[1852968, 37038, 769, 15, 42, "Message",ExpressionUUID->"5bf0b7f7-ced1-4263-92f5-ebe100fd6703"],
-Cell[1853740, 37055, 463, 11, 24, "Message",ExpressionUUID->"a21f2af1-feb6-4625-a1dd-591b7a41e6ce"],
-Cell[1854206, 37068, 472, 8, 24, "Print",ExpressionUUID->"1825d951-ca38-49d7-8f25-0b615db179a5"],
-Cell[1854681, 37078, 512, 12, 24, "Message",ExpressionUUID->"2adb9349-ca47-4a46-a525-0baaa86b5576"],
-Cell[CellGroupData[{
-Cell[1855218, 37094, 463, 8, 44, "Print",ExpressionUUID->"f824d8cf-8500-4ec1-98d9-e11a94785d76"],
-Cell[1855684, 37104, 458, 8, 24, "Print",ExpressionUUID->"8cdcb266-0c05-433f-b649-6e7fa26db875"],
-Cell[1856145, 37114, 673, 13, 24, "Print",ExpressionUUID->"69af9d3c-d0b7-457f-8a9d-00674c437709"],
-Cell[1856821, 37129, 702, 14, 24, "Print",ExpressionUUID->"f84202f6-2149-4433-a810-6a2ff72659fb"],
-Cell[1857526, 37145, 701, 14, 24, "Print",ExpressionUUID->"c0f906f7-0bb7-429a-ac7e-8b831bf0055a"],
-Cell[1858230, 37161, 702, 14, 24, "Print",ExpressionUUID->"58ec6fca-690b-404e-9692-a062b967c773"],
-Cell[1858935, 37177, 702, 14, 24, "Print",ExpressionUUID->"22e5c388-9bab-403c-bab7-c3571f64e1ed"],
-Cell[1859640, 37193, 700, 14, 24, "Print",ExpressionUUID->"10eae351-a782-49b3-999c-af61bff42929"],
-Cell[1860343, 37209, 636, 13, 24, "Print",ExpressionUUID->"1c2ff272-58a9-4de5-af72-9af89269e256"],
-Cell[1860982, 37224, 568, 10, 44, "Print",ExpressionUUID->"7a327b67-e88b-486f-a58e-307ef31db7ff"]
-}, Open  ]],
-Cell[1861565, 37237, 1014, 19, 59, "Message",ExpressionUUID->"4c0b981a-c809-450f-b872-94f579a9c19c"],
-Cell[1862582, 37258, 956, 19, 59, "Message",ExpressionUUID->"9e7e0064-e4d2-4dc0-b63c-6da6d16ff77a"],
-Cell[1863541, 37279, 458, 11, 24, "Message",ExpressionUUID->"cb5d4ee3-40f1-46d5-8f9e-2052a088f2b8"],
-Cell[1864002, 37292, 457, 11, 24, "Message",ExpressionUUID->"e3082f24-6052-43f3-852f-a5136c2054cb"],
-Cell[1864462, 37305, 454, 11, 24, "Message",ExpressionUUID->"8a65e9bb-5712-4a45-8206-9e7bd7889592"],
-Cell[1864919, 37318, 458, 11, 24, "Message",ExpressionUUID->"41670ace-84fa-468e-bf17-f61fa8c9a50c"],
-Cell[1865380, 37331, 520, 11, 24, "Message",ExpressionUUID->"21b2f468-36e1-4b5c-afe0-f06cd4827904"],
-Cell[1865903, 37344, 452, 11, 24, "Message",ExpressionUUID->"f103e958-4f0d-4f72-94c3-e3d8bde1511b"],
-Cell[1866358, 37357, 452, 11, 24, "Message",ExpressionUUID->"fca65804-27da-4c9e-9738-c55957a2bcdd"],
-Cell[1866813, 37370, 512, 11, 24, "Message",ExpressionUUID->"75d6f361-b47d-4e3f-98e0-092ff4b67bd9"],
-Cell[1867328, 37383, 528, 12, 24, "Message",ExpressionUUID->"0e979e32-870d-40f4-a01d-9470d17ce6f6"],
-Cell[1867859, 37397, 764, 15, 42, "Message",ExpressionUUID->"69881004-e68e-4211-8085-689d11af2480"],
-Cell[1868626, 37414, 769, 15, 42, "Message",ExpressionUUID->"365cb634-5c1b-4226-aa8c-81f70fbca746"],
-Cell[1869398, 37431, 1738, 28, 110, "Message",ExpressionUUID->"2bc4569a-2e94-40b0-890d-4e5adeec2445"],
-Cell[1871139, 37461, 518, 11, 24, "Message",ExpressionUUID->"9e44b148-e7be-4495-9867-b51eeefd581f"],
-Cell[1871660, 37474, 465, 11, 24, "Message",ExpressionUUID->"66efbb15-49b9-4580-a6d8-9f98cd817bc7"],
-Cell[1872128, 37487, 471, 8, 24, "Print",ExpressionUUID->"323f4a19-9b44-40a6-a5b7-7ef532ce83e7"],
-Cell[1872602, 37497, 521, 12, 42, "Message",ExpressionUUID->"35316a06-b089-4882-9f4f-16fd11462929"],
-Cell[CellGroupData[{
-Cell[1873148, 37513, 461, 8, 44, "Print",ExpressionUUID->"d051a9ef-eb6b-403f-84a4-da1eb7da81bd"],
-Cell[1873612, 37523, 456, 8, 24, "Print",ExpressionUUID->"1278ecf9-4652-4d3f-a23f-84d073cecef3"],
-Cell[1874071, 37533, 673, 13, 24, "Print",ExpressionUUID->"16e0b70a-378c-4c34-b499-072729980156"],
-Cell[1874747, 37548, 700, 14, 24, "Print",ExpressionUUID->"90722922-52de-41f4-ba7e-8ce8aa88a62b"],
-Cell[1875450, 37564, 702, 14, 24, "Print",ExpressionUUID->"84d77609-21f0-42fd-9cc1-5ad9e6a6e509"],
-Cell[1876155, 37580, 702, 14, 24, "Print",ExpressionUUID->"a340a438-a68c-4037-a749-e9fdf55d5bed"],
-Cell[1876860, 37596, 702, 14, 24, "Print",ExpressionUUID->"a8a2e19c-014c-42df-b310-1bbbc304785a"],
-Cell[1877565, 37612, 704, 14, 24, "Print",ExpressionUUID->"6f891700-86b1-4da2-862d-deb2151026a0"],
-Cell[1878272, 37628, 634, 13, 24, "Print",ExpressionUUID->"5adca53d-916f-4b5f-b1a2-a352e6046575"],
-Cell[1878909, 37643, 566, 10, 44, "Print",ExpressionUUID->"3eeacd61-15da-43fb-a625-3f95bb87efd1"]
-}, Open  ]],
-Cell[1879490, 37656, 954, 19, 59, "Message",ExpressionUUID->"0bb3d531-ded4-41d1-aaed-d3556e64e169"],
-Cell[1880447, 37677, 764, 15, 42, "Message",ExpressionUUID->"41c7cf33-c2ca-46bf-9995-5c518e07cd30"],
-Cell[1881214, 37694, 518, 11, 24, "Message",ExpressionUUID->"dbc44a70-cb3e-4163-8875-84c47bffc997"],
-Cell[1881735, 37707, 463, 11, 24, "Message",ExpressionUUID->"9d7ad334-b887-41cd-bcc1-39688a8ed771"],
-Cell[1882201, 37720, 472, 8, 24, "Print",ExpressionUUID->"f1cae797-5040-4f66-9453-28604c8079a4"],
-Cell[1882676, 37730, 521, 12, 42, "Message",ExpressionUUID->"6892c07c-5ef4-4da1-9f24-a80a83684312"],
-Cell[CellGroupData[{
-Cell[1883222, 37746, 461, 8, 44, "Print",ExpressionUUID->"ec2d74df-b01c-4aa6-b3d2-40587648fdc3"],
-Cell[1883686, 37756, 456, 8, 24, "Print",ExpressionUUID->"351318da-7aa6-4207-89c7-920e18b40ffc"],
-Cell[1884145, 37766, 673, 13, 24, "Print",ExpressionUUID->"9f31b12d-7be6-4893-aeea-3becccb10376"],
-Cell[1884821, 37781, 702, 14, 24, "Print",ExpressionUUID->"9ac7bbcd-214d-4feb-8c8a-165a5d3443be"],
-Cell[1885526, 37797, 702, 14, 24, "Print",ExpressionUUID->"4cb2de73-bd5e-4b6a-b758-41fcee23acdb"],
-Cell[1886231, 37813, 702, 14, 24, "Print",ExpressionUUID->"304e1669-dae0-42ed-9732-9ba0908fe66d"],
-Cell[1886936, 37829, 704, 14, 24, "Print",ExpressionUUID->"b1fd5e1e-9775-4922-9349-cf2237db41e2"],
-Cell[1887643, 37845, 700, 14, 24, "Print",ExpressionUUID->"f5ff0d35-4c64-47da-920d-e61d25e811c1"],
-Cell[1888346, 37861, 634, 13, 24, "Print",ExpressionUUID->"fd915ac0-aada-41ba-9282-42bc50db68e7"],
-Cell[1888983, 37876, 566, 10, 44, "Print",ExpressionUUID->"dcdb3dfd-1123-4e78-af24-e9a863c6a42b"]
-}, Open  ]],
-Cell[1889564, 37889, 954, 19, 59, "Message",ExpressionUUID->"bd66cc97-4dbf-461a-a939-1f5fbfe05127"],
-Cell[1890521, 37910, 517, 11, 24, "Message",ExpressionUUID->"d743d06d-6650-471b-a118-a077028aa16e"],
-Cell[1891041, 37923, 462, 11, 24, "Message",ExpressionUUID->"05444902-d25e-478f-95f9-d78197b85596"],
-Cell[1891506, 37936, 512, 11, 24, "Message",ExpressionUUID->"dcb0b40d-17c2-4006-922a-b4f80b73377f"],
-Cell[1892021, 37949, 472, 8, 24, "Print",ExpressionUUID->"1701221e-01f0-42a1-bde1-2a53299f7358"],
-Cell[1892496, 37959, 521, 12, 42, "Message",ExpressionUUID->"5f547f44-7231-4bad-b790-ecbee6bb9b5d"],
-Cell[1893020, 37973, 517, 11, 24, "Message",ExpressionUUID->"68151637-80a0-4c89-a223-0b1c78e104f7"],
-Cell[CellGroupData[{
-Cell[1893562, 37988, 461, 8, 44, "Print",ExpressionUUID->"db22554a-e423-4e4a-afa6-e61232a97867"],
-Cell[1894026, 37998, 456, 8, 24, "Print",ExpressionUUID->"563b9d67-c487-4795-9f2c-29a5a7f7ccfa"],
-Cell[1894485, 38008, 673, 13, 24, "Print",ExpressionUUID->"f24af2a3-8bd2-489d-b116-c10aec3eaca4"],
-Cell[1895161, 38023, 702, 14, 24, "Print",ExpressionUUID->"be1f4e25-9701-4ffd-b865-ad544e2bd37f"],
-Cell[1895866, 38039, 704, 14, 24, "Print",ExpressionUUID->"cada948e-c3f6-47b0-9d56-5dedb1089048"],
-Cell[1896573, 38055, 701, 14, 24, "Print",ExpressionUUID->"11a9b131-8f4b-48a2-8a6d-b7e26644489f"],
-Cell[1897277, 38071, 702, 14, 24, "Print",ExpressionUUID->"b1bb6c64-5263-41ac-a1ee-6d592e4a692e"],
-Cell[1897982, 38087, 704, 14, 24, "Print",ExpressionUUID->"2d7a06c5-4643-4bfb-86e8-378777dc120c"],
-Cell[1898689, 38103, 636, 13, 24, "Print",ExpressionUUID->"c5cc88d8-7013-4595-8b3a-c6dabe70a5c8"],
-Cell[1899328, 38118, 565, 10, 44, "Print",ExpressionUUID->"60a21c09-a8f1-4a16-8f69-af9c92b2ffa9"],
-Cell[1899896, 38130, 472, 8, 24, "Print",ExpressionUUID->"bc392163-5781-4d6e-9e71-f258b993dfb9"],
-Cell[1900371, 38140, 463, 8, 44, "Print",ExpressionUUID->"f89d40fd-0014-446e-9840-8ee110c68b0a"]
-}, Open  ]]
-}, Open  ]],
-Cell[1900861, 38152, 208, 4, 73, "Input",ExpressionUUID->"1196f9bd-2548-4d35-85be-81bb05e735d1"],
-Cell[1901072, 38158, 265, 7, 30, "Input",ExpressionUUID->"a1b461b0-3311-471b-8622-0ce80ecc8bc5"],
-Cell[1901340, 38167, 1863, 53, 220, "Input",ExpressionUUID->"8a1b2c8b-00d6-46e3-89a1-77170c10da2a"],
-Cell[CellGroupData[{
-Cell[1903228, 38224, 2041, 57, 241, "Input",ExpressionUUID->"f40f6a8e-04da-4014-9f19-bcf1eb59b485"],
-Cell[CellGroupData[{
-Cell[1905294, 38285, 285, 6, 24, "Print",ExpressionUUID->"06a91ed0-39d0-490c-b189-161a03a8065c"],
-Cell[1905582, 38293, 545, 13, 24, "Print",ExpressionUUID->"5f925a71-94f5-4f30-a7db-99d61266dc13"],
-Cell[1906130, 38308, 285, 6, 24, "Print",ExpressionUUID->"c2a88071-8f05-4f83-8a15-4d79eeda7116"],
-Cell[1906418, 38316, 484, 11, 24, "Print",ExpressionUUID->"441feb10-1427-428a-968a-2f4369287f28"],
-Cell[1906905, 38329, 530, 12, 24, "Print",ExpressionUUID->"0d21fd4f-9aae-4979-a4e2-bd1750be24bf"],
-Cell[1907438, 38343, 533, 12, 24, "Print",ExpressionUUID->"9a8a0e42-066b-41c6-b668-41dc8bd288a1"],
-Cell[1907974, 38357, 531, 12, 24, "Print",ExpressionUUID->"3cb56e73-b571-48dd-92ec-1876f9016043"],
-Cell[1908508, 38371, 533, 12, 24, "Print",ExpressionUUID->"96cfe7d0-49fc-48f9-b5a7-48f3ca05d6e3"],
-Cell[1909044, 38385, 285, 6, 24, "Print",ExpressionUUID->"cee5109b-b5c3-404f-94e9-d3a2d0a69c8d"],
-Cell[1909332, 38393, 480, 11, 24, "Print",ExpressionUUID->"3918d0bf-3980-4f1d-a173-99bb7c383288"],
-Cell[1909815, 38406, 465, 11, 24, "Print",ExpressionUUID->"7ccd23bb-39f2-4293-871b-86da585289d9"],
-Cell[1910283, 38419, 623, 14, 24, "Print",ExpressionUUID->"1b9cf5db-8e88-47ab-9d90-bdad5f1b68fe"],
-Cell[1910909, 38435, 18738, 396, 296, "Print",ExpressionUUID->"18f1a494-a175-46f3-bd70-4d02fba1fc2a"]
-}, Open  ]],
-Cell[1929662, 38834, 259, 5, 34, "Output",ExpressionUUID->"5a4940e7-c17a-4b2d-a6da-62cf09d7b1c7"],
-Cell[1929924, 38841, 625, 14, 24, "Print",ExpressionUUID->"14daf765-6f28-4f5d-bc35-a544be0c2f0b"],
-Cell[1930552, 38857, 257, 5, 34, "Output",ExpressionUUID->"0a80dd32-0887-48fd-b38f-13c5084a7a73"],
-Cell[CellGroupData[{
-Cell[1930834, 38866, 285, 6, 24, "Print",ExpressionUUID->"73a678e6-ba32-4526-8a36-165a9e5dde3b"],
-Cell[1931122, 38874, 502, 11, 24, "Print",ExpressionUUID->"af1dedeb-75b2-4c5f-b6d5-7775ae8ca43d"],
-Cell[1931627, 38887, 533, 12, 24, "Print",ExpressionUUID->"9c83cf1f-f686-4947-922c-8d264da87644"],
-Cell[1932163, 38901, 463, 11, 24, "Print",ExpressionUUID->"13c809f7-0e8c-4c6b-9175-54c8442a846e"],
-Cell[1932629, 38914, 397, 8, 44, "Print",ExpressionUUID->"a56ba7fd-7a82-478f-aaf1-0a8a5170e2ed"],
-Cell[1933029, 38924, 303, 6, 24, "Print",ExpressionUUID->"6ac500b9-6ba1-4515-bb30-0140a2a13b64"],
-Cell[1933335, 38932, 290, 6, 44, "Print",ExpressionUUID->"e3433f86-3d49-4360-99e2-39ecadb30aa1"]
-}, Open  ]]
-}, Open  ]],
-Cell[1933652, 38942, 296, 7, 30, "Input",ExpressionUUID->"ecd42304-902e-4024-9f46-7009f0ce5938"],
-Cell[1933951, 38951, 1913, 53, 220, "Input",ExpressionUUID->"e57cdab3-afd9-427f-89f7-863e6dfd567d"],
-Cell[CellGroupData[{
-Cell[1935889, 39008, 3457, 92, 346, "Input",ExpressionUUID->"25cf9944-5be2-40ab-999c-e1a6d72c9b57"],
-Cell[CellGroupData[{
-Cell[1939371, 39104, 344, 6, 24, "Print",ExpressionUUID->"98d2f184-f8b5-431d-b719-9532ec43c006"],
-Cell[1939718, 39112, 786, 17, 24, "Print",ExpressionUUID->"7d2280c4-7c8f-4431-a443-e63e708b205f"],
-Cell[1940507, 39131, 369, 6, 24, "Print",ExpressionUUID->"641d03a9-dda1-40c7-a400-fb8fe1d8c537"],
-Cell[1940879, 39139, 589, 12, 24, "Print",ExpressionUUID->"0935cc93-c75a-4797-85f7-dd61ff8f1aa4"],
-Cell[1941471, 39153, 346, 6, 24, "Print",ExpressionUUID->"20274d56-cfdf-4ca3-a453-12f29eee85ad"],
-Cell[1941820, 39161, 784, 17, 24, "Print",ExpressionUUID->"d4f9f1ff-adc3-4405-8915-b52096e2bfb2"],
-Cell[1942607, 39180, 780, 17, 24, "Print",ExpressionUUID->"5e5c0a11-3b1b-428f-b389-030fda590a10"],
-Cell[1943390, 39199, 344, 6, 24, "Print",ExpressionUUID->"41edee67-8147-4ddf-b8b3-2c972d97e4b0"],
-Cell[1943737, 39207, 983, 25, 24, "Print",ExpressionUUID->"cc54349c-d0e7-4b73-b74c-8e601e99a16c"],
-Cell[1944723, 39234, 344, 6, 24, "Print",ExpressionUUID->"3bf39df8-eb74-4b18-b17e-20f3c9f189e1"],
-Cell[1945070, 39242, 656, 13, 24, "Print",ExpressionUUID->"3a5f107a-2a2a-4855-bcfa-2d5a900d0fb8"],
-Cell[1945729, 39257, 368, 6, 24, "Print",ExpressionUUID->"48f2dfd7-4247-4cb9-bfdb-81172029752b"],
-Cell[1946100, 39265, 513, 11, 24, "Print",ExpressionUUID->"2fc7f28f-d458-454b-93d5-b9c23c226a88"],
-Cell[1946616, 39278, 543, 11, 24, "Print",ExpressionUUID->"912bf4cb-700e-4019-8592-3bd9e8ac121d"],
-Cell[1947162, 39291, 539, 11, 24, "Print",ExpressionUUID->"b2af981f-d490-4046-a578-2c1db2dd946f"],
-Cell[1947704, 39304, 583, 12, 24, "Print",ExpressionUUID->"3bec82a4-28b2-4b2c-b095-ebdac88e4385"],
-Cell[1948290, 39318, 344, 6, 24, "Print",ExpressionUUID->"2fa999d8-c24b-4cca-a146-145a53c65063"],
-Cell[1948637, 39326, 604, 13, 24, "Print",ExpressionUUID->"e74483bd-0eb5-4a50-b44c-b1445864199b"],
-Cell[1949244, 39341, 344, 6, 24, "Print",ExpressionUUID->"390712a1-4435-4b5b-920d-bfdd4ab0e4a5"],
-Cell[1949591, 39349, 543, 11, 24, "Print",ExpressionUUID->"ebacefc4-4391-400e-b7c4-00ba538b73c8"],
-Cell[1950137, 39362, 592, 12, 24, "Print",ExpressionUUID->"0392a59c-a493-4f7d-ba3a-81c8960bee91"],
-Cell[1950732, 39376, 590, 12, 24, "Print",ExpressionUUID->"56418129-8df4-485b-99fc-a9255bdc42ca"],
-Cell[1951325, 39390, 590, 12, 24, "Print",ExpressionUUID->"474670ff-0dbf-49a6-acba-5808fbfcaa4f"],
-Cell[1951918, 39404, 590, 12, 24, "Print",ExpressionUUID->"2107defa-d64f-41b1-b929-8c2559523df4"],
-Cell[1952511, 39418, 592, 12, 24, "Print",ExpressionUUID->"0bdddc97-eb68-4aee-abc1-976efa87a512"],
-Cell[1953106, 39432, 590, 12, 24, "Print",ExpressionUUID->"bbab9486-4a4e-4653-ab19-5411a353d70c"],
-Cell[1953699, 39446, 590, 12, 24, "Print",ExpressionUUID->"3e2dc1b6-3f32-4274-9f1f-f5a5b395e838"],
-Cell[1954292, 39460, 590, 12, 24, "Print",ExpressionUUID->"c24afb34-1f07-48ee-9d10-bd32ba9bff69"],
-Cell[1954885, 39474, 590, 12, 24, "Print",ExpressionUUID->"f746e358-263f-4d9d-8bce-697f70a8c1f0"],
-Cell[1955478, 39488, 592, 12, 24, "Print",ExpressionUUID->"a4f1c0fe-68cd-4ea6-91a2-516d2277c497"],
-Cell[1956073, 39502, 594, 12, 24, "Print",ExpressionUUID->"9631a95d-a354-4dd2-b950-31b0c1b65862"],
-Cell[1956670, 39516, 592, 12, 24, "Print",ExpressionUUID->"714b0dea-39f1-4f21-b716-a6f9cfc48117"],
-Cell[1957265, 39530, 594, 12, 24, "Print",ExpressionUUID->"190c4351-d809-4f28-b525-bbad979c6aa9"],
-Cell[1957862, 39544, 592, 12, 24, "Print",ExpressionUUID->"1a797554-ebec-4d21-aadc-6c85b39104d9"],
-Cell[1958457, 39558, 592, 12, 24, "Print",ExpressionUUID->"b5eb8ed0-7234-47ff-89bb-3f68eb29d8b6"],
-Cell[1959052, 39572, 592, 12, 24, "Print",ExpressionUUID->"5c3af5c3-475a-4e7a-a1cf-8139755ceb24"],
-Cell[1959647, 39586, 591, 12, 24, "Print",ExpressionUUID->"f6216273-5934-439d-a5a5-8e8283b2483b"],
-Cell[1960241, 39600, 592, 12, 24, "Print",ExpressionUUID->"e63a6dad-3964-43a6-b00f-6a30de03c956"],
-Cell[1960836, 39614, 592, 12, 24, "Print",ExpressionUUID->"fe3cf145-fe87-45d3-9b18-d63484012a17"],
-Cell[1961431, 39628, 592, 12, 24, "Print",ExpressionUUID->"995c82e4-de12-446f-b3c8-365c27a846df"],
-Cell[1962026, 39642, 594, 12, 24, "Print",ExpressionUUID->"9b768988-9d6f-4d10-8d7b-727a341783d7"],
-Cell[1962623, 39656, 594, 12, 24, "Print",ExpressionUUID->"f19df51a-9194-41a6-94d1-0e60a86240ac"],
-Cell[1963220, 39670, 592, 12, 24, "Print",ExpressionUUID->"7b0d2642-f652-4dc5-b7e8-558cd02dfde6"],
-Cell[1963815, 39684, 592, 12, 24, "Print",ExpressionUUID->"a235ae7d-f6b9-4d33-97f4-586aafd1c121"],
-Cell[1964410, 39698, 343, 6, 24, "Print",ExpressionUUID->"8c7a5c53-f58e-4c8a-84ae-b2fa82846a3a"],
-Cell[1964756, 39706, 539, 11, 24, "Print",ExpressionUUID->"21225e42-2fa6-4f5e-8234-816afb69b60f"],
-Cell[1965298, 39719, 521, 11, 24, "Print",ExpressionUUID->"c708e598-0982-4ade-b8bf-b4cee8fbc356"],
-Cell[1965822, 39732, 693, 15, 24, "Print",ExpressionUUID->"a09e2885-314f-4ad4-a5a5-9bc7a1978041"],
-Cell[1966518, 39749, 695, 15, 24, "Print",ExpressionUUID->"b4b2ddba-e4fd-405d-8f9b-ed4d80268f77"],
-Cell[1967216, 39766, 695, 15, 24, "Print",ExpressionUUID->"49ffff17-870c-4fd3-9fdf-3561d972d6ff"],
-Cell[1967914, 39783, 89261, 1769, 296, "Print",ExpressionUUID->"f49c3d36-7df3-42ed-987e-ae6c8e1a5a5a"]
-}, Open  ]],
-Cell[2057190, 41555, 448, 7, 34, "Output",ExpressionUUID->"7b8420a1-186a-4317-8a92-b10b0910f03c"],
-Cell[CellGroupData[{
-Cell[2057663, 41566, 693, 15, 24, "Print",ExpressionUUID->"91f1ad6c-1b8f-4043-b9e8-32984e161452"],
-Cell[2058359, 41583, 693, 15, 24, "Print",ExpressionUUID->"6cdd97b7-ce6a-4ad9-a880-3b0e0379a6f1"],
-Cell[2059055, 41600, 693, 15, 24, "Print",ExpressionUUID->"f962e94a-5e73-4474-b3fd-734f11918be3"]
-}, Open  ]],
-Cell[2059763, 41618, 446, 7, 34, "Output",ExpressionUUID->"587d6cfe-595c-4a70-bebf-3e63b3bbf3d9"],
-Cell[CellGroupData[{
-Cell[2060234, 41629, 344, 6, 24, "Print",ExpressionUUID->"ae35f0e8-6150-4b86-8953-a07626c485c5"],
-Cell[2060581, 41637, 604, 13, 24, "Print",ExpressionUUID->"b49b20f6-ce08-4e04-b7ab-8fd32d231830"],
-Cell[2061188, 41652, 344, 6, 24, "Print",ExpressionUUID->"05da6696-1677-4291-83ca-6d95dd6911ad"],
-Cell[2061535, 41660, 541, 11, 24, "Print",ExpressionUUID->"85843f8e-a907-4177-84d2-eb2d4b7bd53f"],
-Cell[2062079, 41673, 590, 12, 24, "Print",ExpressionUUID->"4e1596e4-a689-4f20-a48b-7cd6014e9776"],
-Cell[2062672, 41687, 592, 12, 24, "Print",ExpressionUUID->"4f2c8132-b88b-42d5-879e-715db56d02f0"],
-Cell[2063267, 41701, 592, 12, 24, "Print",ExpressionUUID->"4d29ddd3-3d51-44a1-ac01-7ace46c1a207"],
-Cell[2063862, 41715, 590, 12, 24, "Print",ExpressionUUID->"e383eb2c-db59-44ff-9447-fcb7f2bb6b00"],
-Cell[2064455, 41729, 592, 12, 24, "Print",ExpressionUUID->"d1b7c23d-63db-45cc-9100-a71e903567cf"],
-Cell[2065050, 41743, 590, 12, 24, "Print",ExpressionUUID->"ce4d3620-8f8e-4146-a5e2-ac5c262d8dc8"],
-Cell[2065643, 41757, 590, 12, 24, "Print",ExpressionUUID->"0f38b972-fdab-499e-a8cc-cfc104707d0c"],
-Cell[2066236, 41771, 590, 12, 24, "Print",ExpressionUUID->"25583a47-b21e-41c6-b3ec-5ee875fe638d"],
-Cell[2066829, 41785, 590, 12, 24, "Print",ExpressionUUID->"31ca5af5-29e2-4fb0-b6cd-06b21819aaf9"],
-Cell[2067422, 41799, 592, 12, 24, "Print",ExpressionUUID->"c885f372-31a7-4908-a6c2-88166a350123"],
-Cell[2068017, 41813, 592, 12, 24, "Print",ExpressionUUID->"9728ca2f-5dab-41b6-90c7-0239e661ca51"],
-Cell[2068612, 41827, 594, 12, 24, "Print",ExpressionUUID->"bf505b0a-1ee7-4f68-81af-aa1879102d5e"],
-Cell[2069209, 41841, 346, 6, 24, "Print",ExpressionUUID->"5ac5dc7a-a338-493a-a6be-037b9c5d1fa1"],
-Cell[2069558, 41849, 539, 11, 24, "Print",ExpressionUUID->"e0c7467d-f9a0-4b83-87cb-6cb354350448"],
-Cell[2070100, 41862, 522, 11, 24, "Print",ExpressionUUID->"74e5fb5e-09a1-4269-9c67-2fc42bdbecc5"],
-Cell[2070625, 41875, 692, 15, 24, "Print",ExpressionUUID->"80962cc2-25b7-4a6b-a950-ce0262e17a97"],
-Cell[2071320, 41892, 695, 15, 24, "Print",ExpressionUUID->"7256350e-383b-47ea-8c8f-e59ec3f52952"],
-Cell[2072018, 41909, 691, 15, 24, "Print",ExpressionUUID->"a08f884c-a77a-45aa-998f-f5710af7811f"],
-Cell[2072712, 41926, 76753, 1542, 296, "Print",ExpressionUUID->"ec92f692-6fdd-4263-850c-ba62394d9a87"],
-Cell[2149468, 43470, 693, 15, 24, "Print",ExpressionUUID->"7c7f8b93-b927-425e-ab01-cf546e6cdf5d"],
-Cell[2150164, 43487, 693, 15, 24, "Print",ExpressionUUID->"176c0399-057a-42a2-8c9a-4465706e52b9"],
-Cell[2150860, 43504, 695, 15, 24, "Print",ExpressionUUID->"c0581993-8174-49cf-8874-6ef4337119f2"]
-}, Open  ]],
-Cell[2151570, 43522, 446, 7, 34, "Output",ExpressionUUID->"aec8077f-5cd5-42fa-808b-023ccfeca0d0"],
-Cell[CellGroupData[{
-Cell[2152041, 43533, 346, 6, 24, "Print",ExpressionUUID->"c3273a63-926b-46f5-9be9-a507d827bc09"],
-Cell[2152390, 43541, 563, 11, 24, "Print",ExpressionUUID->"1f0fed8f-446b-4bc6-ae2b-0d6447bf1fb2"],
-Cell[2152956, 43554, 590, 12, 24, "Print",ExpressionUUID->"bf3f6d04-beb8-4508-af9a-cb0c0d3b0317"],
-Cell[2153549, 43568, 592, 12, 24, "Print",ExpressionUUID->"352330ef-de6c-4199-969c-95de1706a0b9"],
-Cell[2154144, 43582, 590, 12, 24, "Print",ExpressionUUID->"f7ed884f-8cec-44e0-9cfb-8f9cbd67a4e6"],
-Cell[2154737, 43596, 524, 11, 24, "Print",ExpressionUUID->"98f9df52-b30c-4401-b25d-143fe3dbf7b6"],
-Cell[2155264, 43609, 445, 8, 44, "Print",ExpressionUUID->"ad734690-10db-45a6-8e90-c1cd1841a288"],
-Cell[2155712, 43619, 360, 6, 24, "Print",ExpressionUUID->"83bacd40-e2da-452e-a508-27be504cdf56"],
-Cell[2156075, 43627, 349, 6, 44, "Print",ExpressionUUID->"db0d7d73-f5fd-4302-ac71-e7dabd74cdcb"],
-Cell[2156427, 43635, 344, 6, 24, "Print",ExpressionUUID->"91c17410-cacf-4533-b0a5-bfc810eab141"],
-Cell[2156774, 43643, 561, 11, 24, "Print",ExpressionUUID->"1d2df74e-1959-4b97-ab89-9289399db689"],
-Cell[2157338, 43656, 592, 12, 24, "Print",ExpressionUUID->"3bfb67a1-e07a-4599-9d75-739482386684"],
-Cell[2157933, 43670, 590, 12, 24, "Print",ExpressionUUID->"558907a6-e96b-478f-be57-b0590bed3046"],
-Cell[2158526, 43684, 590, 12, 24, "Print",ExpressionUUID->"e2cafdf8-8d71-4ca4-bf2a-141ebca41729"],
-Cell[2159119, 43698, 524, 11, 24, "Print",ExpressionUUID->"eb5b65fd-54ea-4a5e-ac7c-dbbc01dbd204"],
-Cell[2159646, 43711, 445, 8, 44, "Print",ExpressionUUID->"428a0e4e-2c64-4e49-abce-82977beb4da3"],
-Cell[2160094, 43721, 362, 6, 24, "Print",ExpressionUUID->"e89ac08f-6deb-49a4-887d-23373baa7e4e"],
-Cell[2160459, 43729, 349, 6, 44, "Print",ExpressionUUID->"6fc847a1-7579-4e18-aee3-fdeded84679f"]
-}, Open  ]]
-}, Open  ]],
 Cell[CellGroupData[{
-Cell[2160857, 43741, 2101, 51, 262, "Input",ExpressionUUID->"00b2ebfa-faf2-401d-8f84-2e8996fb70f1"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", "dB1", "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.7819615534580393`*^9, 3.781961554951058*^9}},
+ CellLabel->"In[37]:=",ExpressionUUID->"60af3fd5-3ff8-49b0-8d45-f9b6af8fdedb"],
+
 Cell[CellGroupData[{
-Cell[2162983, 43796, 290, 5, 24, "Print",ExpressionUUID->"482b7b69-f6b4-45f1-9a2c-0ab150cda602"],
-Cell[2163276, 43803, 279, 5, 24, "Print",ExpressionUUID->"0c57c097-c2e6-40bd-9ede-f2c4dc3c9965"],
-Cell[2163558, 43810, 721, 16, 24, "Print",ExpressionUUID->"7b632676-1202-4f79-a69d-8d737bde6c17"],
-Cell[2164282, 43828, 302, 5, 24, "Print",ExpressionUUID->"efc9d648-68f3-4c34-96f0-b963370877bd"],
-Cell[2164587, 43835, 524, 11, 24, "Print",ExpressionUUID->"465fc068-514c-4e6f-8a5c-4d5fed7eff58"],
-Cell[2165114, 43848, 279, 5, 24, "Print",ExpressionUUID->"15604b7f-08c1-4262-927e-197c4eb46a1c"],
-Cell[2165396, 43855, 719, 16, 24, "Print",ExpressionUUID->"92ab9642-e7a8-40b2-a260-4fb5048c8e9f"],
-Cell[2166118, 43873, 715, 16, 24, "Print",ExpressionUUID->"6c7d441d-fe7c-4fc0-9501-ad4b5c30c80d"],
-Cell[2166836, 43891, 279, 5, 24, "Print",ExpressionUUID->"37f80417-15b7-48cf-8bf2-cf4f12f655ee"],
-Cell[2167118, 43898, 918, 24, 24, "Print",ExpressionUUID->"86eb6596-d624-463b-8591-7765cce1e4c8"],
-Cell[2168039, 43924, 279, 5, 24, "Print",ExpressionUUID->"20329460-4c5a-4694-95bf-5fce24890b13"],
-Cell[2168321, 43931, 593, 12, 24, "Print",ExpressionUUID->"45504770-301f-4888-a0e5-648d6f27e060"],
-Cell[2168917, 43945, 303, 5, 24, "Print",ExpressionUUID->"6f91bd5e-4a6b-4381-a2ae-1f4dc802e7c5"],
-Cell[2169223, 43952, 448, 10, 24, "Print",ExpressionUUID->"74c3926f-183a-4796-9f57-f03092638243"],
-Cell[2169674, 43964, 480, 10, 24, "Print",ExpressionUUID->"fc1dd8ec-c4f8-4f22-98fc-f8943764731a"],
-Cell[2170157, 43976, 474, 10, 24, "Print",ExpressionUUID->"e8020980-812a-45ef-99b7-7d58bed40356"],
-Cell[2170634, 43988, 518, 11, 24, "Print",ExpressionUUID->"4233b12a-ff83-4b7d-993d-36f01140b6c8"],
-Cell[2171155, 44001, 279, 5, 24, "Print",ExpressionUUID->"47869948-ecd1-4af9-b875-01df3bf192d7"],
-Cell[2171437, 44008, 539, 12, 24, "Print",ExpressionUUID->"1ac59348-d86e-46cf-81f6-7f07deec8e69"],
-Cell[2171979, 44022, 281, 5, 24, "Print",ExpressionUUID->"be4046f4-afc7-46ab-9b4c-a12a208d214d"],
-Cell[2172263, 44029, 476, 10, 24, "Print",ExpressionUUID->"590ed1f5-2d5e-4d52-aa2a-521524e47125"],
-Cell[2172742, 44041, 525, 11, 24, "Print",ExpressionUUID->"b00f9b05-f586-43f6-a3ac-47ee5596a4a4"],
-Cell[2173270, 44054, 525, 11, 24, "Print",ExpressionUUID->"4c16b8a2-7923-47bc-bf55-a401337b086e"],
-Cell[2173798, 44067, 527, 11, 24, "Print",ExpressionUUID->"9a4d1373-6745-46e2-bedf-084ceeeb3992"],
-Cell[2174328, 44080, 527, 11, 24, "Print",ExpressionUUID->"86eed2fa-2419-4af5-950e-468c5fc8760b"],
-Cell[2174858, 44093, 525, 11, 24, "Print",ExpressionUUID->"a2282fbf-8887-4e98-9477-9d5f6d1b2b9b"],
-Cell[2175386, 44106, 527, 11, 24, "Print",ExpressionUUID->"f91c9250-7da2-47b4-b52f-a65e91fecc0d"],
-Cell[2175916, 44119, 525, 11, 24, "Print",ExpressionUUID->"3fd83e52-022c-4dbd-84be-a23f1b8c12e9"],
-Cell[2176444, 44132, 525, 11, 24, "Print",ExpressionUUID->"ed764292-1653-4656-a2ea-b82e47346fda"],
-Cell[2176972, 44145, 527, 11, 24, "Print",ExpressionUUID->"d5b36eaf-2487-4de7-82f2-b741d9ff15c6"],
-Cell[2177502, 44158, 527, 11, 24, "Print",ExpressionUUID->"fa11260b-327f-4c3a-9b78-8fac30899110"],
-Cell[2178032, 44171, 527, 11, 24, "Print",ExpressionUUID->"cf4549a7-9aec-4ae6-b884-a3b47e57e099"],
-Cell[2178562, 44184, 527, 11, 24, "Print",ExpressionUUID->"a0755672-a28d-4254-9cac-c3e536d5488a"],
-Cell[2179092, 44197, 529, 11, 24, "Print",ExpressionUUID->"3d0c39fc-4140-4797-b15f-2a88b053444b"],
-Cell[2179624, 44210, 526, 11, 24, "Print",ExpressionUUID->"52f23fe7-2ec8-44d5-b8e2-6d9fefdbcf5f"],
-Cell[2180153, 44223, 525, 11, 24, "Print",ExpressionUUID->"f84fac8b-9b5b-42cd-991e-5c15019c3cd9"],
-Cell[2180681, 44236, 527, 11, 24, "Print",ExpressionUUID->"44871153-0c3e-4261-b73e-52b51d05fc29"],
-Cell[2181211, 44249, 527, 11, 24, "Print",ExpressionUUID->"fe1e6cc7-5408-44e7-8eeb-74c2eb17bd31"],
-Cell[2181741, 44262, 527, 11, 24, "Print",ExpressionUUID->"cd8ba6ab-b5cd-4451-aa7a-29b82c645660"],
-Cell[2182271, 44275, 526, 11, 24, "Print",ExpressionUUID->"86b6b92f-22a6-41ea-a987-474e9174f33c"],
-Cell[2182800, 44288, 527, 11, 24, "Print",ExpressionUUID->"442012e3-dd0e-4dd2-b282-d35c7ffd1a11"],
-Cell[2183330, 44301, 529, 11, 24, "Print",ExpressionUUID->"072923e0-44bc-4646-8b2b-8029d067181f"],
-Cell[2183862, 44314, 529, 11, 24, "Print",ExpressionUUID->"40d18e24-52a9-42ea-b976-6b2bac192ef3"],
-Cell[2184394, 44327, 527, 11, 24, "Print",ExpressionUUID->"f741ced5-cc41-4bba-87d3-6967a7ce4de3"],
-Cell[2184924, 44340, 527, 11, 24, "Print",ExpressionUUID->"4a12258b-acbc-40e4-85d5-b71956bf9f9f"],
-Cell[2185454, 44353, 529, 11, 24, "Print",ExpressionUUID->"26ee02c5-01be-4a5b-8e23-7b5740ecf00b"],
-Cell[2185986, 44366, 527, 11, 24, "Print",ExpressionUUID->"909aa5cc-4cf1-4134-a6db-623eceea8f95"],
-Cell[2186516, 44379, 527, 11, 24, "Print",ExpressionUUID->"ab74d7c3-3bca-48f9-bf90-91962ad793e3"],
-Cell[2187046, 44392, 527, 11, 24, "Print",ExpressionUUID->"2c6d20cb-61d0-477f-9eff-cd5b3c58115b"],
-Cell[2187576, 44405, 527, 11, 24, "Print",ExpressionUUID->"9e1d5d63-95ee-468c-a45a-47a173b62ea5"],
-Cell[2188106, 44418, 527, 11, 24, "Print",ExpressionUUID->"ea1b6e3c-1593-4687-9e7e-bca79b39d679"],
-Cell[2188636, 44431, 529, 11, 24, "Print",ExpressionUUID->"2a96830a-2747-4078-94d6-30d3e432c5ec"],
-Cell[2189168, 44444, 527, 11, 24, "Print",ExpressionUUID->"d8801fc7-5e71-4a0b-b0da-acd196653a94"],
-Cell[2189698, 44457, 527, 11, 24, "Print",ExpressionUUID->"49d5de5e-b904-4599-a241-7c89f29d1c18"],
-Cell[2190228, 44470, 527, 11, 24, "Print",ExpressionUUID->"c409cffb-eb72-4313-9ded-9e7646df22b8"],
-Cell[2190758, 44483, 527, 11, 24, "Print",ExpressionUUID->"a9c42256-77b6-4966-953f-996e7f4424fd"],
-Cell[2191288, 44496, 527, 11, 24, "Print",ExpressionUUID->"c971b94c-7055-46e8-8f42-92bf62b417a1"],
-Cell[2191818, 44509, 527, 11, 24, "Print",ExpressionUUID->"fde8093f-3013-4f73-a87e-3fee062234c5"],
-Cell[2192348, 44522, 527, 11, 24, "Print",ExpressionUUID->"0d001629-ce93-4b92-a44e-6adbc7bbc315"],
-Cell[2192878, 44535, 527, 11, 24, "Print",ExpressionUUID->"9de29004-3c47-42de-97d9-7e5021721326"],
-Cell[2193408, 44548, 526, 11, 24, "Print",ExpressionUUID->"9e2c960c-02fe-4d54-9bf0-10ade211cdc6"],
-Cell[2193937, 44561, 527, 11, 24, "Print",ExpressionUUID->"f4d5c5bd-c09b-404f-83f1-6121f361aa55"],
-Cell[2194467, 44574, 527, 11, 24, "Print",ExpressionUUID->"c2b1216d-3ba1-4577-b3dd-8eb87edd64b9"],
-Cell[2194997, 44587, 527, 11, 24, "Print",ExpressionUUID->"ddae031d-a3a3-4573-a96f-d2a32183f65b"],
-Cell[2195527, 44600, 529, 11, 24, "Print",ExpressionUUID->"83080bc6-77f6-41f9-a6f7-5d45b0a3f5ee"],
-Cell[2196059, 44613, 527, 11, 24, "Print",ExpressionUUID->"5940abce-ac3d-439e-a874-8677dc5b62f9"],
-Cell[2196589, 44626, 529, 11, 24, "Print",ExpressionUUID->"a2a7e806-c823-4891-89c9-0514dcb2ba9f"],
-Cell[2197121, 44639, 527, 11, 24, "Print",ExpressionUUID->"eeda71c5-85db-4b6f-b072-1530f5f1b204"],
-Cell[2197651, 44652, 527, 11, 24, "Print",ExpressionUUID->"e6bbf982-d710-4652-a41f-fe78241c97ff"],
-Cell[2198181, 44665, 529, 11, 24, "Print",ExpressionUUID->"c2a7cf39-1dde-4342-bfba-3560297d5bf6"],
-Cell[2198713, 44678, 527, 11, 24, "Print",ExpressionUUID->"4a20e63b-cbef-4cce-83e8-c2c3f33bc1fd"],
-Cell[2199243, 44691, 529, 11, 24, "Print",ExpressionUUID->"c28ef418-a99d-4b61-8bda-90e9cd0dbc5d"],
-Cell[2199775, 44704, 529, 11, 24, "Print",ExpressionUUID->"bfd191bf-55aa-4710-bfe9-d73cb6383e16"],
-Cell[2200307, 44717, 527, 11, 24, "Print",ExpressionUUID->"808f6012-a961-4e65-bd29-7a53e0ee4e62"],
-Cell[2200837, 44730, 527, 11, 24, "Print",ExpressionUUID->"e1e4a029-d8bb-42f1-8e4d-877284e9ddf5"],
-Cell[2201367, 44743, 527, 11, 24, "Print",ExpressionUUID->"2f798775-721b-43c9-835a-b5ca45d457ac"],
-Cell[2201897, 44756, 529, 11, 24, "Print",ExpressionUUID->"80804efd-1ff8-442a-9e90-4a1205f6bd84"],
-Cell[2202429, 44769, 527, 11, 24, "Print",ExpressionUUID->"fc10ef62-f7de-4da3-b483-c1d974b88f2b"],
-Cell[2202959, 44782, 527, 11, 24, "Print",ExpressionUUID->"b5069cbe-8912-484a-beff-19781e878655"],
-Cell[2203489, 44795, 529, 11, 24, "Print",ExpressionUUID->"0966a11d-4882-4b30-8b31-023a0b8dddaf"],
-Cell[2204021, 44808, 529, 11, 24, "Print",ExpressionUUID->"8cd6cb1b-0482-4344-8799-19acc4683bb7"],
-Cell[2204553, 44821, 526, 11, 24, "Print",ExpressionUUID->"2549f2b3-f306-4cd4-a6f8-81daf0343e2a"],
-Cell[2205082, 44834, 527, 11, 24, "Print",ExpressionUUID->"e992dbcc-c3eb-496c-9aac-5a1569a2a1ea"],
-Cell[2205612, 44847, 529, 11, 24, "Print",ExpressionUUID->"096a688f-5ef8-479f-82e9-f640aa79a4aa"],
-Cell[2206144, 44860, 527, 11, 24, "Print",ExpressionUUID->"22ac10c8-525d-4e43-8c86-670c84529870"],
-Cell[2206674, 44873, 529, 11, 24, "Print",ExpressionUUID->"a0290ced-13d0-4a1e-a400-7e3373d885a6"],
-Cell[2207206, 44886, 527, 11, 24, "Print",ExpressionUUID->"bcfae30e-7bcd-4dd3-8dc6-32b6a9fbba88"],
-Cell[2207736, 44899, 527, 11, 24, "Print",ExpressionUUID->"e0c9f492-f3f4-473f-b226-e2f4e1da03be"],
-Cell[2208266, 44912, 527, 11, 24, "Print",ExpressionUUID->"4a28e937-cbb7-4ff2-8b85-030bc207001b"],
-Cell[2208796, 44925, 527, 11, 24, "Print",ExpressionUUID->"d43e20fa-75e4-44dc-bf1a-9a3930b2102f"],
-Cell[2209326, 44938, 529, 11, 24, "Print",ExpressionUUID->"f3470329-cbfe-4aab-9a92-7fe3182802d3"],
-Cell[2209858, 44951, 527, 11, 24, "Print",ExpressionUUID->"33e6d154-8864-4961-84af-7b088d0c1d6d"],
-Cell[2210388, 44964, 529, 11, 24, "Print",ExpressionUUID->"0a1cc530-3504-4e6c-8ca2-108d9e0929dc"],
-Cell[2210920, 44977, 529, 11, 24, "Print",ExpressionUUID->"8859e214-8f28-458a-86f7-9845a83b59c6"],
-Cell[2211452, 44990, 527, 11, 24, "Print",ExpressionUUID->"3494269d-7ca8-4840-94b7-7df30938c5c5"],
-Cell[2211982, 45003, 527, 11, 24, "Print",ExpressionUUID->"64304681-dd46-4470-b392-15116814eed3"],
-Cell[2212512, 45016, 527, 11, 24, "Print",ExpressionUUID->"b8bb4c71-bd91-47e1-85e7-7cc74ae339ea"],
-Cell[2213042, 45029, 527, 11, 24, "Print",ExpressionUUID->"a9fc632b-ac2e-4d12-845f-6ba9bb0fb88a"],
-Cell[2213572, 45042, 527, 11, 24, "Print",ExpressionUUID->"14e5e342-04db-42f9-9dcd-e54b27381556"],
-Cell[2214102, 45055, 527, 11, 24, "Print",ExpressionUUID->"68cbb07b-ff1b-41d2-9408-97a139ca04b4"],
-Cell[2214632, 45068, 527, 11, 24, "Print",ExpressionUUID->"ade50005-dc22-4549-8c48-ca1c2f4f6179"],
-Cell[2215162, 45081, 527, 11, 24, "Print",ExpressionUUID->"f19201e5-fa6c-4df3-8177-4f4d85a0deb0"],
-Cell[2215692, 45094, 526, 11, 24, "Print",ExpressionUUID->"376cdf29-de05-4896-8cd1-d653f4329951"],
-Cell[2216221, 45107, 527, 11, 24, "Print",ExpressionUUID->"5d1726ba-e7c8-4ea5-8383-70a46e2dca56"],
-Cell[2216751, 45120, 527, 11, 24, "Print",ExpressionUUID->"6289e36d-04de-4e90-8bc7-fea404ee7ae6"],
-Cell[2217281, 45133, 527, 11, 24, "Print",ExpressionUUID->"1596e7c3-f4a0-4f54-b46b-5c85de8d227b"],
-Cell[2217811, 45146, 527, 11, 24, "Print",ExpressionUUID->"aa60764a-022f-4534-b590-7985930ab71d"],
-Cell[2218341, 45159, 527, 11, 24, "Print",ExpressionUUID->"a63d9a20-9fcd-42aa-8251-229ed14fcf0b"],
-Cell[2218871, 45172, 527, 11, 24, "Print",ExpressionUUID->"d5e47eff-33fd-4ab0-a3ec-3f56a6fef96b"],
-Cell[2219401, 45185, 529, 11, 24, "Print",ExpressionUUID->"237304f0-3673-4c2d-afe8-3d7a7ebe249b"],
-Cell[2219933, 45198, 527, 11, 24, "Print",ExpressionUUID->"c829a173-07f8-4df8-8e1f-eb918a3bc6b1"],
-Cell[2220463, 45211, 527, 11, 24, "Print",ExpressionUUID->"e4453bd4-d618-4b7a-b024-d657ef4957f5"],
-Cell[2220993, 45224, 527, 11, 24, "Print",ExpressionUUID->"933e4c6a-54c2-4415-a419-34b52bcef5e4"],
-Cell[2221523, 45237, 527, 11, 24, "Print",ExpressionUUID->"3754f430-9482-4b0e-8e5a-78228e95e7b7"],
-Cell[2222053, 45250, 527, 11, 24, "Print",ExpressionUUID->"e5e28447-4da0-428d-adeb-3d0f178dc854"],
-Cell[2222583, 45263, 526, 11, 24, "Print",ExpressionUUID->"9e930076-0112-457d-9050-59d77b2c3f51"],
-Cell[2223112, 45276, 527, 11, 24, "Print",ExpressionUUID->"83743332-28b4-4f4e-9a55-e7411e838cac"],
-Cell[2223642, 45289, 529, 11, 24, "Print",ExpressionUUID->"5a867892-be28-4a5c-913a-cd64118dc1aa"],
-Cell[2224174, 45302, 527, 11, 24, "Print",ExpressionUUID->"29b71846-a025-4f89-ac63-d818a7f3b614"],
-Cell[2224704, 45315, 529, 11, 24, "Print",ExpressionUUID->"2bd90177-8624-44ca-892b-190c3a5e0d65"],
-Cell[2225236, 45328, 529, 11, 24, "Print",ExpressionUUID->"989dc8a4-be6f-4994-baba-bfd5217241d3"],
-Cell[2225768, 45341, 531, 11, 24, "Print",ExpressionUUID->"1c9dc131-7797-4b61-86ac-5a0c1a0a4d7e"],
-Cell[2226302, 45354, 529, 11, 24, "Print",ExpressionUUID->"1d94d72f-145b-438f-8c3f-eff4ed502617"],
-Cell[2226834, 45367, 529, 11, 24, "Print",ExpressionUUID->"5d87cb98-4c45-4ac9-8d66-d3bacef1ff18"],
-Cell[2227366, 45380, 529, 11, 24, "Print",ExpressionUUID->"9a5bfff7-85c1-4ea1-ac44-b7fe9bc3fabd"],
-Cell[2227898, 45393, 529, 11, 24, "Print",ExpressionUUID->"5465c028-f2a0-4734-a77c-141afa5f82a0"],
-Cell[2228430, 45406, 529, 11, 24, "Print",ExpressionUUID->"c3ca4913-3ce5-4844-9e77-ce5def9e7fbc"],
-Cell[2228962, 45419, 529, 11, 24, "Print",ExpressionUUID->"ae7ec018-75eb-4d88-8e45-5e2518b17411"],
-Cell[2229494, 45432, 529, 11, 24, "Print",ExpressionUUID->"cd4cfb19-6da6-4b99-a609-cb200d0a907d"],
-Cell[2230026, 45445, 529, 11, 24, "Print",ExpressionUUID->"8751b8fd-1b76-40cd-a0f1-a95a97697501"],
-Cell[2230558, 45458, 529, 11, 24, "Print",ExpressionUUID->"1e8c121e-fe1b-4f53-a047-bd73813541da"],
-Cell[2231090, 45471, 528, 11, 24, "Print",ExpressionUUID->"e66c3f4d-4baf-43ee-ad7d-f1cdb877d6d2"],
-Cell[2231621, 45484, 529, 11, 24, "Print",ExpressionUUID->"307c1338-c863-48ee-ba46-8040507dbaf1"],
-Cell[2232153, 45497, 529, 11, 24, "Print",ExpressionUUID->"8428cf6f-dc5d-4ec1-bda1-2e9ec4425dc7"],
-Cell[2232685, 45510, 529, 11, 24, "Print",ExpressionUUID->"586bdfd8-dbe8-4cd4-ad63-16d68f420351"],
-Cell[2233217, 45523, 529, 11, 24, "Print",ExpressionUUID->"1ce4b55a-4462-4f08-beec-bfc80aeafc16"],
-Cell[2233749, 45536, 529, 11, 24, "Print",ExpressionUUID->"fbf84094-2be0-4b4e-b2a7-1f47a58f31a4"],
-Cell[2234281, 45549, 529, 11, 24, "Print",ExpressionUUID->"c7c1d120-76e4-4976-bf75-6d286d33f0af"],
-Cell[2234813, 45562, 529, 11, 24, "Print",ExpressionUUID->"40f00b9a-f076-4a98-b7fb-d2699bfe1e97"],
-Cell[2235345, 45575, 529, 11, 24, "Print",ExpressionUUID->"9aea03ae-78fb-46a4-959c-a632ddd3daaa"],
-Cell[2235877, 45588, 529, 11, 24, "Print",ExpressionUUID->"76d91400-d6dc-462b-b084-79572499fab2"],
-Cell[2236409, 45601, 529, 11, 24, "Print",ExpressionUUID->"97422370-545d-42ab-bc13-4ee2d682e759"],
-Cell[2236941, 45614, 529, 11, 24, "Print",ExpressionUUID->"b21763c2-bbe3-46ab-8865-385f591d934d"],
-Cell[2237473, 45627, 529, 11, 24, "Print",ExpressionUUID->"23d43de6-7477-4fc9-a2c8-82a3b7649e4c"],
-Cell[2238005, 45640, 529, 11, 24, "Print",ExpressionUUID->"996eb42f-d851-402a-836d-d4d08d0227e0"],
-Cell[2238537, 45653, 531, 11, 24, "Print",ExpressionUUID->"994f9d96-4be2-4fd5-956b-db163a49ff23"],
-Cell[2239071, 45666, 531, 11, 24, "Print",ExpressionUUID->"5f2069c4-cd84-4600-b781-1e0cf77be806"],
-Cell[2239605, 45679, 531, 11, 24, "Print",ExpressionUUID->"525bc282-fd37-467e-8572-423278fbcdd4"],
-Cell[2240139, 45692, 529, 11, 24, "Print",ExpressionUUID->"8dbd8c81-2f54-4c1e-86e3-4068bebc0392"],
-Cell[2240671, 45705, 529, 11, 24, "Print",ExpressionUUID->"de29cfe5-bd1d-4218-8f3c-2ad061965406"],
-Cell[2241203, 45718, 529, 11, 24, "Print",ExpressionUUID->"d7bd272b-523a-4d0d-bdb9-13a8ab9c0035"],
-Cell[2241735, 45731, 529, 11, 24, "Print",ExpressionUUID->"8b339b22-b856-40eb-bfaf-5abe17906184"],
-Cell[2242267, 45744, 528, 11, 24, "Print",ExpressionUUID->"c1418234-3828-4e6b-a7e3-10dc4d4fd069"],
-Cell[2242798, 45757, 531, 11, 24, "Print",ExpressionUUID->"19079ee2-5f3c-44db-ab1c-2276bd747d64"],
-Cell[2243332, 45770, 529, 11, 24, "Print",ExpressionUUID->"184b99b6-3396-4806-8cc1-a8c97c30271e"],
-Cell[2243864, 45783, 529, 11, 24, "Print",ExpressionUUID->"9abf7886-0435-4716-adae-2b40526a092b"],
-Cell[2244396, 45796, 531, 11, 24, "Print",ExpressionUUID->"4cdb8b07-6ea3-4251-aea9-de18730afe7d"],
-Cell[2244930, 45809, 529, 11, 24, "Print",ExpressionUUID->"362ddbbc-9592-4a4a-9415-8ae9c7f530ad"],
-Cell[2245462, 45822, 531, 11, 24, "Print",ExpressionUUID->"4b1a34ec-d25c-4125-9e16-fa0442261592"],
-Cell[2245996, 45835, 528, 11, 24, "Print",ExpressionUUID->"ae0838c5-1d04-4af1-8968-3e10ca495bbf"],
-Cell[2246527, 45848, 529, 11, 24, "Print",ExpressionUUID->"1d9d9f94-eb7d-40a4-8e3f-2f0185517645"],
-Cell[2247059, 45861, 531, 11, 24, "Print",ExpressionUUID->"98b19f6e-57f2-4b12-8e98-66a70b62cffe"],
-Cell[2247593, 45874, 531, 11, 24, "Print",ExpressionUUID->"f51fe13e-3dc0-4302-91af-6b45682d4dc1"],
-Cell[2248127, 45887, 529, 11, 24, "Print",ExpressionUUID->"b8da9f1f-ca1b-4c13-9da7-68d2d30d181c"],
-Cell[2248659, 45900, 531, 11, 24, "Print",ExpressionUUID->"d03f960d-a985-4724-b525-dd7047d7d869"],
-Cell[2249193, 45913, 529, 11, 24, "Print",ExpressionUUID->"5fae7711-eb05-48a7-8e45-39de243c9901"],
-Cell[2249725, 45926, 531, 11, 24, "Print",ExpressionUUID->"9058a6ec-2677-4390-b62a-f7f1aa0bb92a"],
-Cell[2250259, 45939, 529, 11, 24, "Print",ExpressionUUID->"b0d7f8aa-1f5d-4d67-9741-4fc437add9f7"],
-Cell[2250791, 45952, 531, 11, 24, "Print",ExpressionUUID->"e15ab415-af93-4c41-bc39-e22f0c3c38be"],
-Cell[2251325, 45965, 529, 11, 24, "Print",ExpressionUUID->"e7d661ab-9386-45ff-8a04-87e1c95ff8b4"],
-Cell[2251857, 45978, 529, 11, 24, "Print",ExpressionUUID->"9f9aa58f-3b1f-4808-b047-c967807c4e93"],
-Cell[2252389, 45991, 531, 11, 24, "Print",ExpressionUUID->"d959dcef-4e60-48c1-a7a6-aafa63b4148a"],
-Cell[2252923, 46004, 531, 11, 24, "Print",ExpressionUUID->"ac11dbe3-d591-4f32-ad94-f779d0c8400b"],
-Cell[2253457, 46017, 529, 11, 24, "Print",ExpressionUUID->"ce4a7715-19ce-46fb-b822-28d77a0fabf1"],
-Cell[2253989, 46030, 529, 11, 24, "Print",ExpressionUUID->"6bb08b23-3c72-4e5b-abc7-73003c3fc261"],
-Cell[2254521, 46043, 529, 11, 24, "Print",ExpressionUUID->"b20c75c7-1181-4a1b-b8ac-e72e92b50561"],
-Cell[2255053, 46056, 528, 11, 24, "Print",ExpressionUUID->"ebd998cf-24bb-4eb2-83c3-8ad397fb14cc"],
-Cell[2255584, 46069, 529, 11, 24, "Print",ExpressionUUID->"bc838b1a-6863-4410-bda0-39dc771ed636"],
-Cell[2256116, 46082, 528, 11, 24, "Print",ExpressionUUID->"d9e7c7db-572d-4067-861e-cbf3afe77521"],
-Cell[2256647, 46095, 529, 11, 24, "Print",ExpressionUUID->"ae8782cc-581e-4f76-a939-956fffe0ace6"],
-Cell[2257179, 46108, 529, 11, 24, "Print",ExpressionUUID->"4a0d7cc3-4eba-4f89-a344-fd6a32562e1b"],
-Cell[2257711, 46121, 531, 11, 24, "Print",ExpressionUUID->"35db92c4-0d44-4217-afab-d426be163229"],
-Cell[2258245, 46134, 531, 11, 24, "Print",ExpressionUUID->"2fdcf078-527a-4c0d-8e30-58706d244691"],
-Cell[2258779, 46147, 529, 11, 24, "Print",ExpressionUUID->"fc6a23a1-f2b2-47b5-987d-323a5a88fd8b"],
-Cell[2259311, 46160, 529, 11, 24, "Print",ExpressionUUID->"5776850a-a04a-49e6-ac40-400c4f896b2d"],
-Cell[2259843, 46173, 529, 11, 24, "Print",ExpressionUUID->"e96f9759-0bef-4290-bd3b-3503f0b0a411"],
-Cell[2260375, 46186, 529, 11, 24, "Print",ExpressionUUID->"5b70a5af-6e87-4b06-a20e-1410998f03dd"],
-Cell[2260907, 46199, 529, 11, 24, "Print",ExpressionUUID->"7d094c60-e2f8-44a0-af91-9cf9d4e2fe15"],
-Cell[2261439, 46212, 528, 11, 24, "Print",ExpressionUUID->"3bf08d18-0602-4a03-909c-894e3bf74dcf"],
-Cell[2261970, 46225, 529, 11, 24, "Print",ExpressionUUID->"ec417ae3-5f5e-4017-bd56-96061adde86f"],
-Cell[2262502, 46238, 529, 11, 24, "Print",ExpressionUUID->"02e9025d-b120-4019-95e1-46e1763691fa"],
-Cell[2263034, 46251, 531, 11, 24, "Print",ExpressionUUID->"b07ab67e-435a-4b6e-a82b-5f77a8e91d93"],
-Cell[2263568, 46264, 529, 11, 24, "Print",ExpressionUUID->"938cd681-f9d7-4a43-81f2-07913fa20f2a"],
-Cell[2264100, 46277, 529, 11, 24, "Print",ExpressionUUID->"39c6fb30-8d6a-4d8d-9994-6f42bae345f9"],
-Cell[2264632, 46290, 529, 11, 24, "Print",ExpressionUUID->"93ebc516-cebb-441b-98b8-8f4f1603bce9"],
-Cell[2265164, 46303, 529, 11, 24, "Print",ExpressionUUID->"0cdd4c37-697f-4767-ad55-4f92221a433a"],
-Cell[2265696, 46316, 529, 11, 24, "Print",ExpressionUUID->"c99942db-c4ba-48f0-95e7-30dd8f17f0cd"],
-Cell[2266228, 46329, 529, 11, 24, "Print",ExpressionUUID->"2335ac84-67b9-49a9-a017-09a8e0c4a6ae"],
-Cell[2266760, 46342, 529, 11, 24, "Print",ExpressionUUID->"0eeed8f2-195e-40f1-802b-caf21bd038e7"],
-Cell[2267292, 46355, 528, 11, 24, "Print",ExpressionUUID->"4d4b5c1c-d382-41d3-a5ac-52ae3f900f67"],
-Cell[2267823, 46368, 529, 11, 24, "Print",ExpressionUUID->"9a772258-6339-4d3a-8514-d40583d2778f"],
-Cell[2268355, 46381, 529, 11, 24, "Print",ExpressionUUID->"9eb11ee9-9ac4-4873-b466-da4df949403c"],
-Cell[2268887, 46394, 531, 11, 24, "Print",ExpressionUUID->"8f962adb-c1f8-419e-9021-a9d089c460ce"],
-Cell[2269421, 46407, 529, 11, 24, "Print",ExpressionUUID->"de26d80c-4225-45fb-8024-3ad5d34d3057"],
-Cell[2269953, 46420, 528, 11, 24, "Print",ExpressionUUID->"1bbac5d9-41b5-41e7-9808-b25a5a990907"],
-Cell[2270484, 46433, 531, 11, 24, "Print",ExpressionUUID->"0efcbad6-30b2-45be-bf8e-31907797baec"],
-Cell[2271018, 46446, 529, 11, 24, "Print",ExpressionUUID->"876194c4-d5d3-4a7e-8bd1-daf467109e1c"],
-Cell[2271550, 46459, 529, 11, 24, "Print",ExpressionUUID->"44f91fba-ff48-4310-a043-4f7922319abe"],
-Cell[2272082, 46472, 529, 11, 24, "Print",ExpressionUUID->"1aaf8a65-c5ef-4f96-ab50-7955b095de96"],
-Cell[2272614, 46485, 527, 11, 24, "Print",ExpressionUUID->"44adcac6-6fa2-4597-87be-3ffb65a19018"],
-Cell[2273144, 46498, 529, 11, 24, "Print",ExpressionUUID->"8fb3435b-6e9e-4561-b825-6e9f204aa4f7"],
-Cell[2273676, 46511, 529, 11, 24, "Print",ExpressionUUID->"78a848a3-9036-4d5e-a10c-a330d2a260c8"],
-Cell[2274208, 46524, 529, 11, 24, "Print",ExpressionUUID->"c8f2fbca-0008-4335-b6e6-c8697073261c"],
-Cell[2274740, 46537, 531, 11, 24, "Print",ExpressionUUID->"1dd6fc8d-3779-4636-802a-4189f9f826a1"],
-Cell[2275274, 46550, 529, 11, 24, "Print",ExpressionUUID->"388b48db-dd6b-4f2b-b280-7b5ee2a4632a"],
-Cell[2275806, 46563, 529, 11, 24, "Print",ExpressionUUID->"eab3aa0a-50a8-41ee-8336-7f644178464a"],
-Cell[2276338, 46576, 529, 11, 24, "Print",ExpressionUUID->"94f1163a-105e-471d-8089-7dc3b1dd1730"],
-Cell[2276870, 46589, 531, 11, 24, "Print",ExpressionUUID->"a47290ef-0229-4a79-9948-295c1804c33a"],
-Cell[2277404, 46602, 529, 11, 24, "Print",ExpressionUUID->"03f29486-c7a6-4203-9a7c-53159274b2b7"],
-Cell[2277936, 46615, 531, 11, 24, "Print",ExpressionUUID->"cbc2fb23-86f0-4eae-967b-646d27f0752f"],
-Cell[2278470, 46628, 529, 11, 24, "Print",ExpressionUUID->"02254409-5700-444c-96ee-cb7782f47981"],
-Cell[2279002, 46641, 531, 11, 24, "Print",ExpressionUUID->"9065b45d-d3e6-4550-9f25-f52c7ab5d2a1"],
-Cell[2279536, 46654, 528, 11, 24, "Print",ExpressionUUID->"cdc4b55a-8a55-4374-922f-4330437d08ae"],
-Cell[2280067, 46667, 531, 11, 24, "Print",ExpressionUUID->"d487652f-a859-4abc-afba-90fda9a6d284"],
-Cell[2280601, 46680, 529, 11, 24, "Print",ExpressionUUID->"e9a8016f-8abd-49e5-bd30-03487dac0600"],
-Cell[2281133, 46693, 531, 11, 24, "Print",ExpressionUUID->"f6627aa5-a63b-4689-a531-f9fd9f6ff3c1"],
-Cell[2281667, 46706, 528, 11, 24, "Print",ExpressionUUID->"82f0b7e8-37ef-41e4-96d9-dbaad94cf023"],
-Cell[2282198, 46719, 529, 11, 24, "Print",ExpressionUUID->"470836fa-a4ca-4f9b-bd23-4012d16256e0"],
-Cell[2282730, 46732, 531, 11, 24, "Print",ExpressionUUID->"7a3100cf-d9f4-4a9d-9228-68fb38a558fb"],
-Cell[2283264, 46745, 529, 11, 24, "Print",ExpressionUUID->"659b8e73-896e-4f34-bc5c-02830044a3d5"],
-Cell[2283796, 46758, 529, 11, 24, "Print",ExpressionUUID->"5e8da35f-7756-4964-a518-c013f255e3c4"],
-Cell[2284328, 46771, 529, 11, 24, "Print",ExpressionUUID->"46a50121-a9bf-4d85-bf5d-dc7b652d1144"],
-Cell[2284860, 46784, 529, 11, 24, "Print",ExpressionUUID->"0168d062-0bce-4e4b-9be3-0bceaac87900"],
-Cell[2285392, 46797, 529, 11, 24, "Print",ExpressionUUID->"67e103d4-033a-44ed-88f2-b30d4465084d"],
-Cell[2285924, 46810, 531, 11, 24, "Print",ExpressionUUID->"d896f028-eccb-4ef2-988b-6a7e9b0e3e27"],
-Cell[2286458, 46823, 529, 11, 24, "Print",ExpressionUUID->"dbee16e9-9956-4c34-b23a-8fa37f409128"],
-Cell[2286990, 46836, 531, 11, 24, "Print",ExpressionUUID->"e676c012-a4c6-4953-90bd-224568353817"],
-Cell[2287524, 46849, 529, 11, 24, "Print",ExpressionUUID->"dc5e52e2-92a9-45ec-8395-a9cf7f422b37"],
-Cell[2288056, 46862, 531, 11, 24, "Print",ExpressionUUID->"3ab2b64f-f0b7-4977-bf1d-7a0531297e92"],
-Cell[2288590, 46875, 529, 11, 24, "Print",ExpressionUUID->"7d1e18f1-81b5-4def-902f-f07f5c784261"],
-Cell[2289122, 46888, 529, 11, 24, "Print",ExpressionUUID->"4b5c0666-679b-45ab-8f9c-57ef999a253e"],
-Cell[2289654, 46901, 279, 5, 24, "Print",ExpressionUUID->"d4b21011-912e-41ab-8f93-a111da7aa8f6"],
-Cell[2289936, 46908, 474, 10, 24, "Print",ExpressionUUID->"16a9d063-9e47-4005-8b9a-4a83ec00a456"],
-Cell[2290413, 46920, 459, 10, 24, "Print",ExpressionUUID->"60607d17-8a34-4d71-8d39-5f6d6f4dc615"],
-Cell[2290875, 46932, 632, 14, 24, "Print",ExpressionUUID->"afa00712-e173-4895-a5f8-fa233ad4295b"],
-Cell[2291510, 46948, 632, 14, 24, "Print",ExpressionUUID->"37ce906d-2da6-487f-842b-f75452bcd614"],
-Cell[2292145, 46964, 632, 14, 24, "Print",ExpressionUUID->"af97715b-8780-4377-88e2-aec6617418f0"],
-Cell[2292780, 46980, 632, 14, 24, "Print",ExpressionUUID->"8957ac75-5a1e-4107-aa6f-de7b162718e5"],
-Cell[2293415, 46996, 636, 14, 24, "Print",ExpressionUUID->"74454467-d658-4fc9-aa06-a309b7b0df38"],
-Cell[2294054, 47012, 636, 14, 24, "Print",ExpressionUUID->"daf03625-85f6-44c4-a69b-3ca42a374fb1"],
-Cell[2294693, 47028, 636, 14, 24, "Print",ExpressionUUID->"504ce6be-8fdf-43e3-aede-6d18388e9714"],
-Cell[2295332, 47044, 636, 14, 24, "Print",ExpressionUUID->"a4d9beca-397c-4845-9373-6d4f19730fcc"],
-Cell[2295971, 47060, 636, 14, 24, "Print",ExpressionUUID->"bc085677-7c1a-48f4-9cd5-dac4e0259c00"],
-Cell[2296610, 47076, 638, 14, 24, "Print",ExpressionUUID->"4610ee3c-edec-4f45-a932-7994ef64cd37"],
-Cell[2297251, 47092, 638, 14, 24, "Print",ExpressionUUID->"54d75cf0-4e08-413c-be98-fdfd4703d4d9"],
-Cell[2297892, 47108, 638, 14, 24, "Print",ExpressionUUID->"3a41706a-380e-454e-a7f2-692e44ff77cc"],
-Cell[2298533, 47124, 637, 14, 24, "Print",ExpressionUUID->"1d2a71d1-aaa2-4ad1-9129-b78664e7eab1"],
-Cell[2299173, 47140, 637, 14, 24, "Print",ExpressionUUID->"074c3978-eaf7-434c-ba91-2c3141f81334"],
-Cell[2299813, 47156, 638, 14, 24, "Print",ExpressionUUID->"930c5b8f-719c-4dbf-958a-62d68fc46958"],
-Cell[2300454, 47172, 638, 14, 24, "Print",ExpressionUUID->"e4634487-cc5a-4ab4-a1c6-1721aee36cc1"],
-Cell[2301095, 47188, 638, 14, 24, "Print",ExpressionUUID->"530f44b3-f7af-4032-a329-45c7bc81f7e4"],
-Cell[2301736, 47204, 640, 14, 24, "Print",ExpressionUUID->"12f670a2-9c97-4115-b9b4-bd4acc18878c"],
-Cell[2302379, 47220, 637, 14, 24, "Print",ExpressionUUID->"7b783d4c-0b65-4266-a396-41f3281ec481"],
-Cell[2303019, 47236, 187259, 3573, 296, "Print",ExpressionUUID->"4c5ec22e-95a1-49ef-b741-eeca0945f7d7"],
-Cell[2490281, 50811, 183326, 3560, 296, "Print",ExpressionUUID->"037fbb3c-8ef3-40a2-bf6f-febd812ea256"],
-Cell[2673610, 54373, 199625, 3826, 296, "Print",ExpressionUUID->"1c7a87a3-12b5-4e99-98f7-bb172de020c1"],
-Cell[2873238, 58201, 192007, 3701, 296, "Print",ExpressionUUID->"44b86e37-6b82-4b3e-90a7-933c9b9fbe25"],
-Cell[3065248, 61904, 38642, 778, 296, "Print",ExpressionUUID->"0eb43952-0016-4696-bef9-7b319c25a78f"],
-Cell[3103893, 62684, 632, 14, 24, "Print",ExpressionUUID->"766fb175-9f43-40a7-a5e5-7ae88f42ca9e"],
-Cell[3104528, 62700, 632, 14, 24, "Print",ExpressionUUID->"ec0fb198-e97b-4d93-badd-f6f811bfb205"],
-Cell[3105163, 62716, 632, 14, 24, "Print",ExpressionUUID->"673a7784-fcd3-4fb3-92f8-09c499f0c71a"],
-Cell[3105798, 62732, 632, 14, 24, "Print",ExpressionUUID->"68382b7f-5248-4c77-9adb-5891b620572f"],
-Cell[3106433, 62748, 638, 14, 24, "Print",ExpressionUUID->"c39cb91c-e010-4491-8ab6-96f908294232"],
-Cell[3107074, 62764, 636, 14, 24, "Print",ExpressionUUID->"70c97ea7-6872-494c-9439-0c17e4ba8bee"],
-Cell[3107713, 62780, 636, 14, 24, "Print",ExpressionUUID->"d706ff73-2406-4c4a-9b0a-56c0010a9d52"],
-Cell[3108352, 62796, 636, 14, 24, "Print",ExpressionUUID->"ba57c76e-baf2-493d-9c2f-c4f85d55f7bc"],
-Cell[3108991, 62812, 635, 14, 24, "Print",ExpressionUUID->"01fed162-eccc-4fa8-a388-c381955985df"],
-Cell[3109629, 62828, 638, 14, 24, "Print",ExpressionUUID->"cdf96293-a47a-4694-9cf7-7c3eee562208"],
-Cell[3110270, 62844, 638, 14, 24, "Print",ExpressionUUID->"6e7bbe49-623f-4b6c-a034-a39d6aa7ba23"],
-Cell[3110911, 62860, 640, 14, 24, "Print",ExpressionUUID->"13429c38-2497-43f2-b673-70aa019a9f5d"],
-Cell[3111554, 62876, 638, 14, 24, "Print",ExpressionUUID->"6c327368-c9b9-4ae3-949a-593fb2b77007"],
-Cell[3112195, 62892, 638, 14, 24, "Print",ExpressionUUID->"47e85b11-c505-4659-89e4-33b60d35abca"],
-Cell[3112836, 62908, 637, 14, 24, "Print",ExpressionUUID->"f3fde698-e9e2-4581-812a-b0bde8dcf250"],
-Cell[3113476, 62924, 638, 14, 24, "Print",ExpressionUUID->"415d3b58-6c3b-419e-a420-fd69f60e69a2"],
-Cell[3114117, 62940, 640, 14, 24, "Print",ExpressionUUID->"f9ef4194-ebb3-4cb6-a5f8-07187185012c"],
-Cell[3114760, 62956, 640, 14, 24, "Print",ExpressionUUID->"4c972635-8329-42e5-9eee-204cdd18f466"],
-Cell[3115403, 62972, 638, 14, 24, "Print",ExpressionUUID->"1aebfe8a-7e86-4a40-8242-1b5cd17fc43d"],
-Cell[3116044, 62988, 279, 5, 24, "Print",ExpressionUUID->"ce56c22a-c969-4120-8ab3-76908cd7cb8f"],
-Cell[3116326, 62995, 496, 10, 24, "Print",ExpressionUUID->"b2ad0c55-c228-4dd8-afe1-596ac3e8de27"],
-Cell[3116825, 63007, 525, 11, 24, "Print",ExpressionUUID->"3f8774c5-285b-44f4-88e8-0185fa11c1a4"],
-Cell[3117353, 63020, 457, 10, 24, "Print",ExpressionUUID->"e93aab79-e7b3-4dbd-8e2b-1c90b2aa247c"],
-Cell[3117813, 63032, 398, 7, 63, "Print",ExpressionUUID->"5a36d2f5-f14d-44c6-9613-e31cb7d50f4f"],
-Cell[3118214, 63041, 295, 5, 24, "Print",ExpressionUUID->"b6a2c1c9-b900-4fe8-a272-adf23b8f05ac"],
-Cell[3118512, 63048, 284, 5, 44, "Print",ExpressionUUID->"9c92fc32-0f89-45c0-afd7-d26c1b8ab947"]
-}, Open  ]]
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbf/cgdhei/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961555497707*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"ad8e8712-859a-4105-b3f2-bea626e99d7e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbf/cgdhei/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.78196155550082*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"6adec58a-9001-4755-bac4-755211d39c22"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7819615555093107`*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"a702aa91-626a-43ac-84af-7eb65a2c3820"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbg/chdfei/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961555512003*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"8c04e0f3-fff0-4878-adeb-86d45c0497b5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdfei/fjghgjhiij.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7819615555143833`*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"b7e8938f-27ff-408a-a41e-cd0d04558ece"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.7756859651455563, 12.307331579087336}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2243140348544435, 7.307331579087334}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.35680734900121, 15.595086868322632}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.31406512997668, 9.373369816204487}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8lGsbB/DHGkIOstNI2YozGjvViKiIic5YjmUQKZS0vpQtpcWWpFJq
+HJLTaiehKU4kSrK0nRqSSMugQqH3dx//zOf7ee77uq/rN888A+2g7e4hwhRF
+aQpRFHmlBL/wo8qk5Ai0mJTKbLhzuhqTonHitE3huuyq2EXqTErQJBW3Abbt
++WXQAFN9ngw2XCFx6QFbg0lx1HdvsYO9pLY+H4YF/JE/FeDMIH3FnZqo98XG
+sx2v1zZ9u/AZryVdT67swGuhRtsyb6zjHZ2XKQJ/dZtcWQKz9HbPSUGd4vhG
+yTE46lDQdYqcc8/yluYC1HdafWQ3+ih8bhrKgDlv1nd+QN/JExwlU5hl9p0X
+Amd36JRpw1G6dS4jmJOzQEgwS+qf3f4zHm7TcLJ4TM6f43VTD45Y5RSbQ65/
+YR54p8KkNESL5Uh/NJFlx2/DYX+fj1OHBV7WU1fgqNjp9f3oO2HO2u5yYvO1
+z0phzpYctW6YsqpUSYf5WwrrpFF/0+pFiTEkD3pAvSfMqvze9T+Yvmn7+jLY
+kkufS9ZzrAK/KaP/IcOVVjVkvfDAPwdhTqhdyiQs56WaJoAproexK/phalXI
+epP3SU2QUA13qB21rYEVvebOmGB+5oRRpCTyc/imv7kWpnl4pa+BW7L+2qNL
+w/sU/IoVDQ9NSxdHw4L/bXdJhumcxCN34IQ7V1UPwIdbHJ9IaWOeXptAX7h/
+vMfFHZbzP/ZmIayh1vD5JMwNb/ftxPkXhhqG22Ees+lsJLxxiXPjLMwKnjCZ
+RP9bk+KCFy9Ev+N1u/bAhT6faXZwVEOR+SfkoXv4cfMGmBa7IS8QlgpYdN4T
+5qx/8P4Z8tVf+IrtAQs4r8y84JYRYS1H4oE7rAFlJsVW9NxnApcs99ubqEzu
+x1ZbZVKveDedAd9Pyo+b0ia5Hl80rcSkcs9L7H0BM88vEXoNHzadF1lH5q1/
+FPocTiiUzcuH6cYK/Z/gjcXJtFQyj8E5gSrqrUoJ7T1AnOj925/wvf19Hvtg
+yj3vzXW46FnQg/3Ej2ssZNFv59SFX8fJeSeqg/fCWTY664qIb9i5DsCDv9qT
+H8IJyodvuWF+F4bH/J8kX/WXeyvgbcvqRxmYh76ytEAG+bXoFl7dBfM7Y7vY
+sINQQfxtWC7UwzUVlmUHh4nrYH4NN8OrMHtftKkHnHCRv7sUbpocz7sIy+W8
+cboAW/ubBA/DXJHA1h2wY8KMv/EirDcTWBrBcuVvL0bAzP22TzvRD/ur3oG/
+YH7Xw6YQeGCoovgR3OF7S/gD5nGsN1sugOXEx2ib4I2xjc3ii1G/r572HPm8
+2FjvIk98/Zq1K6x767STApwpYVzUgrzTMwovScElpeaB62FDF5m6KdTjpHr8
+4M9nUrUHwq36YVZdVEAKvLT2nMJ9WOAcVm4Pu+/KiL5M+j2ycKkKLH9a+OwR
+sv5m5Q8x+FmkXFs4zCs6vEIGDoq8ae1B+r36TcQIlorUGGTC1IZLrsHw/VpG
+qjmcOfPR+DqsWJifbUbqb87oE0d/sxGVQivJ/j7/yXA44lhMCKlHq1A51gu/
+GEp7GU3WP43e7IB5C8XG5uSRfgRaHuR+qbn/We0Jya8/xFoGea048vS5DObn
+3J4ID4Bj1Jdf20C8gNt6kTx/zrGu58KsJ7VTrXCXnglvEBbcS0l8DatlPC1i
+6KL/f7uHyeen1tpKLR4WaA48uAXzQ6Tf3of53u1tieR5F31yVEIPdXtcryyD
+XRwmd9rDtFELxcfoL/382PAu4gLnsz6wRC1ldp6441Ec+bwY98QV1sB0xeAs
+FizVrTbzABZ8pH1vQl6pjR6xHTDXYOGwDRwd9KGjDZZ79zS9VhH7b/lr8kg9
+9q7q1XCDflvfVbJ/QuFanwKeP/suC07AnBhnKgsuviPrQ/qhzHPDveGk8fg/
+/iD1F8pes4JDhwYNLEi9OdE7GXCEndh8DbhDpD3AET7zz3KGOJl3T/KvKLhr
+dUvYBPKgXxnnl8CucxzWj8Il6k+uCaMfntohtW8wZ5/DuiB40oZ9UQT7+S/1
+5j6E2TYN5ppwyaGc1xaYL9Rdr8mOnK9yOaUAbtHLqogi8zoI90ggH9HnzaJ/
+wwkHx/4NgvfvXOMyDLMUM4yuw+YqCW2/66Ofg43Tb2HenQsHY2BmxlK2KPLf
+ynBa1Qxz0uQspOGvPwwbFQyQxxnVSz+wfptsdqMfLDg1WPMY9vraqV4Ac59R
+ealwq+TRnj6Yz7VLZJDzZztXqxhi/bvfDzajX9Fj2+avhjOF2KkucMlvyt6b
+4RL3n3rNmDd3+kBOHMwdlnK3hWcld7Yeg+k/rOxKkd8RDbEtqYbk+7LCeAls
+GZjrlUzsc13zpjzm0DUb2knstPySHUx74XrXF5b71dIw+BvquvR3M0k/dkrn
+8uH00M3OC2GOX3f8LvjFroJgEZgWqnSTA6/btmbTIJk/p8w7FC7z2RrXDmfu
+tc1LhlklT6tqYfrStLRbcK6kZcdNsr4pZa0wzm/aSre8QfK5sEztTzjX/tFE
+FcmP0Zt7B64rDy9uhRN09g4ZYh7/EZPIYZipn9NzGhZvPDcqT+bv0tITQh5e
+/aKRjnAUS7wxEA71XHA1CWYuch6tIPfPia8q98l8RdNHv8NjWe+6ZZfASTo6
+Osg75+VYsw9ccueSmSUsobyj7DJMjzhtaQpv0jZzHYdZRztKleBZ5WVBNksx
+zwtFGz7qRZjGvzxA3H8qNgs+fOLu2xqY5zVfiU7uZ86cbx9gvvuW1Dr0z2xc
+/kHeCP2a5qjawjmOGXPpxNYqyeWYf9BnsdIqmNu27oMeLCs/tWItTNmrH7+A
+PHMms+mOMK3MN00DHjzBF7GG+RO0liI5fD8V25vqwnJqUel28KOh/AxpUk9q
+sVDfPHzeFV8t/IJ+aCNtDyLgrYf+1ukg/Z5+pGAI81xuPSuFmQUbQ9Tg9Bsa
+iTlkPnEnzeXwMSdR2wQyT7xSTAZMXekejYKjHHh/iuM8nyuZK7cSe4tpe8J1
+fweFRJJ6E6K/KmHRjzpWsXDm0XNuWujf9RVLMxvuOJkhfhwO6+FPV5P90apD
+38n9c17PZZDsr4+864s85OxqZLWMyP32nlsN69tL9fsZkef1zrkiyPMvxjbp
+QuIVU0ttiE+UZHwm+cjXC/nByaX5K2yM8X4LCfaEwuZKuV0psFyGaiIb1pWZ
+kemEuScC9Yzgz0klPOXf0V/GqoMjOC9oc+I4G+aeuVxxEqZn7B1Pg/nG31v1
+4fvey0Jvwwnc6YIb6N8/LsXrNVkfYXjPAO4Y/WfNd5gX1aN+EXkYSijnCNGx
+/2T+OwXYfV5ZtTCdfJ9FV5D8qexnozNYTxOvENGWZVL7FnhNfyLuGpiwl8Hv
+R5UGjF6YGbQl97g0fj8aZiWT8zl1fmGzc/E82FUhn0fO+xQvnQ9n6kstiIOp
+suale+BXRYlfOKTetYfr4+CBbabVTqT/Yf32atg3ZFOcKfEig3Et1A9SPypt
+QOYJH1a7ARdxVbp1ib+6ffFDP5+tXr43JvVMVtYuRr+P9He+syPX7W7e+wmH
+bsueDCDnt1ZWdmM+LYFZ1xHSn0D8+EbM79v8uIr0L7hR2UPul68iydETZH9i
+2Iwk8tsg9clWE/kIsrltLvBEq90+O5LXFqv2GHi6tTZgM8y0fhl2At6f39Cd
+BnP8BWIZsJXQjapyuIP5RWUnbKzLeNcLU5IrDFfAAYnr2VNkv31UxyjOn9x4
+WkPZBO/zgMbFTPiuq3M0HWZ6iM/VguOr8u46wLQ1B4/aYp7YIdmrHjB1tU9p
+KealP4iW9IP5MuNjisinripxnEPWjzXlCiG/Ev3+2gA4YaVn0LQUk9p+vHLI
+m7hIUmwe7N/SbsH677xY21WSTGqK0ZpqT/bPdwnKk2BSr813fDQljqmh6cI9
+wjejFhP3bDHjz8Hz2rLEVgnm5suubYeffzoTJUHstP3fj3BAma/mDMnnGc/d
+FvtzK6ytvpE8HaZFqmE/Z59ToyQfjsT/2Djf+etE1xhZzzl7TR79CYkmhf6X
+V+HToH7YbvOXODHU5x2WSruN+6fxWZIyyY+3NLTqJOadeSz/2Yjk8fTFLg7y
+UFr9NGUtmXf59efKyKuJfdB8C1nv1fSqRJb8/du8IJXMb81s0EG+vW/8HEvJ
+9SALn63w5X86s3tJvQ9y4QnwximT4RmSv8KN6mDY295RW2cZ+X6MWqIIm5o/
+13WEOapKvSdRX+3Tjp8hMG1h+ItB9JNrrdCYCDPPllsowKdkD7WfIdf3NWTR
+0P9KblPeFZir7/laGfO1jq77UkWuq5z6KYz53UoFNfUwT0fL7SPyc3NnGd0h
+9bb9y3qNvJX9/6q5TfZ3jKi9FWdSOquWTJcTJ22fFoFvG0Y0F8NUjMz8tWJM
+qvwiZ945YmvDmRpRfB9c0Bs4TvrfeD3OC3YeSQnZT/YfXBNoCIcVP6yKJP1w
+o1x+h20s94xxSD+pLrwQ2FLVW8uT7I8aXNwKN689QttAfE7wjY3z7gdeqnQj
+9Vpiv4qin1jND2EepH9XtfiH4uTv+TXpviTPJ4s+cDHPPvbrFeFkf5zJcAzm
+rU967xlP+r3wx6wr7peY5cv2k/x49+JHyP0iqyir8l9e3dra9fB+t8Obe8l+
+sfjFq5Hne9eiuJ9k/SxTUAB7hWzz0GagH8Ye8y74aJXMAyc4Ib2xoBOWvv/+
+diRMyQbM5sEb7r2VyYI55q6mFrDi1oSycnLd3HtDPs4zHDSofQIzUxb496E/
+vW9s3xEGeV6VGcyi/xny/xti8v8bCeb/ATaALY8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.538487526462115, 3.720262579386344}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Q00VFkAB/BHlomhYUeEagjJx6Yisy3rrSjfjTGWRCFKPiclaiUrIpVI
+MhV71J7aSWyIQmHalI9tmSjJKi9Jg8iuZte2yv5fO+fMeec37757///77sEw
+LJ4foUgQxB586SsxM4fPIvL/qyVJiLffs1PRIwlp6jtBBUx6NfhN4r7xXIfD
+Flh2IMu+FpZsCAhUh7l/8YuDYWaHi0arBUlwJk72j+mShKVHOu8YzEgRvAiF
+zYpa04LggP1v+9p0SGL2/BkXe5hnVNllChvczt9rASeLpILDC/FcWrayOSzW
+sWSOaGP85KCOHUymSclv4TeRPnIe3Jabk9LPxu+9rjaJMNfG2TwZttyW8biU
+Xl9zt+samPm3klAK1408X6kBtyyUhRLIrzusnzAfNhDHKVnBDFvfh8tginCl
++LBQl80PhG38bAbjYJH1ZzvE8EAYNzkVplwMrRjII/pntOcQHMnra0+ApVad
+I7thjkboXQo2m9uUJqD3c/aW0B39WC77vczo+Qqjd4hpX9nQNYl8Mu8mahoW
+X+W4lMES/5vGy7E/ut4Vx4Nh3VmzbgfY7Oj9GTW6/+adRrZwQD1lWG+O/los
+FhPOjsupjoRZa8sj7mI+a/fXq5fAZGhgdTCcfWJh78AK5Dy1zGSQzicJ9PwJ
+Tmtg+HjBeVRB8SG4stv42c/oG1Nmo7KTdm+QiRocctD3XTD9/Idp6a7PkVeh
+b2I7bM0cD+/WIonTXbqXk+jxq736PGDR70dVi+C8RqH1gCaeC4oPbabHhzSb
+Z8Plc2PCCVjc/mSGD7P91lQsRl6pb4/W13Aea1u0J0xVOxi5wZXRb7T30eaN
+KyfAGSfYIUVwpPoueQ0s3MpMrIDFKvwKJtYPv57LuQH3rU9vSYBZ49GT1+DS
+kD8VKdj46BbHc/T+UYs6PNHHfuqVTyJM6LPSq2BW5sjXTnDyEh9lFfSX9T0Z
+VYTNnFjMjXCyXsereuSfUtiaEgMz3I/wouDsMnbjHng4YeKSDkx8SBymz5Pg
+olbuPTO8P8/CR4ZwpFG/OAl2rVZy6MB6ARHMwFWwxLwi3R+efd0iki/Hekst
+T3YiLyde3nIfFk/F59jCkf9uzbwM56lmphegf8wR2bVCeEo/Q3mKRRJBzy47
+nIYpC/cGPhyp+43HBZinye7OXID9+eWqyS1Y0l/+Za4G3kfd4bBBWErNfN+u
+jnlNriqqIQ9FPRI7wnUq3JJ1MEcwHSJnIq/EMy8Kto492zkOU3VLbIvo/MUb
+kzgYL1F0YjfCLG27iBPwbR8vnacweaYyZQXWq5tZUCujnx9J+iiDa+JfaI/B
+pf6K1k3Il6c474sBevxvDJYX8gc4nXvQBHMPBDbdgOu6Y384Re9fctBNNvoH
+LXcw3gwTjkvtQuC6d/YlbDr/NbdP+0M1j4+0op/wIpdbBocfUxXso/fToi7/
+Aux5RengMjhtsjs7GQ5RFzJ7TPGeyZTXK2HRnaycbLhU7GTfgfUNTPPNN8Li
+1vJaD1iYqFCiCVuHFj/Yg/wDS+SyURPM5zw4uhb9pGWGmx7CPIusA2+xX6KX
+Q3ZtsET0/kG5Gq5F4Vad8BQjbPygKvoK7YdewJw0xxbhfJzPx2xnBcwvHRoN
+y2fg/LYFnV0BV85jrx9Vwd+/ar7YH6a857WnwgLuuldZcFooc0QAhzeZXroB
+T61JmIyCJe/T+RQ9XkPxx9uwNDGiVAH9Q6qGYp0w/17vnnod+rz0Wnf9ASez
+vKI4MFniP92IPBmFoQ56cOV4Y5SIzut2uEAJ5kRlzOxGH84dedkg5heWtsR8
+hb4tN32Ly2HeoH7qCOz8+Ll7LMxK9TuzA+ejctN+N2M6r2PzkSrYterX2kfo
+n5eioSehz9/LS2rpMFFz5btcuMZAb3olff/W8TgDeNjEgDlkjPvUdV4s5i+O
+Kmg4D7NqBsaykIe3tE2+Dc4r4i3Yh7zcjy8Xr4JJHwt1Z/Tp05U9ZdHj6X+S
+6PvpY0z+BxWKgGg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.578757510903266, 13.026566380408571}, \
+{1, -1}], LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 10.4}, {13.9, 11.6}, {13.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 8.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 14.5}, {6.500000000002592, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.9}, {9.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 11.6}, {6.9, 10.4}, {6.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.55424990759769, 9.30053848023783}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}], PointBox[{6.5, 14.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.7756859651455563, 12.307331579087336}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2243140348544435, 7.307331579087334}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.35680734900121, 15.595086868322632}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.31406512997668, 9.373369816204487}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8lGsbB/DHGkIOstNI2YozGjvViKiIic5YjmUQKZS0vpQtpcWWpFJq
+HJLTaiehKU4kSrK0nRqSSMugQqH3dx//zOf7ee77uq/rN888A+2g7e4hwhRF
+aQpRFHmlBL/wo8qk5Ai0mJTKbLhzuhqTonHitE3huuyq2EXqTErQJBW3Abbt
++WXQAFN9ngw2XCFx6QFbg0lx1HdvsYO9pLY+H4YF/JE/FeDMIH3FnZqo98XG
+sx2v1zZ9u/AZryVdT67swGuhRtsyb6zjHZ2XKQJ/dZtcWQKz9HbPSUGd4vhG
+yTE46lDQdYqcc8/yluYC1HdafWQ3+ih8bhrKgDlv1nd+QN/JExwlU5hl9p0X
+Amd36JRpw1G6dS4jmJOzQEgwS+qf3f4zHm7TcLJ4TM6f43VTD45Y5RSbQ65/
+YR54p8KkNESL5Uh/NJFlx2/DYX+fj1OHBV7WU1fgqNjp9f3oO2HO2u5yYvO1
+z0phzpYctW6YsqpUSYf5WwrrpFF/0+pFiTEkD3pAvSfMqvze9T+Yvmn7+jLY
+kkufS9ZzrAK/KaP/IcOVVjVkvfDAPwdhTqhdyiQs56WaJoAproexK/phalXI
+epP3SU2QUA13qB21rYEVvebOmGB+5oRRpCTyc/imv7kWpnl4pa+BW7L+2qNL
+w/sU/IoVDQ9NSxdHw4L/bXdJhumcxCN34IQ7V1UPwIdbHJ9IaWOeXptAX7h/
+vMfFHZbzP/ZmIayh1vD5JMwNb/ftxPkXhhqG22Ees+lsJLxxiXPjLMwKnjCZ
+RP9bk+KCFy9Ev+N1u/bAhT6faXZwVEOR+SfkoXv4cfMGmBa7IS8QlgpYdN4T
+5qx/8P4Z8tVf+IrtAQs4r8y84JYRYS1H4oE7rAFlJsVW9NxnApcs99ubqEzu
+x1ZbZVKveDedAd9Pyo+b0ia5Hl80rcSkcs9L7H0BM88vEXoNHzadF1lH5q1/
+FPocTiiUzcuH6cYK/Z/gjcXJtFQyj8E5gSrqrUoJ7T1AnOj925/wvf19Hvtg
+yj3vzXW46FnQg/3Ej2ssZNFv59SFX8fJeSeqg/fCWTY664qIb9i5DsCDv9qT
+H8IJyodvuWF+F4bH/J8kX/WXeyvgbcvqRxmYh76ytEAG+bXoFl7dBfM7Y7vY
+sINQQfxtWC7UwzUVlmUHh4nrYH4NN8OrMHtftKkHnHCRv7sUbpocz7sIy+W8
+cboAW/ubBA/DXJHA1h2wY8KMv/EirDcTWBrBcuVvL0bAzP22TzvRD/ur3oG/
+YH7Xw6YQeGCoovgR3OF7S/gD5nGsN1sugOXEx2ib4I2xjc3ii1G/r572HPm8
+2FjvIk98/Zq1K6x767STApwpYVzUgrzTMwovScElpeaB62FDF5m6KdTjpHr8
+4M9nUrUHwq36YVZdVEAKvLT2nMJ9WOAcVm4Pu+/KiL5M+j2ycKkKLH9a+OwR
+sv5m5Q8x+FmkXFs4zCs6vEIGDoq8ae1B+r36TcQIlorUGGTC1IZLrsHw/VpG
+qjmcOfPR+DqsWJifbUbqb87oE0d/sxGVQivJ/j7/yXA44lhMCKlHq1A51gu/
+GEp7GU3WP43e7IB5C8XG5uSRfgRaHuR+qbn/We0Jya8/xFoGea048vS5DObn
+3J4ID4Bj1Jdf20C8gNt6kTx/zrGu58KsJ7VTrXCXnglvEBbcS0l8DatlPC1i
+6KL/f7uHyeen1tpKLR4WaA48uAXzQ6Tf3of53u1tieR5F31yVEIPdXtcryyD
+XRwmd9rDtFELxcfoL/382PAu4gLnsz6wRC1ldp6441Ec+bwY98QV1sB0xeAs
+FizVrTbzABZ8pH1vQl6pjR6xHTDXYOGwDRwd9KGjDZZ79zS9VhH7b/lr8kg9
+9q7q1XCDflvfVbJ/QuFanwKeP/suC07AnBhnKgsuviPrQ/qhzHPDveGk8fg/
+/iD1F8pes4JDhwYNLEi9OdE7GXCEndh8DbhDpD3AET7zz3KGOJl3T/KvKLhr
+dUvYBPKgXxnnl8CucxzWj8Il6k+uCaMfntohtW8wZ5/DuiB40oZ9UQT7+S/1
+5j6E2TYN5ppwyaGc1xaYL9Rdr8mOnK9yOaUAbtHLqogi8zoI90ggH9HnzaJ/
+wwkHx/4NgvfvXOMyDLMUM4yuw+YqCW2/66Ofg43Tb2HenQsHY2BmxlK2KPLf
+ynBa1Qxz0uQspOGvPwwbFQyQxxnVSz+wfptsdqMfLDg1WPMY9vraqV4Ac59R
+ealwq+TRnj6Yz7VLZJDzZztXqxhi/bvfDzajX9Fj2+avhjOF2KkucMlvyt6b
+4RL3n3rNmDd3+kBOHMwdlnK3hWcld7Yeg+k/rOxKkd8RDbEtqYbk+7LCeAls
+GZjrlUzsc13zpjzm0DUb2knstPySHUx74XrXF5b71dIw+BvquvR3M0k/dkrn
+8uH00M3OC2GOX3f8LvjFroJgEZgWqnSTA6/btmbTIJk/p8w7FC7z2RrXDmfu
+tc1LhlklT6tqYfrStLRbcK6kZcdNsr4pZa0wzm/aSre8QfK5sEztTzjX/tFE
+FcmP0Zt7B64rDy9uhRN09g4ZYh7/EZPIYZipn9NzGhZvPDcqT+bv0tITQh5e
+/aKRjnAUS7wxEA71XHA1CWYuch6tIPfPia8q98l8RdNHv8NjWe+6ZZfASTo6
+Osg75+VYsw9ccueSmSUsobyj7DJMjzhtaQpv0jZzHYdZRztKleBZ5WVBNksx
+zwtFGz7qRZjGvzxA3H8qNgs+fOLu2xqY5zVfiU7uZ86cbx9gvvuW1Dr0z2xc
+/kHeCP2a5qjawjmOGXPpxNYqyeWYf9BnsdIqmNu27oMeLCs/tWItTNmrH7+A
+PHMms+mOMK3MN00DHjzBF7GG+RO0liI5fD8V25vqwnJqUel28KOh/AxpUk9q
+sVDfPHzeFV8t/IJ+aCNtDyLgrYf+1ukg/Z5+pGAI81xuPSuFmQUbQ9Tg9Bsa
+iTlkPnEnzeXwMSdR2wQyT7xSTAZMXekejYKjHHh/iuM8nyuZK7cSe4tpe8J1
+fweFRJJ6E6K/KmHRjzpWsXDm0XNuWujf9RVLMxvuOJkhfhwO6+FPV5P90apD
+38n9c17PZZDsr4+864s85OxqZLWMyP32nlsN69tL9fsZkef1zrkiyPMvxjbp
+QuIVU0ttiE+UZHwm+cjXC/nByaX5K2yM8X4LCfaEwuZKuV0psFyGaiIb1pWZ
+kemEuScC9Yzgz0klPOXf0V/GqoMjOC9oc+I4G+aeuVxxEqZn7B1Pg/nG31v1
+4fvey0Jvwwnc6YIb6N8/LsXrNVkfYXjPAO4Y/WfNd5gX1aN+EXkYSijnCNGx
+/2T+OwXYfV5ZtTCdfJ9FV5D8qexnozNYTxOvENGWZVL7FnhNfyLuGpiwl8Hv
+R5UGjF6YGbQl97g0fj8aZiWT8zl1fmGzc/E82FUhn0fO+xQvnQ9n6kstiIOp
+suale+BXRYlfOKTetYfr4+CBbabVTqT/Yf32atg3ZFOcKfEig3Et1A9SPypt
+QOYJH1a7ARdxVbp1ib+6ffFDP5+tXr43JvVMVtYuRr+P9He+syPX7W7e+wmH
+bsueDCDnt1ZWdmM+LYFZ1xHSn0D8+EbM79v8uIr0L7hR2UPul68iydETZH9i
+2Iwk8tsg9clWE/kIsrltLvBEq90+O5LXFqv2GHi6tTZgM8y0fhl2At6f39Cd
+BnP8BWIZsJXQjapyuIP5RWUnbKzLeNcLU5IrDFfAAYnr2VNkv31UxyjOn9x4
+WkPZBO/zgMbFTPiuq3M0HWZ6iM/VguOr8u46wLQ1B4/aYp7YIdmrHjB1tU9p
+KealP4iW9IP5MuNjisinripxnEPWjzXlCiG/Ev3+2gA4YaVn0LQUk9p+vHLI
+m7hIUmwe7N/SbsH677xY21WSTGqK0ZpqT/bPdwnKk2BSr813fDQljqmh6cI9
+wjejFhP3bDHjz8Hz2rLEVgnm5suubYeffzoTJUHstP3fj3BAma/mDMnnGc/d
+FvtzK6ytvpE8HaZFqmE/Z59ToyQfjsT/2Djf+etE1xhZzzl7TR79CYkmhf6X
+V+HToH7YbvOXODHU5x2WSruN+6fxWZIyyY+3NLTqJOadeSz/2Yjk8fTFLg7y
+UFr9NGUtmXf59efKyKuJfdB8C1nv1fSqRJb8/du8IJXMb81s0EG+vW/8HEvJ
+9SALn63w5X86s3tJvQ9y4QnwximT4RmSv8KN6mDY295RW2cZ+X6MWqIIm5o/
+13WEOapKvSdRX+3Tjp8hMG1h+ItB9JNrrdCYCDPPllsowKdkD7WfIdf3NWTR
+0P9KblPeFZir7/laGfO1jq77UkWuq5z6KYz53UoFNfUwT0fL7SPyc3NnGd0h
+9bb9y3qNvJX9/6q5TfZ3jKi9FWdSOquWTJcTJ22fFoFvG0Y0F8NUjMz8tWJM
+qvwiZ945YmvDmRpRfB9c0Bs4TvrfeD3OC3YeSQnZT/YfXBNoCIcVP6yKJP1w
+o1x+h20s94xxSD+pLrwQ2FLVW8uT7I8aXNwKN689QttAfE7wjY3z7gdeqnQj
+9Vpiv4qin1jND2EepH9XtfiH4uTv+TXpviTPJ4s+cDHPPvbrFeFkf5zJcAzm
+rU967xlP+r3wx6wr7peY5cv2k/x49+JHyP0iqyir8l9e3dra9fB+t8Obe8l+
+sfjFq5Hne9eiuJ9k/SxTUAB7hWzz0GagH8Ye8y74aJXMAyc4Ib2xoBOWvv/+
+diRMyQbM5sEb7r2VyYI55q6mFrDi1oSycnLd3HtDPs4zHDSofQIzUxb496E/
+vW9s3xEGeV6VGcyi/xny/xti8v8bCeb/ATaALY8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.538487526462115, 3.720262579386344}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Q00VFkAB/BHlomhYUeEagjJx6Yisy3rrSjfjTGWRCFKPiclaiUrIpVI
+MhV71J7aSWyIQmHalI9tmSjJKi9Jg8iuZte2yv5fO+fMeec37757///77sEw
+LJ4foUgQxB586SsxM4fPIvL/qyVJiLffs1PRIwlp6jtBBUx6NfhN4r7xXIfD
+Flh2IMu+FpZsCAhUh7l/8YuDYWaHi0arBUlwJk72j+mShKVHOu8YzEgRvAiF
+zYpa04LggP1v+9p0SGL2/BkXe5hnVNllChvczt9rASeLpILDC/FcWrayOSzW
+sWSOaGP85KCOHUymSclv4TeRPnIe3Jabk9LPxu+9rjaJMNfG2TwZttyW8biU
+Xl9zt+samPm3klAK1408X6kBtyyUhRLIrzusnzAfNhDHKVnBDFvfh8tginCl
++LBQl80PhG38bAbjYJH1ZzvE8EAYNzkVplwMrRjII/pntOcQHMnra0+ApVad
+I7thjkboXQo2m9uUJqD3c/aW0B39WC77vczo+Qqjd4hpX9nQNYl8Mu8mahoW
+X+W4lMES/5vGy7E/ut4Vx4Nh3VmzbgfY7Oj9GTW6/+adRrZwQD1lWG+O/los
+FhPOjsupjoRZa8sj7mI+a/fXq5fAZGhgdTCcfWJh78AK5Dy1zGSQzicJ9PwJ
+Tmtg+HjBeVRB8SG4stv42c/oG1Nmo7KTdm+QiRocctD3XTD9/Idp6a7PkVeh
+b2I7bM0cD+/WIonTXbqXk+jxq736PGDR70dVi+C8RqH1gCaeC4oPbabHhzSb
+Z8Plc2PCCVjc/mSGD7P91lQsRl6pb4/W13Aea1u0J0xVOxi5wZXRb7T30eaN
+KyfAGSfYIUVwpPoueQ0s3MpMrIDFKvwKJtYPv57LuQH3rU9vSYBZ49GT1+DS
+kD8VKdj46BbHc/T+UYs6PNHHfuqVTyJM6LPSq2BW5sjXTnDyEh9lFfSX9T0Z
+VYTNnFjMjXCyXsereuSfUtiaEgMz3I/wouDsMnbjHng4YeKSDkx8SBymz5Pg
+olbuPTO8P8/CR4ZwpFG/OAl2rVZy6MB6ARHMwFWwxLwi3R+efd0iki/Hekst
+T3YiLyde3nIfFk/F59jCkf9uzbwM56lmphegf8wR2bVCeEo/Q3mKRRJBzy47
+nIYpC/cGPhyp+43HBZinye7OXID9+eWqyS1Y0l/+Za4G3kfd4bBBWErNfN+u
+jnlNriqqIQ9FPRI7wnUq3JJ1MEcwHSJnIq/EMy8Kto492zkOU3VLbIvo/MUb
+kzgYL1F0YjfCLG27iBPwbR8vnacweaYyZQXWq5tZUCujnx9J+iiDa+JfaI/B
+pf6K1k3Il6c474sBevxvDJYX8gc4nXvQBHMPBDbdgOu6Y384Re9fctBNNvoH
+LXcw3gwTjkvtQuC6d/YlbDr/NbdP+0M1j4+0op/wIpdbBocfUxXso/fToi7/
+Aux5RengMjhtsjs7GQ5RFzJ7TPGeyZTXK2HRnaycbLhU7GTfgfUNTPPNN8Li
+1vJaD1iYqFCiCVuHFj/Yg/wDS+SyURPM5zw4uhb9pGWGmx7CPIusA2+xX6KX
+Q3ZtsET0/kG5Gq5F4Vad8BQjbPygKvoK7YdewJw0xxbhfJzPx2xnBcwvHRoN
+y2fg/LYFnV0BV85jrx9Vwd+/ar7YH6a857WnwgLuuldZcFooc0QAhzeZXroB
+T61JmIyCJe/T+RQ9XkPxx9uwNDGiVAH9Q6qGYp0w/17vnnod+rz0Wnf9ASez
+vKI4MFniP92IPBmFoQ56cOV4Y5SIzut2uEAJ5kRlzOxGH84dedkg5heWtsR8
+hb4tN32Ly2HeoH7qCOz8+Ll7LMxK9TuzA+ejctN+N2M6r2PzkSrYterX2kfo
+n5eioSehz9/LS2rpMFFz5btcuMZAb3olff/W8TgDeNjEgDlkjPvUdV4s5i+O
+Kmg4D7NqBsaykIe3tE2+Dc4r4i3Yh7zcjy8Xr4JJHwt1Z/Tp05U9ZdHj6X+S
+6PvpY0z+BxWKgGg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.578757510903266, 13.026566380408571}, \
+{1, -1}], LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 11.6}, {13.9, 10.4}, {13.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 8.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 14.5}, {6.500000000002592, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.9}, {10.6, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 10.4}, {6.9, 11.6}, {6.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.55424990759769, 9.30053848023783}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}], PointBox[{6.5, 14.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4684378539501304, 12.411618926975063}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0315621460498696, 7.411618926975065}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999996362`, 
+          13.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.738470230054478, 15.789812429898827}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.211924601828787, 6.873740025175105}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2HlYzOv7B/BPaVFJ004Lk6VF27T4tk01lEqkkYS0jDptpw5JUkSTREiS
+aKOGE5WiKFRHY7QJSSuOSCiJaFJHiZPf+znXzx+6Xtez3Pf9/swSWgE7PIJE
+KYpSFaEo8pOikb/UWBT1/z+rSzySUvGTtpw2xx4/Y+XSGhepsyjhWmogGE79
+emY5H2ZvmrTdDX/QapX11sD5Y4mjofBIoAh3DOb9dnN6Bdn/LFeYoMmiKnrU
+00TgzQUpeiILWFR6rM9kyXwWNWDdcHQnHMlxPGoHV8RbGLXB3Iy1MQ3zWNRz
+9gYF5YUsSiDlfMEWbrFo1F4FC5e4BN9QZVFrrUN8/eD+His/HTieNVCyDeYI
+7y28qMKiUoq+fGPDtKmVlC7cKHeJZgwz9tQ9q1NmUaFfxZJ/oR7L0+JhCBxh
+93RfM8xwpM3XI17cdSSF9Dd3/cwsOF1DY5crTP+Ycfq7Eur/YkrJk/O5OU1S
+WDefXPSmH/NS4/obzeDWl4F6fJjhrjW4C6bracaVwf0CceUWeEprf9E1OPKn
+bpE++ouYqCtthjne4RU5cEvqj8P/kP07rz2Zg/mKmX2WNqjHy4/9PQH+EJV7
+9+wCkg995BM8z95psQSZV+OmmBvy6i8TTz1M8ht/P3AebuVIm0jT4SC76Bfw
+nRWL/9oIc9rXJPyC/UKzs/+Eqfv8Xmk8D+a52MAxmL6lnfsD67e2X7jF1MK9
++0YyOuDuQ/dckmCauGpAGnzAW0uiQYs8/wVbzWGFCDndaVhg6jDSjP5iAoZc
+dBbh+Rkd9XOFU1mdu1bDdIPgSw2Y9+HYCWMOTPsxqm0Jhz6pTwqHOe9nDlxF
+Xo02pVPENMVxe/J8Us/InwqABacGKyvwPFYWfuCzyf3iUhdc4HU7f3lYwrw7
+fyv+o8iistNSQtXh9F37TGrg9Oqtbj/Rn7DXSSkLPhfzb8gr0v98laqTcID7
+KY17MNtsa+9FmGYzdL0EjvTfp/cEVqnussiBOZWeixRQL9ZrfMcpuCLS3jUU
+/rnxdc1pmHXW3e0x3Ox0Y9YFcj5Vg8FE/2+1j9+tIedDho+Uw1c2JveR+txv
+Vbe1MH/UFr+OOaT/iETjEzAvpT5tFdzOki4dgY9Nf88/DHMNl/5hgzwruFEG
+bWQ9j7F7N/wxPmKe2mLUazQvy4JbLr5RCIUZ/rWSPHhAN7vqJkxvfcw7QfY7
+MHOpJdgvp8/nkP2q6xKc4Ir+hR1q8K0lVZuSYd5s5yA+6ucndgT/RdbLu2e5
+w5y16huG4PTk2zIdmOeWJ3v57KXIl8fmroYlwoouasKU5Jf2OuShwUu8rgPz
+PJLzzGDG1/ApbZjlve2PCuTbXLXviAbMLk49ZEXyt1z/Ugrup9dmding/TbX
+pUNI6pWuyjgI293PSOmCueMXklfDMU2GnlXE6/TClimQ13t13hmY3dGpoA1X
+a3rfi4Ppxc3LmLDE7SGJQJjqsjEOh9MXRUVvIH60K7kC/qofcG8t3P5CKWs2
++nHtW7iCTeY/lz29Hb68l97tR+6zlrzUB8e6z+qLhRm6TxZ5YD6atOGKfJLv
+K8ueBpjjrshpg1nv7pkYIZ8lgcuWkLx4s85QqbBQT0faFU7X9896DqdUyZhl
+wO1xw7I05N0ZZBfXB1fM1/ndGL4sy08x0Ma8g033zGEl+YDvcTBb9b77Qngk
+biasERb6GOwfxX0DPKs8KR30s3PTy8vERwZSnGFaAlvVhdRvus2Nhxm+f3U8
+Rb+e/tHLi+CK620Jm+D3VemPm4nH1M3J+8FPsXXkBcxp8At2gKUVbKvfwe21
+z2/WIL9z7le738DsA8ISC5ixY6P/U1hwr29XvTyLyri85k09nH5Qp8oP5n4w
+tSuBedNRTjQ4XutL/nFyf7e8ygsa6gmct0SQ+n+o/FsHl30u6HGDhfzd5Xfg
+7i8PdpmS+lNqlT1wq4NrpAaZh+4cJIn7LtYteiRL7mNQsu7wB2cXk9lk3VLw
+vRhWMxIMzyHn30lfpZHX01mr++Q8W0FZNhEuS25aYEn6a3bIn4AjzVQa/Uj/
+p6YFQZh/rUukTDrM6qLG2uC+RMuOh6SeZuUsfeRnPdNyWFYX/YY4BOyGN/f9
+6+AFC+bvsb0CfyuufHlRl9ybV91M8rdY9V0It1MPpR7AAb8mGHZ6qGeokkY+
+/xbUqy5NgTnXbrfvJ+dF2/JayXrG8CFTmJm3IEdqGZ4vxY/qIO8v8U27bWFh
+g2CTH7yyq2o0GKaHPLzzCvPwa5KZyTDrz9f1nnAFtXBuNswb8x1uQT4tvs7Z
+BeQ+b5F2e7hN4fOJc3Ck24FJPvIWxK+cnw63/29v0hp4c2hu2z6Y+tNGpFsO
+33eXs3O3wYKJvAAmfGcgocyB1NuY09wzF/3HnPJdQtbr7Hh/wj5ZmSoScH+F
+rWIRfGtdufknzCdwVxnqg9n19V96YNZfzzOdcZ9jRwyzhaxPDmzvhZXGZAUN
+sPB1dORq9HNFOF35AGY/Kg64AafJz371gpwfNQxejHmyT5cmTsIV5gZTZ+GP
+OZ+CF5J5e8djJZFHyv2JzvXE5YHhO+DoFqczJ0g+GQ9vPIClpdSVOmDO0WOt
+8sj32pvtfmr66J8xLuoIWyu9XxECc34oZ/nCA1NpgTdhHvPOax/yfSS301vU
+gHy/aPmsgOM31j5cA1O2vBoZeObCZu5JmNU0p7UO9SwfdB55RPaXqMd5w/8T
+Xe04Q/Yb3swaRP+dtoWJ2oaYv/hKYyAc5aRz0AFmDFUZkffTx5oWiY1w/xoJ
+n3Ww4+Dk+q0wFSP5/Djy88m9umQTzHrUWJ6KvPl7Pt5cDdM/D4eVyOL7cFT0
+kjnMec3/9nEOizr0csPQfJhbsL1oM9y51OjGD9LvZFrvpAyLKvT+uu0lcWN6
+4yNY7UW0Px/mdtev6IE5Zk/FCuH+8vinCjg/kiySROalL+mv5cLrXH60HCTn
+p6Ml5qN+X5TK9gSyX+nu1y64e4c47zDZL//GtBj9cp+nK+fAApdIHzJPwOOj
+ErcNyPtju5EV5lV666HXDzM2L/pRDLvWqN9SRP9sG5UCOZKfQ+kONplvdPWc
+UHhEuPF6JizImOy+Ci9rOJjYR/JlJPm+grWrvxTpG+H+cV3xCdgzu7I5Dm6X
+LnAQwn2jk9HNMG/Up7YDTlVQ95Yzxv0KTZY58Lf4ZS4eMENMtNIFNh/Y7XkC
+5jnO6L9Df4UJBp/5sNB3x+kIuC1X7tMg3P/zvWkX5pMKsnpCMbD/XMQ4H/NH
+n9/3aTbcH/6WW4R8Kk/3RMnAgucC1WzkKTZc20rWBf29OXnI3yXgZ64IzDlb
+rXhHGr9vpLgFfcb9VLbLGlHY5zNraSfMKpL03S2F9/Ol1xWVpP8tPeFqsKn/
++pBMmF4oHzIxG6+Pcs3rMbDALWV4FtbL+iQHfcj68wJTZ5hrXWm4mqw3zrOu
+hUXPWe60JfU+HnjlhXo/5wpsbIiXuS1VRn92qXLXHMi8b6vzP8mQ121X5Cbi
+HJPmJ5jHQ9X4KqnHmh7YfwvzquWOSF8g9U7KHc9EHnaHt1b1kPXLZ5T8yetB
+62W5FOalJRbPlUCekvefGRnA6fKb95LPC78BQ6/1JJ+QzWtj4GGxcYlYYqco
+0WOw/j+DtAKSd33i8iR4OfepfRODfB45l2yDvR9bhg3D9A80d224cfHaOGkT
+zK2rF3MZ9ZPOsxJ0iFUl1J6hv5mSztv2MFWSnfMe/ZeUDJzxgHnsLXv7MN9g
+wc0Wf7h/fGbNA8z//p/t9iHk/OsIkxvIy2zLG70w4j90AguR586Tod+CiOue
+VlzB8zBmznXzgwUrwiSfSOJzjrdo9gZSL8xMRA2+O5G/bBWpNzR1KEMCeT6r
+614Osz4sjrWFXSJcLbRhuuvZI5rwIe3lh1Vhzs6DUmbwHo74JzIfh13wfR98
+IUiwR4ScP/hWbgKe8f9b7Sd5PV4UCDNRr3DyeuYPkl9ad7QXeb30au2gyHwn
+m8WM0b8n77dJch9lHiquhPlKY25Yq5P6t1e6T8MfF18RNyH1LnuWPUUelxRP
+v19D9nvt9spHXkUWfqbhZL/W40hn5NmfZDgnjcyXOXvPA1jUTXZHJbEN57wm
+8l8vGmX1grjUStMe7q2ZshIxRX52IuH6sFLtC6YO3N/70uMtzn+0iJ+/BqZk
+JqaD4NQV+++Gw4Jis0e1qG/rVbMy5b/9+TZD6E/c+tpgAVkX8Ts+jv6ZF7u1
+bsC8kvrAYcyrm5V6lW9K/n25JbwLeTxs9U5ogulpzx7fQV6CYx5tzWR/4TJ+
+BfIMu1Qk10D2r2NO1Yjj82rhobFa0k/OV+e3Yuj/3dYN5WTdq1HNFL5qocy8
+QM7r36FXzMLvN9PRbafIfFnzRLbBdw3WMw+S/vr/XuoM08XUanaR+qWpvADY
+xGh9RAjZX5Kkdx1ecOnIb37kfvujVka4/8CR6ONbTMnva0PMLjhlTmkescDk
+2Kss9MfbFTjPn6zLjHGi0P9+bqXz7+Q+h17lzZjP/uYe432kv62PW20xf6wN
+7cx//d3Q85qHfDTPT/wqI/PprKVewY7RIndbSX+m6rSDyNMpzlE4Su6/zzf6
+BbszRo8pm6G/34ruuyH/70upcCZMPybwCINPrFroFwhzYo4ecYcdLTVMjhJn
+dsVQ8N6UmLoyct5C7NgB3Bf5yOtbK1mf9zakjfTjGzzxgaxf1BJ8Q7///SeL
+OZ73L/yRZP0f984Zvg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.685335142736616, 3.176806979126948}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1Qs01FkcB/A/jViR8YyymTQ1o5TJYRul3b+UIjZZKzo9JpqoqNke8kgr
+lWg5nAzJei/GITWidlAItWRkijQ2u0a7ZSqvynbItO337pwz8z+fc++59/v7
+3Tszi4KP+Am1KYo6hDd5UizyMZ+mGOS5nKYUg/GtaiuaMnvOeVG3jKbKX81h
+34ZFwfqKE/BUFScrBi48uOmhM0xNTu9YAtPXKu7N2NGUSj7reKMlTR23zt/b
+AfMSz6Vthnn9fdqFMOuE+9j9eTRVEjtQHU/mr7zrvg6+emTMLBxWxupeum5B
+U7I9FQeCYdGSGG1beERRnRBC5o9y7mSb0xT7vbDjMJyeYdc8D3aSlLufhZt1
+cmXFZjTVu/NgXgHMtKn50xWuXStxboHVcvc+tSlNuR71X/kK9pVPicvhwu6i
+0yaoh3djxdY4WGX0x2xXOEmzLDwU1gicSkPgqAHnhP2wNS/V6wIs0MrZEQ1f
+zfllbinMHT7/KQ9WvKta3wD7dm289whW+zw80w5PlC2KMkYebmZ1YyeZf24o
+NAgWL3zq00b8oC2zFE6Pth6phgMtUvvfwvHJPnfFMB1lo78G9U78XbA7As6e
+57A0Bla7c+tI3nZ5SOw1WKQbz2KQeobjHvTADJsPq+6RevPMQ4fh3K3t7WdI
+f2ObthHv++vfN2thvcHMLY/J+MTP9f9wcQ6csOcSmP9oMKAa5tpbngiD7Q9F
+PBLBLOsZB3NY6TLf/Cti271aUuQ1uODQqw0ztWoT18IMfu9JJQfrx7x4V49+
+lJx2M5HBsibO+CpY9IOnfzHMZ9meLDHBvTPJSrwMM+2oGxYwa+j5/w7kKztS
+jHHvrLw7iuDylA8t+rBcXrbrJtzckuMvZqKfsVVTClgklLTZw77fSqj3sOqy
+d1qVEc7fdm6eFfIp9GrlXHiEn9O+nuRPut3TNRf16c0ShpP8hxzz8+ANMzVb
+xTC1aOLsZVjRUBEpg3kVXm51MMusZqSPjAsdDT/DuY1rNKNkvS95jSFYf/NG
+Hb6GjHs90ajgtgHrZAr9zs7ob16NfGHsKJePJM/LddfOEg+OfFTDKmEnSwGn
+9yx/LYcFXVdGLVGvsqI8tQzmfxAY7oBL4qIUkWT9zv7WNNjeKGj6a5LP2L3t
+FumPBz+fgpVdJdvkcFjOTfEd9GMiKyvoIcyvdlKdhOOlCUkNcPs2Xv4qOD2h
+ICADru1LfTuyFN8TD5ZhAMzlN4xWwsyJA60MOFsRkiCC6cxQ/yKSPyghzBXm
+/7rfeyUs9Uk2NoZ91UGFu1C/NMHjyvgS7M+M1HijXymmBg1KmH7Tk+VoSFPn
+6pMeyGHV6miZhQH2LcqUdsKifc0yrTk45wnLkV4yvru7cuYLjO+fzBqGfSOK
+TA3g9qruw9rYT3RdkuWih9+t7WFDi8n+Ol2Nybo0dWp6bIEXyd+/vZWCnXSf
+WR+DWYz6PUWzcX9NLvyWCysuqmThMCvjyVQbLDiq6xcMs+PMcl/BquDTxvGw
+7MB3TXrkvgU6fN8C69UJy1iw4PVCCzbWD/zU98wBlmb8ZFUAazj23zgTX5Kv
+sEe+bL+XRjxYYZUvaoXFkmeTNuQ+X7LP3Yl6/G/lf2bAhT+ObR+HkyYfVw6S
+PMtXXzymj/s2fvx3KTEllAzBAscNHdFwc2DpjCP6xSwunk3Ogyc8NbJ3Djnv
+PcHTpP+qNIeDpJ/9swZqYIrOndwMp2zyTIuA0yOmqU9Yjx0bX8CFBQeLGhJh
+6aYK22E2xuXr7dTIw481NayERUHnlWxYkO+yMBKW3nFrckM9mtqabk9Y8ZTS
+34j6b6+778GBm7fkDTqjX21iB08jmPILWGCtg34H5zhrw0zyv8TA+X3GazH9
+H76vYPg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6231646322958344, 12.838497563090474}, \
+{1, -1}], LineBox[{{13.5, 13.500000000002307`}, {13.5, 6.499999999998607}}], 
+        PolygonBox[{{13.5, 10.6}, {13.1, 9.4}, {13.9, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.594402784781746, 10.950315888839512}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 13.5}, {6.500000000002592, 13.5}}], 
+        PolygonBox[{{9.4, 13.5}, {10.6, 13.9}, {10.6, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{10.6, 6.5}, {9.4, 6.9}, {9.4, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.445200000000001}, {0, -1}], 
+        LineBox[{{6.5, 6.4999999999976925`}, {6.5, 13.49999999999251}}], 
+        PolygonBox[{{6.5, 9.4}, {6.9, 10.6}, {6.1, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.554793699764814, 9.000208212001706}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{13.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{6.5, 6.5}], PointBox[{6.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4684378539501304, 12.411618926975063}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0315621460498696, 7.411618926975065}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999996362`, 
+          13.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.738470230054478, 15.789812429898827}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.211924601828787, 6.873740025175105}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2HlYzOv7B/BPaVFJ004Lk6VF27T4tk01lEqkkYS0jDptpw5JUkSTREiS
+aKOGE5WiKFRHY7QJSSuOSCiJaFJHiZPf+znXzx+6Xtez3Pf9/swSWgE7PIJE
+KYpSFaEo8pOikb/UWBT1/z+rSzySUvGTtpw2xx4/Y+XSGhepsyjhWmogGE79
+emY5H2ZvmrTdDX/QapX11sD5Y4mjofBIoAh3DOb9dnN6Bdn/LFeYoMmiKnrU
+00TgzQUpeiILWFR6rM9kyXwWNWDdcHQnHMlxPGoHV8RbGLXB3Iy1MQ3zWNRz
+9gYF5YUsSiDlfMEWbrFo1F4FC5e4BN9QZVFrrUN8/eD+His/HTieNVCyDeYI
+7y28qMKiUoq+fGPDtKmVlC7cKHeJZgwz9tQ9q1NmUaFfxZJ/oR7L0+JhCBxh
+93RfM8xwpM3XI17cdSSF9Dd3/cwsOF1DY5crTP+Ycfq7Eur/YkrJk/O5OU1S
+WDefXPSmH/NS4/obzeDWl4F6fJjhrjW4C6bracaVwf0CceUWeEprf9E1OPKn
+bpE++ouYqCtthjne4RU5cEvqj8P/kP07rz2Zg/mKmX2WNqjHy4/9PQH+EJV7
+9+wCkg995BM8z95psQSZV+OmmBvy6i8TTz1M8ht/P3AebuVIm0jT4SC76Bfw
+nRWL/9oIc9rXJPyC/UKzs/+Eqfv8Xmk8D+a52MAxmL6lnfsD67e2X7jF1MK9
++0YyOuDuQ/dckmCauGpAGnzAW0uiQYs8/wVbzWGFCDndaVhg6jDSjP5iAoZc
+dBbh+Rkd9XOFU1mdu1bDdIPgSw2Y9+HYCWMOTPsxqm0Jhz6pTwqHOe9nDlxF
+Xo02pVPENMVxe/J8Us/InwqABacGKyvwPFYWfuCzyf3iUhdc4HU7f3lYwrw7
+fyv+o8iistNSQtXh9F37TGrg9Oqtbj/Rn7DXSSkLPhfzb8gr0v98laqTcID7
+KY17MNtsa+9FmGYzdL0EjvTfp/cEVqnussiBOZWeixRQL9ZrfMcpuCLS3jUU
+/rnxdc1pmHXW3e0x3Ox0Y9YFcj5Vg8FE/2+1j9+tIedDho+Uw1c2JveR+txv
+Vbe1MH/UFr+OOaT/iETjEzAvpT5tFdzOki4dgY9Nf88/DHMNl/5hgzwruFEG
+bWQ9j7F7N/wxPmKe2mLUazQvy4JbLr5RCIUZ/rWSPHhAN7vqJkxvfcw7QfY7
+MHOpJdgvp8/nkP2q6xKc4Ir+hR1q8K0lVZuSYd5s5yA+6ucndgT/RdbLu2e5
+w5y16huG4PTk2zIdmOeWJ3v57KXIl8fmroYlwoouasKU5Jf2OuShwUu8rgPz
+PJLzzGDG1/ApbZjlve2PCuTbXLXviAbMLk49ZEXyt1z/Ugrup9dmding/TbX
+pUNI6pWuyjgI293PSOmCueMXklfDMU2GnlXE6/TClimQ13t13hmY3dGpoA1X
+a3rfi4Ppxc3LmLDE7SGJQJjqsjEOh9MXRUVvIH60K7kC/qofcG8t3P5CKWs2
++nHtW7iCTeY/lz29Hb68l97tR+6zlrzUB8e6z+qLhRm6TxZ5YD6atOGKfJLv
+K8ueBpjjrshpg1nv7pkYIZ8lgcuWkLx4s85QqbBQT0faFU7X9896DqdUyZhl
+wO1xw7I05N0ZZBfXB1fM1/ndGL4sy08x0Ma8g033zGEl+YDvcTBb9b77Qngk
+biasERb6GOwfxX0DPKs8KR30s3PTy8vERwZSnGFaAlvVhdRvus2Nhxm+f3U8
+Rb+e/tHLi+CK620Jm+D3VemPm4nH1M3J+8FPsXXkBcxp8At2gKUVbKvfwe21
+z2/WIL9z7le738DsA8ISC5ixY6P/U1hwr29XvTyLyri85k09nH5Qp8oP5n4w
+tSuBedNRTjQ4XutL/nFyf7e8ygsa6gmct0SQ+n+o/FsHl30u6HGDhfzd5Xfg
+7i8PdpmS+lNqlT1wq4NrpAaZh+4cJIn7LtYteiRL7mNQsu7wB2cXk9lk3VLw
+vRhWMxIMzyHn30lfpZHX01mr++Q8W0FZNhEuS25aYEn6a3bIn4AjzVQa/Uj/
+p6YFQZh/rUukTDrM6qLG2uC+RMuOh6SeZuUsfeRnPdNyWFYX/YY4BOyGN/f9
+6+AFC+bvsb0CfyuufHlRl9ybV91M8rdY9V0It1MPpR7AAb8mGHZ6qGeokkY+
+/xbUqy5NgTnXbrfvJ+dF2/JayXrG8CFTmJm3IEdqGZ4vxY/qIO8v8U27bWFh
+g2CTH7yyq2o0GKaHPLzzCvPwa5KZyTDrz9f1nnAFtXBuNswb8x1uQT4tvs7Z
+BeQ+b5F2e7hN4fOJc3Ck24FJPvIWxK+cnw63/29v0hp4c2hu2z6Y+tNGpFsO
+33eXs3O3wYKJvAAmfGcgocyB1NuY09wzF/3HnPJdQtbr7Hh/wj5ZmSoScH+F
+rWIRfGtdufknzCdwVxnqg9n19V96YNZfzzOdcZ9jRwyzhaxPDmzvhZXGZAUN
+sPB1dORq9HNFOF35AGY/Kg64AafJz371gpwfNQxejHmyT5cmTsIV5gZTZ+GP
+OZ+CF5J5e8djJZFHyv2JzvXE5YHhO+DoFqczJ0g+GQ9vPIClpdSVOmDO0WOt
+8sj32pvtfmr66J8xLuoIWyu9XxECc34oZ/nCA1NpgTdhHvPOax/yfSS301vU
+gHy/aPmsgOM31j5cA1O2vBoZeObCZu5JmNU0p7UO9SwfdB55RPaXqMd5w/8T
+Xe04Q/Yb3swaRP+dtoWJ2oaYv/hKYyAc5aRz0AFmDFUZkffTx5oWiY1w/xoJ
+n3Ww4+Dk+q0wFSP5/Djy88m9umQTzHrUWJ6KvPl7Pt5cDdM/D4eVyOL7cFT0
+kjnMec3/9nEOizr0csPQfJhbsL1oM9y51OjGD9LvZFrvpAyLKvT+uu0lcWN6
+4yNY7UW0Px/mdtev6IE5Zk/FCuH+8vinCjg/kiySROalL+mv5cLrXH60HCTn
+p6Ml5qN+X5TK9gSyX+nu1y64e4c47zDZL//GtBj9cp+nK+fAApdIHzJPwOOj
+ErcNyPtju5EV5lV666HXDzM2L/pRDLvWqN9SRP9sG5UCOZKfQ+kONplvdPWc
+UHhEuPF6JizImOy+Ci9rOJjYR/JlJPm+grWrvxTpG+H+cV3xCdgzu7I5Dm6X
+LnAQwn2jk9HNMG/Up7YDTlVQ95Yzxv0KTZY58Lf4ZS4eMENMtNIFNh/Y7XkC
+5jnO6L9Df4UJBp/5sNB3x+kIuC1X7tMg3P/zvWkX5pMKsnpCMbD/XMQ4H/NH
+n9/3aTbcH/6WW4R8Kk/3RMnAgucC1WzkKTZc20rWBf29OXnI3yXgZ64IzDlb
+rXhHGr9vpLgFfcb9VLbLGlHY5zNraSfMKpL03S2F9/Ol1xWVpP8tPeFqsKn/
++pBMmF4oHzIxG6+Pcs3rMbDALWV4FtbL+iQHfcj68wJTZ5hrXWm4mqw3zrOu
+hUXPWe60JfU+HnjlhXo/5wpsbIiXuS1VRn92qXLXHMi8b6vzP8mQ121X5Cbi
+HJPmJ5jHQ9X4KqnHmh7YfwvzquWOSF8g9U7KHc9EHnaHt1b1kPXLZ5T8yetB
+62W5FOalJRbPlUCekvefGRnA6fKb95LPC78BQ6/1JJ+QzWtj4GGxcYlYYqco
+0WOw/j+DtAKSd33i8iR4OfepfRODfB45l2yDvR9bhg3D9A80d224cfHaOGkT
+zK2rF3MZ9ZPOsxJ0iFUl1J6hv5mSztv2MFWSnfMe/ZeUDJzxgHnsLXv7MN9g
+wc0Wf7h/fGbNA8z//p/t9iHk/OsIkxvIy2zLG70w4j90AguR586Tod+CiOue
+VlzB8zBmznXzgwUrwiSfSOJzjrdo9gZSL8xMRA2+O5G/bBWpNzR1KEMCeT6r
+614Osz4sjrWFXSJcLbRhuuvZI5rwIe3lh1Vhzs6DUmbwHo74JzIfh13wfR98
+IUiwR4ScP/hWbgKe8f9b7Sd5PV4UCDNRr3DyeuYPkl9ad7QXeb30au2gyHwn
+m8WM0b8n77dJch9lHiquhPlKY25Yq5P6t1e6T8MfF18RNyH1LnuWPUUelxRP
+v19D9nvt9spHXkUWfqbhZL/W40hn5NmfZDgnjcyXOXvPA1jUTXZHJbEN57wm
+8l8vGmX1grjUStMe7q2ZshIxRX52IuH6sFLtC6YO3N/70uMtzn+0iJ+/BqZk
+JqaD4NQV+++Gw4Jis0e1qG/rVbMy5b/9+TZD6E/c+tpgAVkX8Ts+jv6ZF7u1
+bsC8kvrAYcyrm5V6lW9K/n25JbwLeTxs9U5ogulpzx7fQV6CYx5tzWR/4TJ+
+BfIMu1Qk10D2r2NO1Yjj82rhobFa0k/OV+e3Yuj/3dYN5WTdq1HNFL5qocy8
+QM7r36FXzMLvN9PRbafIfFnzRLbBdw3WMw+S/vr/XuoM08XUanaR+qWpvADY
+xGh9RAjZX5Kkdx1ecOnIb37kfvujVka4/8CR6ONbTMnva0PMLjhlTmkescDk
+2Kss9MfbFTjPn6zLjHGi0P9+bqXz7+Q+h17lzZjP/uYe432kv62PW20xf6wN
+7cx//d3Q85qHfDTPT/wqI/PprKVewY7RIndbSX+m6rSDyNMpzlE4Su6/zzf6
+BbszRo8pm6G/34ruuyH/70upcCZMPybwCINPrFroFwhzYo4ecYcdLTVMjhJn
+dsVQ8N6UmLoyct5C7NgB3Bf5yOtbK1mf9zakjfTjGzzxgaxf1BJ8Q7///SeL
+OZ73L/yRZP0f984Zvg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.685335142736616, 3.176806979126948}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1Qs01FkcB/A/jViR8YyymTQ1o5TJYRul3b+UIjZZKzo9JpqoqNke8kgr
+lWg5nAzJei/GITWidlAItWRkijQ2u0a7ZSqvynbItO337pwz8z+fc++59/v7
+3Tszi4KP+Am1KYo6hDd5UizyMZ+mGOS5nKYUg/GtaiuaMnvOeVG3jKbKX81h
+34ZFwfqKE/BUFScrBi48uOmhM0xNTu9YAtPXKu7N2NGUSj7reKMlTR23zt/b
+AfMSz6Vthnn9fdqFMOuE+9j9eTRVEjtQHU/mr7zrvg6+emTMLBxWxupeum5B
+U7I9FQeCYdGSGG1beERRnRBC5o9y7mSb0xT7vbDjMJyeYdc8D3aSlLufhZt1
+cmXFZjTVu/NgXgHMtKn50xWuXStxboHVcvc+tSlNuR71X/kK9pVPicvhwu6i
+0yaoh3djxdY4WGX0x2xXOEmzLDwU1gicSkPgqAHnhP2wNS/V6wIs0MrZEQ1f
+zfllbinMHT7/KQ9WvKta3wD7dm289whW+zw80w5PlC2KMkYebmZ1YyeZf24o
+NAgWL3zq00b8oC2zFE6Pth6phgMtUvvfwvHJPnfFMB1lo78G9U78XbA7As6e
+57A0Bla7c+tI3nZ5SOw1WKQbz2KQeobjHvTADJsPq+6RevPMQ4fh3K3t7WdI
+f2ObthHv++vfN2thvcHMLY/J+MTP9f9wcQ6csOcSmP9oMKAa5tpbngiD7Q9F
+PBLBLOsZB3NY6TLf/Cti271aUuQ1uODQqw0ztWoT18IMfu9JJQfrx7x4V49+
+lJx2M5HBsibO+CpY9IOnfzHMZ9meLDHBvTPJSrwMM+2oGxYwa+j5/w7kKztS
+jHHvrLw7iuDylA8t+rBcXrbrJtzckuMvZqKfsVVTClgklLTZw77fSqj3sOqy
+d1qVEc7fdm6eFfIp9GrlXHiEn9O+nuRPut3TNRf16c0ShpP8hxzz8+ANMzVb
+xTC1aOLsZVjRUBEpg3kVXm51MMusZqSPjAsdDT/DuY1rNKNkvS95jSFYf/NG
+Hb6GjHs90ajgtgHrZAr9zs7ob16NfGHsKJePJM/LddfOEg+OfFTDKmEnSwGn
+9yx/LYcFXVdGLVGvsqI8tQzmfxAY7oBL4qIUkWT9zv7WNNjeKGj6a5LP2L3t
+FumPBz+fgpVdJdvkcFjOTfEd9GMiKyvoIcyvdlKdhOOlCUkNcPs2Xv4qOD2h
+ICADru1LfTuyFN8TD5ZhAMzlN4xWwsyJA60MOFsRkiCC6cxQ/yKSPyghzBXm
+/7rfeyUs9Uk2NoZ91UGFu1C/NMHjyvgS7M+M1HijXymmBg1KmH7Tk+VoSFPn
+6pMeyGHV6miZhQH2LcqUdsKifc0yrTk45wnLkV4yvru7cuYLjO+fzBqGfSOK
+TA3g9qruw9rYT3RdkuWih9+t7WFDi8n+Ol2Nybo0dWp6bIEXyd+/vZWCnXSf
+WR+DWYz6PUWzcX9NLvyWCysuqmThMCvjyVQbLDiq6xcMs+PMcl/BquDTxvGw
+7MB3TXrkvgU6fN8C69UJy1iw4PVCCzbWD/zU98wBlmb8ZFUAazj23zgTX5Kv
+sEe+bL+XRjxYYZUvaoXFkmeTNuQ+X7LP3Yl6/G/lf2bAhT+ObR+HkyYfVw6S
+PMtXXzymj/s2fvx3KTEllAzBAscNHdFwc2DpjCP6xSwunk3Ogyc8NbJ3Djnv
+PcHTpP+qNIeDpJ/9swZqYIrOndwMp2zyTIuA0yOmqU9Yjx0bX8CFBQeLGhJh
+6aYK22E2xuXr7dTIw481NayERUHnlWxYkO+yMBKW3nFrckM9mtqabk9Y8ZTS
+34j6b6+778GBm7fkDTqjX21iB08jmPILWGCtg34H5zhrw0zyv8TA+X3GazH9
+H76vYPg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6231646322958344, 12.838497563090474}, \
+{1, -1}], LineBox[{{13.5, 13.500000000002307`}, {13.5, 6.499999999998607}}], 
+        PolygonBox[{{13.5, 9.4}, {13.1, 10.6}, {13.9, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.594402784781746, 10.950315888839512}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 13.5}, {6.500000000002592, 13.5}}], 
+        PolygonBox[{{10.6, 13.5}, {9.4, 13.9}, {9.4, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{9.4, 6.5}, {10.6, 6.9}, {10.6, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.445200000000001}, {0, -1}], 
+        LineBox[{{6.5, 6.4999999999976925`}, {6.5, 13.49999999999251}}], 
+        PolygonBox[{{6.5, 10.6}, {6.9, 9.4}, {6.1, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.554793699764814, 9.000208212001706}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{13.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{6.5, 6.5}], PointBox[{6.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6576611797498106, 12.901430589874906}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {-0.15766117974981075, 7.901430589874905}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010914`, 17.000000000003638`}, {
+          6.500000000010914, 13.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.923749193581157, 15.90359596761554}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.095260378700779, 5.519108263604518}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws41NkbB/Ahl0mI1DSVzbjVyKXRSJOkKfctl81dknUvkWSXSnaSMomi
+yEQx0gWhaWmjJkbUUrrbaLuNbBqpCGWU1f97/jvP4/F85vzOOe/7nvf3mxn9
+0G3rIxQpFMoY/sj//16mXMrEd7wWcSmy0RG5C0zxH1zbBwvG9gVkw1VvLpyR
+wJ5f9p2+DZf/pvDgCExXnnNuElaveK/jA/t3XxEuNMN43PeFM2COVYibA6xE
+u6jfboJ1p5qPesHP27cGpcBCxaMJvrBRY1GwBcyQvbVdB1Nti8Q9TFjBOsAa
+rp9kfRPA/OBELxrc5nU+wZeMP71r+hH7J9u+Y+vC1N3VqyQwo6lraGAhlyJv
+LLY4Auu2PJLdgpMHl4k3wrKXv/5dDfPvRYks4LbzWt+EsFT76BUlWDC+YrQE
+pvvI7F8jD55Dy9sK2PNp8PZ2WBh0bOd1mBOT+uEa7NLw06tuWBjH/OcqXF/0
+enQcZgSYDN+CdWmj3vMRHz2YPV8Ky98kJtrD0TW53crYrztX3BRJxq8WKCwj
+5yGh1e+HtW6mfdkOZy3epFVMrvewOVMH17Ej/6yG27LpJRMkXuqgXS1M2Vdp
+54z61H1Y5U7G45tNxLkw91WcRxEsPLh+/VO4c8qjBXvI9fYmG+eZ4/wW2Tl4
+kfp+WJPsAyd3KRWTeEV6Swv3wzncgbNS5NN9adi0Eha2CzhFpL7vqPNuwEGu
+K/iesKR14E0HbOXhO2UKLNNoLb0Nz6x6ybm8APVoTBm/Bot3vL66GeYHzV1w
+Gmas0FQwhLVi6qSpMLPl53W9xliv95K7N1mP559dBfvXmPYbwSzjGjceXC84
+EjKCfHI6rxdvgpPXte+5QfrlmqPGWpg5zUsxH+5Qnle0hozHnuTHwidVaU2O
+MCXKMtIdnvBaFuNFxsvGcpbDQ+wm+hZY2lXHZ8GMsaqnGbBw5ytHKziv4UVc
+JcwpT7VwJP3oeffn+zCjWqAdBo8mPGKMEm8KN8mGxdVHdWnIT77WyIjENyQK
+erME5qx2YlOQj+gXurMLLJwyl+EIP+/KCvWGXcYsIw7D6WXdN3zg5Ikf1z4l
+9chkxq2FZfbxVEML3G+T/UNWpH4Lv7yKhnlmX0NnwA9+erG6HB51y4/8B/E8
+WGYtewmzomfoV/0/X/YntcWo6/VG8xhSD/3m0UVwzt1thwxhz4SzM+1g0b6S
+/V1GiK8tScUB7oyYU3gQDon6TFsJZ6lGBdnC/mG5C8h8pZv2/sOGyHM8okQd
+bnuyZbQa5v37NbwP+2ud0vTbDstLixobYO5tKzc7uC3YauVBuLVR25oGU7v+
+OeUHi5M8RsYN0M+JBZULYSP5yMt+4nGVuROkHiWBf76BZQ3C+C7SP25xn97D
+nqblvaTfWGfV9CdhBr9v1QU4xM/o/GysL8mg/nUOjnag/bIM9ucdj7xI1ku0
+ttoAu2izDW/C8Y/PhPDgB3npp9+Sfq1jRJ4xJPdFT/8sko+k8HorWS+Rn+QO
+16Wy1F7B0lqZ1xFYYuxo9Qmu327GfAKbSXl7x+H42GkBDNSnSq+s/Ass9Ko2
+ioG9vRykb8n8hc43amHm5hdvO+By5alpY7DV0mq1c3A6dezzHBaX4uAYqJsI
+dx5RiWPDLsKkbRyYX3DUzRnmLQ24NYr8tT4Zj3vDUv0+uwuwlWqcbhC5fq+n
+TTCsvlixhjjlVPtqLZhVfH/QF/Z8GdPfoo9zNTfeuhbu/Kn8991wyEPeoA1M
+nX1ocDns8i3itwXwqBmjnAJnqZxzn07mF5nse8jA8y1tzaYPiH+r2LK2GqYc
+slUTw1z/R7J8WMq8E54N0/l3f8wkDrlIC4eDKtYnEueER2eugW3H03aS67WK
+eQ9Jv0mHFYYrYBeFrqz5cPRG+tRbsMRl9CmxdNmlo2/htr7VTmbwe1OukTri
+05pxuc2J1DM0kWUJd8dY34iFOcm7jLzhnJPNSkI4PjR1fwIc7TMgfUbuF5V5
+GpkwPfbESZLf1uTtLQK4rp9xl9T/n/3iWadgmXuaaQA8EbRRlg+fya/ySoXV
+J3LL0uDy0K+9pXDOSnubMFi+e2r2DXjI+OQiDizRb2a8YpHnZViyIpzX/3fJ
+FzjI3L+0BfnUt613pFpi/Cotaw/8nrLiiA6c9/HHhCWwf95hBzosa1l/uF0P
+eYY3JdFgfkKltQXMLH29XxPm9fRPFszH+2r7ZyjA9MIjd6fB6T2+lEHsx785
+l3b4B9Tv8pSop3D0JcVzBjD9fOWBZri+UG9nhy7W+3igoRxmfksqyIa5drHh
+OaS/ro3/Gwknv7/ftxOWxZsc84c7mAqHImFuuwvzZ/hMY1SSH9kvq+9AKpwi
+8yh1g0VltpnVuuRzeLDZFW5LWW7/DlYXz3FfB4fMExizEI+tn8p2H7JfoqLt
+Lvjk601qETCD2h/SAidmX7m4C+4uTt+pgvyCPrhcyocllGCRHSzu7Na/TNa7
+LK6KgunPvHu6YLni3tY9cEd/Q8UEiX+u+YJUWKJQ84OBJfm8shmPhNVlxt1O
+MGXYdccymBEUlrIZjv/DqmcQ++vuyLvJJ5aUlOXCgjch+WWw/ISFnh7c6ttI
+aYC5l7RKi5AfxTc5sI2s72ywfBqczh6xeQgzdL0PJczD8yLzQfpjmPo2vvDJ
+XPTRYm7kfbhcXHbYFhaEfvS9CXcbeu2qmIN81c/P+AN22TOmZwALjg/knCbu
+yrhWScfzbfLZ+CFy/nc/PnSCh+KHBTtgz+Ja6vhsnHu1yb1AS/KcPqvaAnNP
+cSbXkHhceyPOwls/FqSZk/3lc8tK4IkP1MJ5sCjZ1VwE6066B5J+k8rECZ1w
+68qmMhWY48z/TsV+tq+tZiuT/RXpZ13h5x4vNNXgZG2DylxYHGtROIvUr6yD
+8hz2j1u6ZyE8ZFrCM0Q+iV8d2atgoeY5/TA4T2FgdAO5Xs/Q+jjMMflLkkLy
+zVwqrIfluSFRQjK/SFvhT5j62VxA6sVNrHzVCFu5sT+9gwW52jeLYZfQAs3p
+SxC/jpNbJNy5+XQhC5av+d2URtYbVN/oDtcHGBqKEN/MLf+6RMFDuwo+WcMT
+b3UO7oJD0tpZNcg/uXicnwEL7/SazYU5GSoT2XD0Eqva32j4HGgWSYkpgbOf
+9c5Cv9kV88j1Q4XH7qyFPUf8YnfDojureeKZ6M/NrTu3wOWdJjk2MKe0TuQD
+d7sajLfrIO6Lgy52JL6lmsOxcEqEU4ExTLdRvsUk47Xu39WJb027+m0G9lH5
+tfczOb8vGZN9cP1y/fweOJozp7ofli3KcST9ODT67pEC5tMNlshJ/egt0zLM
+4K3lqkkScj/Mbp8WCSf2H3dtJv0akTteAVex/64h/S06t337CCybGVf4hPSX
+5nvvlYi/c4PeZVL/bv9yXhrJr+xRiBLi4ztvVG2EqX8ImgxI/dU9twzAkuri
+6w6knvU9HSqoj0id/8Nmcl4LnzE04IlVZw8chuMHdrlO4HpWfVheLSyJ/p39
+GBYLnfqewIK9u1/nws9nXVo8RupXXR+3HPZu7HDSYSPObOHXO4hX/qjHchHM
+nO94Yh0s3JaxZAUsj/QwbUJ9rMSm9xxh6bH0JcwZ5Ptc7mNXWLJMpzhLG33m
+obrRGRb5fs39pMWlhC9Zet+OrPdRxywIFpwq7mTBIUb3j56ejnounfCZDzO2
+dpys1MR+vfe2UdnkvtXt79JAPWqEEUMkv7BfVrFgzswDx7pgnpPirivq+N7h
+dCC4CebmOQRsI9Y+ZVQB58QoxPvBSjIN8+NkfuMiZizs2XDtBOk3XmmG9AIs
+yjIPTIVZhm36GlhfVNrJIP3nKTgj48NG7zU3kHHp3isKNMTHiVttxocZjl8S
+SLwpaWu2Csj8dq2PK5BPjs2CihrSz3+dcJLAnTb+ZrfJ/THHb4SG/L0r2xTf
+kflF8fPt4JTj91Q1SP3l3OnrYaae/bAlzCmUqXvC6+xXhfnB/ia2gdYwL/jx
+592k/vENrkpwlamSRzE8xBVmJmI/1mcf8+tk3MX1WC3i8zzLTuqCeTYqlbeR
+T/SOLOf3sKdyVr4E+aeHzJZ/hVmpnwSnpuF5WnOLOcUKnto/M0YN/d08q1UJ
+Fiov1mVP5f73+xoeIr+vVbn/AzL9fMQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.157838422120044, 11.076737872805136}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Q1QzGkcB/D/ZGkr2kRU9rK9THJid7Pc9oI/imr0poZc0YsraYulkQ1p
+YyJDaghtqE2qlbjd6+V6o3S5yinblaypZvMS7ekclXSi7vvczvxn5zPP83+e
+3+/7PDN/68j9W6P0KIoS4SH/lGYaPwua4hBY0pSmJ2jkABzeLBAx4IkdfJNB
+c5pSLg27YAWbZE8f2QmnHz2X4QtzrMM42oU0xYzdk38RDg+8dzEeVroluA3D
+Ytmud0bE4/aW2xbRlMKbe6N+Ad7PDPLogHleJ1NS4eBxal0AG+sPqNJCYGbm
+BateWMoSDnnDWeX61Xu+oym6/YGBH5wT2dA8AucELj8RDfPcPeZIrGhqKMXH
+MRNu/Cn9wijsEPva5Xc4RquriFhMU56NzCAm6qF0RdsbYEmVThUAx1XlTTM4
+2H9UuTkPvlbSO7YYbqyy0OngrK1vWDyYs9olgYf+GQ6O61bB1NkPY/Gw+7ee
+Xi4sD4x5mgdzaqKKObC4g/7cAKv3BjYw4aFNX3s6YPqLg7AL+ytrMwvbYJ79
+7Y9nYGrKxv9nmGlnnOkMC+cF5aWQ/I2rnN+gH/9kGceVjI/2/5AN0w5lglek
+H6W6aTMs9uKOJ8HSkPx+Bpzub/69HuzfPrT8CfJStOfbpiAP+Qu+5has3v1b
+4ZgZ5m9cFnEFDja8XBENmx+ae0kGSz83pz6fjxyXmCeq4CGjLm4A7D8zw0kL
+azxl5Z3z8N5VU1sb7Fcdm3N7FzzwC6OTnAfT5LLbpCnyKGhhvIAlNdqRWzAt
+Tuzdjv5iksNvxcGSO4tePSd5+CUfdoerA3h5fOTVGrO3mA+HqgQDh0neTiF3
+V8LS3Mrse2T8fb2rF9y9SZhHWeO+CuzdxLCAtePftXCjQf5IEVyWLFEnwuFO
+0aZv4bFSRUYxLMwVaLmoN6tr2V+PYU+LpoBjcKh2+MsQmR9nv64VFttJnL/A
+5iGXUlnov7mPfYayQQ4f33J84WCPmcKvZH57dJIUVt53+fo3PFD6Y1ghyW9+
++XAPLPlHf20FrKkrTayGsx694algt8lyv2xYUWe9QAYHMWdExcHBk0UyETzb
+Obd1A8yp2CFcCgtsjK9bkPm5wa5dqM/Tt4QaRR7Ba6Jui+BzR+9MqGFegsGa
+T+i373HxzkpyP1uWrE6AmRZb2gpg5rNpH91cmmK/eHnqChnX9qeHwPWml/83
+TWtMOkxQ9wGvoBvwhzTLOR5w2fH1ptVw+LcrI+ksmrITdh/WwNK6Nd/yjVHn
+aW63HupTthjIn85BDs6WZqtheckTMy4sEMV3isn5KLmuytlwp3abioyv744J
+gSs+XK39BPsbpIby4fBXU+9cSd4Pu/nEN/1aW1PhRj5DFAwzFo/zH8Lh0UKD
+QliiL+UwbFGPuqDcCPtR7g41bjCP9eDdWeLB/F3xZLxrcAsb9UrP+DzIhuWi
+xO4KOCeJPawi/uzG80F/16ye+TTDWap6Vj/seUl1/w843anWZQXyoHw7Ulth
+tfkRvUhYM3JnQx1Zfyqq6BRcn1toXETWs32ULIPZvAzv07BwxtOLObBdhKBo
+N6zw+VN5Ap5g9c8i9SpW6ou2w4onBcdNYZOV9UsXwu4Hg1bo0C/dJNtwCvXI
+XUtWNcHisZbztai/LzT2ej6cpSlLUaNfzxLFxpMwz06Z1oF8HEej2vaRPCuN
+JuuMaOq1WnViN0wxP/bKDWnqcVjp3kiS541kSZoB8t7/fn4crDRLsj3IxPkf
+7VNJYfXo+MA+fdzv5z16crJ+9MTCk7No6hg7L6IN5pjP9q6ciTrvlj6cJPXe
+VHYZwvLYzR2rSB6OQ7+eZuC8Ig3Vh2B/ekqyAma/XDJYAyvJ92kG7j/5PtnR
+/wFp5VhF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.084117857803797, 7.68830612320434}, \
+{1, 1}], LineBox[{{6.4999999999976925`, 13.5}, {13.49999999999251, 13.5}}], 
+        PolygonBox[{{9.4, 13.5}, {10.6, 13.1}, {10.6, 13.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.5548}, {0, 1}], 
+        LineBox[{{6.5, 13.500000000002307`}, {6.5, 6.499999999998607}}], 
+        PolygonBox[{{6.5, 9.4}, {6.1, 10.6}, {6.9, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.}, {1, 0}], 
+        LineBox[{{13.5, 6.4999999999976925`}, {13.5, 13.49999999999251}}], 
+        PolygonBox[{{13.5, 10.6}, {13.9, 9.4}, {13.1, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.095161292761041, 9.350096513122315}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{10.6, 6.5}, {9.4, 6.9}, {9.4, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{6.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{13.5, 13.5}], PointBox[{6.5, 6.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6576611797498106, 12.901430589874906}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {-0.15766117974981075, 7.901430589874905}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010914`, 17.000000000003638`}, {
+          6.500000000010914, 13.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.923749193581157, 15.90359596761554}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.095260378700779, 5.519108263604518}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws41NkbB/Ahl0mI1DSVzbjVyKXRSJOkKfctl81dknUvkWSXSnaSMomi
+yEQx0gWhaWmjJkbUUrrbaLuNbBqpCGWU1f97/jvP4/F85vzOOe/7nvf3mxn9
+0G3rIxQpFMoY/sj//16mXMrEd7wWcSmy0RG5C0zxH1zbBwvG9gVkw1VvLpyR
+wJ5f9p2+DZf/pvDgCExXnnNuElaveK/jA/t3XxEuNMN43PeFM2COVYibA6xE
+u6jfboJ1p5qPesHP27cGpcBCxaMJvrBRY1GwBcyQvbVdB1Nti8Q9TFjBOsAa
+rp9kfRPA/OBELxrc5nU+wZeMP71r+hH7J9u+Y+vC1N3VqyQwo6lraGAhlyJv
+LLY4Auu2PJLdgpMHl4k3wrKXv/5dDfPvRYks4LbzWt+EsFT76BUlWDC+YrQE
+pvvI7F8jD55Dy9sK2PNp8PZ2WBh0bOd1mBOT+uEa7NLw06tuWBjH/OcqXF/0
+enQcZgSYDN+CdWmj3vMRHz2YPV8Ky98kJtrD0TW53crYrztX3BRJxq8WKCwj
+5yGh1e+HtW6mfdkOZy3epFVMrvewOVMH17Ej/6yG27LpJRMkXuqgXS1M2Vdp
+54z61H1Y5U7G45tNxLkw91WcRxEsPLh+/VO4c8qjBXvI9fYmG+eZ4/wW2Tl4
+kfp+WJPsAyd3KRWTeEV6Swv3wzncgbNS5NN9adi0Eha2CzhFpL7vqPNuwEGu
+K/iesKR14E0HbOXhO2UKLNNoLb0Nz6x6ybm8APVoTBm/Bot3vL66GeYHzV1w
+Gmas0FQwhLVi6qSpMLPl53W9xliv95K7N1mP559dBfvXmPYbwSzjGjceXC84
+EjKCfHI6rxdvgpPXte+5QfrlmqPGWpg5zUsxH+5Qnle0hozHnuTHwidVaU2O
+MCXKMtIdnvBaFuNFxsvGcpbDQ+wm+hZY2lXHZ8GMsaqnGbBw5ytHKziv4UVc
+JcwpT7VwJP3oeffn+zCjWqAdBo8mPGKMEm8KN8mGxdVHdWnIT77WyIjENyQK
+erME5qx2YlOQj+gXurMLLJwyl+EIP+/KCvWGXcYsIw7D6WXdN3zg5Ikf1z4l
+9chkxq2FZfbxVEML3G+T/UNWpH4Lv7yKhnlmX0NnwA9+erG6HB51y4/8B/E8
+WGYtewmzomfoV/0/X/YntcWo6/VG8xhSD/3m0UVwzt1thwxhz4SzM+1g0b6S
+/V1GiK8tScUB7oyYU3gQDon6TFsJZ6lGBdnC/mG5C8h8pZv2/sOGyHM8okQd
+bnuyZbQa5v37NbwP+2ud0vTbDstLixobYO5tKzc7uC3YauVBuLVR25oGU7v+
+OeUHi5M8RsYN0M+JBZULYSP5yMt+4nGVuROkHiWBf76BZQ3C+C7SP25xn97D
+nqblvaTfWGfV9CdhBr9v1QU4xM/o/GysL8mg/nUOjnag/bIM9ucdj7xI1ku0
+ttoAu2izDW/C8Y/PhPDgB3npp9+Sfq1jRJ4xJPdFT/8sko+k8HorWS+Rn+QO
+16Wy1F7B0lqZ1xFYYuxo9Qmu327GfAKbSXl7x+H42GkBDNSnSq+s/Ass9Ko2
+ioG9vRykb8n8hc43amHm5hdvO+By5alpY7DV0mq1c3A6dezzHBaX4uAYqJsI
+dx5RiWPDLsKkbRyYX3DUzRnmLQ24NYr8tT4Zj3vDUv0+uwuwlWqcbhC5fq+n
+TTCsvlixhjjlVPtqLZhVfH/QF/Z8GdPfoo9zNTfeuhbu/Kn8991wyEPeoA1M
+nX1ocDns8i3itwXwqBmjnAJnqZxzn07mF5nse8jA8y1tzaYPiH+r2LK2GqYc
+slUTw1z/R7J8WMq8E54N0/l3f8wkDrlIC4eDKtYnEueER2eugW3H03aS67WK
+eQ9Jv0mHFYYrYBeFrqz5cPRG+tRbsMRl9CmxdNmlo2/htr7VTmbwe1OukTri
+05pxuc2J1DM0kWUJd8dY34iFOcm7jLzhnJPNSkI4PjR1fwIc7TMgfUbuF5V5
+GpkwPfbESZLf1uTtLQK4rp9xl9T/n/3iWadgmXuaaQA8EbRRlg+fya/ySoXV
+J3LL0uDy0K+9pXDOSnubMFi+e2r2DXjI+OQiDizRb2a8YpHnZViyIpzX/3fJ
+FzjI3L+0BfnUt613pFpi/Cotaw/8nrLiiA6c9/HHhCWwf95hBzosa1l/uF0P
+eYY3JdFgfkKltQXMLH29XxPm9fRPFszH+2r7ZyjA9MIjd6fB6T2+lEHsx785
+l3b4B9Tv8pSop3D0JcVzBjD9fOWBZri+UG9nhy7W+3igoRxmfksqyIa5drHh
+OaS/ro3/Gwknv7/ftxOWxZsc84c7mAqHImFuuwvzZ/hMY1SSH9kvq+9AKpwi
+8yh1g0VltpnVuuRzeLDZFW5LWW7/DlYXz3FfB4fMExizEI+tn8p2H7JfoqLt
+Lvjk601qETCD2h/SAidmX7m4C+4uTt+pgvyCPrhcyocllGCRHSzu7Na/TNa7
+LK6KgunPvHu6YLni3tY9cEd/Q8UEiX+u+YJUWKJQ84OBJfm8shmPhNVlxt1O
+MGXYdccymBEUlrIZjv/DqmcQ++vuyLvJJ5aUlOXCgjch+WWw/ISFnh7c6ttI
+aYC5l7RKi5AfxTc5sI2s72ywfBqczh6xeQgzdL0PJczD8yLzQfpjmPo2vvDJ
+XPTRYm7kfbhcXHbYFhaEfvS9CXcbeu2qmIN81c/P+AN22TOmZwALjg/knCbu
+yrhWScfzbfLZ+CFy/nc/PnSCh+KHBTtgz+Ja6vhsnHu1yb1AS/KcPqvaAnNP
+cSbXkHhceyPOwls/FqSZk/3lc8tK4IkP1MJ5sCjZ1VwE6066B5J+k8rECZ1w
+68qmMhWY48z/TsV+tq+tZiuT/RXpZ13h5x4vNNXgZG2DylxYHGtROIvUr6yD
+8hz2j1u6ZyE8ZFrCM0Q+iV8d2atgoeY5/TA4T2FgdAO5Xs/Q+jjMMflLkkLy
+zVwqrIfluSFRQjK/SFvhT5j62VxA6sVNrHzVCFu5sT+9gwW52jeLYZfQAs3p
+SxC/jpNbJNy5+XQhC5av+d2URtYbVN/oDtcHGBqKEN/MLf+6RMFDuwo+WcMT
+b3UO7oJD0tpZNcg/uXicnwEL7/SazYU5GSoT2XD0Eqva32j4HGgWSYkpgbOf
+9c5Cv9kV88j1Q4XH7qyFPUf8YnfDojureeKZ6M/NrTu3wOWdJjk2MKe0TuQD
+d7sajLfrIO6Lgy52JL6lmsOxcEqEU4ExTLdRvsUk47Xu39WJb027+m0G9lH5
+tfczOb8vGZN9cP1y/fweOJozp7ofli3KcST9ODT67pEC5tMNlshJ/egt0zLM
+4K3lqkkScj/Mbp8WCSf2H3dtJv0akTteAVex/64h/S06t337CCybGVf4hPSX
+5nvvlYi/c4PeZVL/bv9yXhrJr+xRiBLi4ztvVG2EqX8ImgxI/dU9twzAkuri
+6w6knvU9HSqoj0id/8Nmcl4LnzE04IlVZw8chuMHdrlO4HpWfVheLSyJ/p39
+GBYLnfqewIK9u1/nws9nXVo8RupXXR+3HPZu7HDSYSPObOHXO4hX/qjHchHM
+nO94Yh0s3JaxZAUsj/QwbUJ9rMSm9xxh6bH0JcwZ5Ptc7mNXWLJMpzhLG33m
+obrRGRb5fs39pMWlhC9Zet+OrPdRxywIFpwq7mTBIUb3j56ejnounfCZDzO2
+dpys1MR+vfe2UdnkvtXt79JAPWqEEUMkv7BfVrFgzswDx7pgnpPirivq+N7h
+dCC4CebmOQRsI9Y+ZVQB58QoxPvBSjIN8+NkfuMiZizs2XDtBOk3XmmG9AIs
+yjIPTIVZhm36GlhfVNrJIP3nKTgj48NG7zU3kHHp3isKNMTHiVttxocZjl8S
+SLwpaWu2Csj8dq2PK5BPjs2CihrSz3+dcJLAnTb+ZrfJ/THHb4SG/L0r2xTf
+kflF8fPt4JTj91Q1SP3l3OnrYaae/bAlzCmUqXvC6+xXhfnB/ia2gdYwL/jx
+592k/vENrkpwlamSRzE8xBVmJmI/1mcf8+tk3MX1WC3i8zzLTuqCeTYqlbeR
+T/SOLOf3sKdyVr4E+aeHzJZ/hVmpnwSnpuF5WnOLOcUKnto/M0YN/d08q1UJ
+Fiov1mVP5f73+xoeIr+vVbn/AzL9fMQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.157838422120044, 11.076737872805136}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Q1QzGkcB/D/ZGkr2kRU9rK9THJid7Pc9oI/imr0poZc0YsraYulkQ1p
+YyJDaghtqE2qlbjd6+V6o3S5yinblaypZvMS7ekclXSi7vvczvxn5zPP83+e
+3+/7PDN/68j9W6P0KIoS4SH/lGYaPwua4hBY0pSmJ2jkABzeLBAx4IkdfJNB
+c5pSLg27YAWbZE8f2QmnHz2X4QtzrMM42oU0xYzdk38RDg+8dzEeVroluA3D
+Ytmud0bE4/aW2xbRlMKbe6N+Ad7PDPLogHleJ1NS4eBxal0AG+sPqNJCYGbm
+BateWMoSDnnDWeX61Xu+oym6/YGBH5wT2dA8AucELj8RDfPcPeZIrGhqKMXH
+MRNu/Cn9wijsEPva5Xc4RquriFhMU56NzCAm6qF0RdsbYEmVThUAx1XlTTM4
+2H9UuTkPvlbSO7YYbqyy0OngrK1vWDyYs9olgYf+GQ6O61bB1NkPY/Gw+7ee
+Xi4sD4x5mgdzaqKKObC4g/7cAKv3BjYw4aFNX3s6YPqLg7AL+ytrMwvbYJ79
+7Y9nYGrKxv9nmGlnnOkMC+cF5aWQ/I2rnN+gH/9kGceVjI/2/5AN0w5lglek
+H6W6aTMs9uKOJ8HSkPx+Bpzub/69HuzfPrT8CfJStOfbpiAP+Qu+5has3v1b
+4ZgZ5m9cFnEFDja8XBENmx+ae0kGSz83pz6fjxyXmCeq4CGjLm4A7D8zw0kL
+azxl5Z3z8N5VU1sb7Fcdm3N7FzzwC6OTnAfT5LLbpCnyKGhhvIAlNdqRWzAt
+Tuzdjv5iksNvxcGSO4tePSd5+CUfdoerA3h5fOTVGrO3mA+HqgQDh0neTiF3
+V8LS3Mrse2T8fb2rF9y9SZhHWeO+CuzdxLCAtePftXCjQf5IEVyWLFEnwuFO
+0aZv4bFSRUYxLMwVaLmoN6tr2V+PYU+LpoBjcKh2+MsQmR9nv64VFttJnL/A
+5iGXUlnov7mPfYayQQ4f33J84WCPmcKvZH57dJIUVt53+fo3PFD6Y1ghyW9+
++XAPLPlHf20FrKkrTayGsx694algt8lyv2xYUWe9QAYHMWdExcHBk0UyETzb
+Obd1A8yp2CFcCgtsjK9bkPm5wa5dqM/Tt4QaRR7Ba6Jui+BzR+9MqGFegsGa
+T+i373HxzkpyP1uWrE6AmRZb2gpg5rNpH91cmmK/eHnqChnX9qeHwPWml/83
+TWtMOkxQ9wGvoBvwhzTLOR5w2fH1ptVw+LcrI+ksmrITdh/WwNK6Nd/yjVHn
+aW63HupTthjIn85BDs6WZqtheckTMy4sEMV3isn5KLmuytlwp3abioyv744J
+gSs+XK39BPsbpIby4fBXU+9cSd4Pu/nEN/1aW1PhRj5DFAwzFo/zH8Lh0UKD
+QliiL+UwbFGPuqDcCPtR7g41bjCP9eDdWeLB/F3xZLxrcAsb9UrP+DzIhuWi
+xO4KOCeJPawi/uzG80F/16ye+TTDWap6Vj/seUl1/w843anWZQXyoHw7Ulth
+tfkRvUhYM3JnQx1Zfyqq6BRcn1toXETWs32ULIPZvAzv07BwxtOLObBdhKBo
+N6zw+VN5Ap5g9c8i9SpW6ou2w4onBcdNYZOV9UsXwu4Hg1bo0C/dJNtwCvXI
+XUtWNcHisZbztai/LzT2ej6cpSlLUaNfzxLFxpMwz06Z1oF8HEej2vaRPCuN
+JuuMaOq1WnViN0wxP/bKDWnqcVjp3kiS541kSZoB8t7/fn4crDRLsj3IxPkf
+7VNJYfXo+MA+fdzv5z16crJ+9MTCk7No6hg7L6IN5pjP9q6ciTrvlj6cJPXe
+VHYZwvLYzR2rSB6OQ7+eZuC8Ig3Vh2B/ekqyAma/XDJYAyvJ92kG7j/5PtnR
+/wFp5VhF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.084117857803797, 7.68830612320434}, \
+{1, 1}], LineBox[{{6.4999999999976925`, 13.5}, {13.49999999999251, 13.5}}], 
+        PolygonBox[{{10.6, 13.5}, {9.4, 13.1}, {9.4, 13.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.5548}, {0, 1}], 
+        LineBox[{{6.5, 13.500000000002307`}, {6.5, 6.499999999998607}}], 
+        PolygonBox[{{6.5, 10.6}, {6.1, 9.4}, {6.9, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.}, {1, 0}], 
+        LineBox[{{13.5, 6.4999999999976925`}, {13.5, 13.49999999999251}}], 
+        PolygonBox[{{13.5, 9.4}, {13.9, 10.6}, {13.1, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.095161292761041, 9.350096513122315}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{9.4, 6.5}, {10.6, 6.9}, {10.6, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{6.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{13.5, 13.5}], PointBox[{6.5, 6.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN0fB/CbbHkiJCbZQ8JEi6w1ozxCkSxZWkwqUZFCSAst1miKihYp
+2RIpEiGTxKDRpCxRUilTSZQkit/nPD//3Nfbufec7/meZc696t57nLYLURS1
+cgpFkSvFn8SfAZMSJ9BlUnGCNiMOnFvezXo5n0kVOEgmHYCZH9uuVcI8z/rX
+hjD/qq1kPrx4Xc3cDwuYlM31k8FZsMLph0Fp8ODVjQtvwge8NN6uhUdX2ClX
+wzvTg/wkYMEZ65TXcHL4wJtGOpOS/rQ8QhTtC33P7DwD82ceX20CM8+oX9sK
+586O0dgLn5dcqrkcNqTbthbC3Qs3f9Yg9zuUin6DW+st5GRhlpgw00CPSSUs
+WL/+HzjyC03CH758WOmvJFw2MiKaDeuF6A/T4NSHGhId8AvrwGe6cJjUdIMp
++kwqxOXue0uYWcvuV4Uf2apYbSTxrn2muRie97TqUygc6FxsaAYveXHqAYnf
+Xf3SxyXwnT2/S27A4qnKl+bCC8eGXlXBAqPjGmJwYtR4KOk/q9nvQQ/aPz2q
+9M9T2PdWpuId2P6nZsB/+WmXNT4Ef606315B+m8r5mIFp57j9V4jz/dJdE2D
+dwV/vXyExDMqZM1HPpSfXQhxIi7LFbkAC9I9rJTgWG2Wrx/cntbO6EYc0tGB
+R5lwVmzwQBoc1pZMU4d/8+MU1sHcXfcTp8Pbts68LQJHPnnwYircqBnaVI52
+yzZc9hGDx46ZH9wDs6tTlinAJgOxXB2Y5rCldRH8RNqF3YcrX+G0oQeu8RNi
+EQW4stjl72JxpVpCP0bgKh6mpcrBdYJb3+FMyhO3Nv3BtULzzU8j4jMjKRao
+tzzxaZgGzP1qPY3kZ0ttyMLZZN6MdRdWwPqtu6KJOU++qozATbtMIsj9qSHT
+VHTRj/xlEfdJXDbxC4td4Wi/gkwb0n6XpkUonCbo2+ANF/FMDifC8opT3x4i
+5d3Cxedhz412KmmwWrUX+yw85eDAlDskvpYNq2Pg5XM9z9TBHQaa5/yJ808K
+tZL2GPxUW7iXk1fbBZc9DP2gRNovmEh7ScppQr6fEC9l2nGFR54/7eZ0m4x3
+/XX3e8StHJFQeIqf8O1z5PkLm8ZIPvx3naF2w77sW1kisIkES5Sso54hxpbn
+uC4ztno7jnU3SN/ulAvvP7RWuBzuOKHhEg3v6OqctxfO6BHpDYAr45qMtWEd
+0wbZrTD9XA2jUwfzxXx9OPGVSuH1p2D+zsuLAsl4WQyfWAWr+UZ2kvHc+27s
+vjBMhXeevglXfaq6yZ2H/aDikFgnbET35aXAaubcEzMQr4bjQ7Od8OA9K+HV
+ML0i/44tnLH2qkU8rDp6JGExzC2dW9MIr5FJKZoHO87LU5RA/jYels3UgiON
+DDv+ha9kKRzRh3NXfrgdAfd97RE2h5nety7mwWIBhVlrYcMvdl08+LZNS7Iv
+7O5NU+wj98vYtB6DU7UE+4ZhuRw59yswjbck4ifsm35JrBwWp/uv+gx3Js56
+10zqa1Tf+RwO2mUk+QZmGakM3IY/iq/+1AebyOX/Nz8GRMfVBaS+iB0eZP4J
+WoYrumGbfFdTFThjg6xqE9wT3L2iF/3liB9QKoA7eAWf8+CqI8cGj8O+flvy
+9sLV/quZzqT/jlLvlsHvJ6Rmzib9MbjeIA0bmCbXt2uT/VPfsR/5l/5XRPQ0
+sVDz9BY4RvVDoTXM9vejP4I/dt+oH9PC/LL030nWY8KCge234MhIv8kG+K5+
+X5oPLG2Yl/sGTmJre2jAgpz+LIrsCzzWzl5N9IeuU6MHi7UqORfCJt9GvLxg
+rf1TbaJgqt8yPg3Wtd6rthl2HAgQJ/vxFc0m+3/h1F2rQmjIR3XGQNtSOGN6
+vps7vFf0q9si2NBwhgVZfxmJM0WNSXvRtbwnsD9fvmwlPMicGPgDnxaV/L4e
+VjPLbJ6LfbB6U8VwAClfJj7OgGvPpT6NI45pCXSEhW2agrPgwDl+WS7w/ibX
+5mqYvT3u5Bp4R8vZ522wb/7jVBN4m7VZuoDEryconQ2HZLcf+gHn7t1pNUTm
+l/W6aSPwqOzWKQ9h+qxt9G8wp+rARDzZZ0WrjLtJf2OuxZB9V/exTncNrPPM
+Z7oCrOB5xvIyzHzcItqN/Kwqvt3vD5c59L3NhaVtQ5uNSLy8mz3hcLdGgOHI
+XMR3vUfUGWZoheYVwUULDISXwu8cfCR3wNJ+fA1N8vwzXc85MLPUzEwFNvey
+ynyqgfGaDM4m5ZKlHn9OwMyqLVbG8J5NvK1MOIM+P8gVXsmjF1Kwu0yJ4mH4
+r5FrEFcd+aINl96C8+vH/6bCRXEndgjgOcPblwfBZS/Fp2qjf38n73Hc4Miz
+u+k+8Kkopxxr2PeuZWA2zLu3N48BM4NUXXrhg1nK8itI/Z3SB5SR71tua7rW
+wBlDIiVr4e/H+tmb4Z4za+aEw2L7fWJC4Nyt8zVT4YGsvx2nYNZkXUE+fLDZ
+61A+zKG3SxbDRmPnN9fBNI8AhUJY50liQDcceKVF6TIZ/+uLK4dg6pVefyTs
+dTYuZgLm1iyt94T1FXOcpyIfnATH9fqwVa3MCCm3ucw6/4ucH1pqrg2S+hmO
+DQ/gfbe9htvh2I/vXY6T/SvScbCExFfcW2wH8w3jRWNhR80LbnJwjaqUpBN5
+Xv/iqffIp6e9vbEcHOY2tvc+7H6nfhpfDfmpq3l8AR7U22EXA6u9yxw8AR81
+Mx4wh4v6YgUH4YBluyV6VDH/fhXNj4TlzVXtVsOOXQW3T8HfP5nmVKlg/uoc
+mrwBXxif0WsGq1Xdpz0jv1clz5zqlLH+P5QmU4jPKmVNsTfM1xbPNoaTSs/I
+y8IUQ8g4mOx32gUNrUrYP4ecfxaT/fv+EptC4tP9AWS/XaO5wfgiTOtbpLsY
++av8dc6P2NEnrtofdpz95PNNOLCA9v0qfPTePjkeTDX21PHIej3VnzuqRNbT
+3LRvsO6ugWE9tG+zz1VPFOdQ7pasnyQ+plBfsTRcVyl1NA3mmnt/kIJ9qzpC
+mki5TtwQBSsWyr4ahmPFXGP6yLnq2bCCLPpv0/a56RGcYaYkoQYLyngO52Eh
+jQpDJZKf19zf5BzbK7XvoTC5P27pXz2Ya19f0YH6OOw95WR/SJI5/OM87Fuy
+OvsePKLrLbuStBdyyzQSblsWcroL/eEW0pvt4Z0Wj/K2wrEJNfEacPOP8GXd
+c1Cf3rU1JP+0WIP7DjC3ZzKZrLelCvE/yxQxH5xSgl+R8ZS6K6IOG5odjSfe
+rWKhkDAb689h+jC5X443YTlOQz3WmxzJefiV2u/NIbBNVMAjTXhi3tmePwrI
+j/yHCbJfjcqo3kqBwx7HrSW/b2aZjRIMeLCTX1hD5sPKI8F/5TFuSlXtU8i5
+vdIjnQ+P2ltvXgGbyRzbVga7/1rHjYLPVWU1F8PsXosccm7e9mBo9kNYoDpQ
+9AN2il/V9Brmfw1sV8f4fFRv5oqivdHTGput4WZ6f7gJ3HEt7YsXLM/y7A9Q
+IOeRpPP+cInssz9ZsE2Q0XAAPKZeGPUSzi27IbsNPtncFSKC/nL6LY/aw0nj
+yzW0aeS8wLHThxv1haxMiEc5b6fAR38tWmAKR3Iz5/DJe0SK2wdyf5nbPVoa
++T0x6VlMwSav7Qy8YCnm1dJatKdTee65Jpkfqq09wTDt8Z7D/chX9uKDv2Rg
+9vnG5DKyPhJthdPlyXqZZZdAxmP4GmcOXKSwM5nslz1GJ8OTZmG+l4ZNWwNr
+jKd//S2H/GtNf21B5tecAG1vOHUbp8EUvlH4zqFpJvq7L1hqJex4mRlrCheJ
+1ewkv6+9PknVRbKYj7Vn1cPhS68VTiyBI+V51HX4xcuCvnoZzPuFCf7t5L1g
+gYqrP2zT9ThYhvRHb36UNim39npD9uPehhHnYWm0c+2vDZvMfzlOTxssXl1i
+QvJlkTl9Ow8OizhmJkny7ZHgSMrdtdNHrWDqzxLXbzBbK8o5BE7JkTkyC/W7
+c5+HXoJpdflO/8qQ9w/ToTI4eNvI4AFiz3XlDbDwpyWMO7DvTKsVzXClhK1M
+H6xz/uDBOpi9tdhlFvpnErKq/Q787lWCmSmsNu5mkQI/efFw81q4yNtLdDfM
+fz7jiwspN1f4YQ4vrzMrWQULOhxkyP7i6bzHURtmlpTkPyHjz27TGkR7/DVL
+F5L3xA5WU2AWPCr9eY4HfEAk0HIVnPr2RDs5n1yYWRnYjv7GHvHLJfuhoX5Q
+ojscaL08hZxXizzZxy7OQL6clO2L4NqWsO0hUujP/Jlq6eR91E/+rrUk4lt7
+t4+8r2zstqtWmI55stRlKikfzeY+H5RAvds1ncnzl0o8v72chvz4RJs2k/Nu
+2DG/TnHMfw/W1RFS36HHuaNimE+xq6bpIL4XZpk9prD7S9FkFjz4z2TXVVHE
+9+GtfDrZr3WF2xbBsaLNpt2wi6ve1q8iiEeu8oQK8vNi5qpdfJjFGj26ETYZ
+f77kJSl3uPjsLBnvv/JRU/H8oKXwCi6syfl4zxYuSvf+MgSHvdigngWnnt3G
+kDFA//bL6UkhHp0JpqIWHPvZsvQgiW98f7M+rGm6YZcAjtzRqKcD19opSNui
+f77SRlEK8E0t01fnxMl8LEsbJ/EZPm5ohMO4i0paYbm72193w4GuJ/bnLCDv
+SXLbmmFWxoVX++CySfZc8jxXd2iuGawjmxOxBBZkHyuZJOM9Ob4/j+Tv3JhY
+HXx8dXbjCOJXc5nHPgXbLL9Yqwq7pz69vJnkLzpz/nzkgwrm2RiR/Y9hJDxb
+GM9/C/ecRZ7HMWlECP2hLM0puKjis2rDFIxnp1IvGa9c5/I9aRT+H5L04jcs
+HpDu8WaCQZlUH5CcRvZfx8R3OX8YVEagugzZfxwjlRMvjjGo2CG6wJbsXzlb
+btWPMqjc7wV65PwUqKzoYfyLQQ0ORc8sIt81rua8/f6TQUkHt8b2k+8W5TPO
+TA4zKJpvmDnZH3NzYgO84NTQz+VkvbCuV6rLwCyHoPh8uGN5qoQ0zJErsPoI
+q32R3e0C84XcbihiPKghoarnxItCHljDHfWP5KJIez5PX/rCtGz7IvsR1Hdq
+vOIIzJH2jp+P+DKSrVLjyfMGBZQw4me7C5TjYK6p8ZEnMMvcPSKCfOeKZ+oF
+/cb9uz03esM21nnRn2CTfarvl8Nhyk4ic5EPrljyJVlS/92gpFlw2T1W4Buy
+/q3KestxPxOJJPOB+fTD4D+w2jSuE/l9CQuT75dAezoV60wWw5zohh3liJfP
+NSwZJ991BkMXK6M/hrv/qjeQ71C699UYPxBfnusNcr6UNvHJ1R2CVS/qR9DJ
+OfOCoPMrgxrlZ+qR8wRVW3ad/gnlyloP1sM9x5PpAb0MSrwg/Nh/nvWwOeIN
+g3KnL73sTb4ThYQujmhD/LOeFhwgz5c57Dd8AvtuekXao+oMRnXuo7/xG16T
+707//RVV/f/74ALm/wBpUU4y
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.76814822984937, 16.138025500903524}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 17.000000000003638`}, {
+          5.5000000000045475`, 11.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.950887509261843, 15.744254101457688}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1QlMk2cYB/C6IsLCkAh4IMYpVLmcUIuKB3yCLqRsilAPDqcrYKlyVLwY
+VgQts7gqHjChMCxZXRgWrdcssRp0jHrUoJRKNYUgcqOldEBBRPZ/tzVpm1/e
+73m+//OkzbeAmx6V9BmNRkvCm3z/9+FP0UYn8fKmaMz6vE+ecCZDNUT3oWjS
+bJMDG5Z4MKrGcX5j1SFLKuyiWGXqgoNlM04UwNv782fVwxmKzYpqeL3+1BQp
+LCudn6uBOboAeiIcJbGEGWHttqA2Brl++ru0ftjO9cHtN14UzX/dxZohON4w
+620JbPOtjfso3OZ+bSAS3rh2fsMw6Z+zNd0ertsbzDbBfk7mzr8WU7T24/Tg
+dviRa9MVMeySrpE0wj0Jzk3RsEraQdWSvGdvuHrDgmXsXAXp19Cssod7JvWi
+Yrj2WY14ZBFyXJsU5ZH57/U+GYBlVp7yABxpv33NMFw53jqPBxtjWC62qN8T
+IajdQe6/O99hASw/Y42PgTsClgvWw1pXZW4s6X/0ypI0uOzl3JzvYRld9r4U
+fq4U8dNg/z0P/Z6SPFuCHXNJ/jmbto0R216fJPnUQXGdHphfbJhZdBuuXFN+
+KBx2LL1j0cMpLeJ3ifBsT47zGOxgOpV7GNbeidHNC6BoH0PExmy48A/uRCjs
+rvltfhZcFntkG4+YqRtMhm0Nxcp8WBFx4XgErBy9+r4Szpz78eRCWJDW5FoH
+p/i1Lx9Avi6eOf41vNJYEngTHrIR+vXD8bGv8gWwG9/qPULqj504TvZfL3i6
+ahwW/bSpvA37jE1KzfsAt61LFBST/a9QpQ/BrA3Oomi4PfO0tBd+5NxPucCh
+QabX5H5qZtRzI4OiWW40+z+Gn3/5bOo12G59uPo2qY/8my2BVXGdygqYGjAV
+HISF056En4ErUwLW7YWDRxzvCOFCybPQVHJ+/5JbGtwz/vtgFvyz/v2+BHK+
+9pjPBbhsnt3ZHbAwgrP1FmyUnXEmlkwbPELyzKju3Mkl/Zknt9iT30uLpTgV
+Vu2S81fCnvrzFdmkf3jcIh58v8jgXgTnJGdNnIfFrXYZSljAlubUwDZjDF0D
+nJjYcMRA6kPrNljIPje//sIEd8jrq2cy8b+4rFWPwurw069Ww7cOhPxohUUa
+p4JdsPYbfl8v3PN5bMkJWP2gZLABZnc91P8KO61o9a2CubpUqhaWN+qqfoCz
+n+6dbCb9xX3DIXDxddeUPrh4o3TsE+ZtFTHdrHCiQ5hFBW+vKzVOwIqjl6IF
+cMaUJZpPsOFPQ/ViWJbUu+QDbMPnnnvjSdH6yndVmGGVXpchg736snraYfHq
+oYLdcKzQbH1B6lVfNgfCTQuedN8n85x3a5wOq/Z/110Fd5gZRcMeyHNhk/9F
+2MGHebMbZm6YPSaC3QWnV3TBPmN3eQfhwpbky2ZyfYtvHh8eWsqcmIp+Xd79
+AVy4Nk+s8YSlS9Pdyf5YthxGBJx9V16TAHvRIzsOwY333oWkwsq4RRcvk3xB
+GrmQ7Oums7IJtp3z9S/n4LMsc9kUzM+xC6u4AnMY/LfecBcVOPiY5M8KXBMB
+Z3J45f2k3zk3RQJ8i76saPoy7Jt1tWQf7NjdWMmCy150te6HI6lwWQysfazS
+8+GXXE3YUVjotXxnNFzInrWnHHZJbu/wh6MOb56qhlWVvhw6HGo++JUeVs9d
+7aJFXidfztJe2CCTjEjghx1xp6yw3DqyMBz+9/nB+v/54UH9AzZnaeA=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.3252, 12.135199999999998}, {-1, -1}], 
+        LineBox[CompressedData["
+1:eJwt1gs41PkaB/C/u4g4nKgOO1kKFako2vSjUumyWygUjSRq0eROu51/0WWj
+6WIVxZmJWpc2l7Y9HJzMOlvKtTSFSCKmdoe2pM1RnO+7ezyPZ57P877/3++9
+zMwzM3fu2xyiynFcJv7p9c8/G/bnqwHjROJqhTt82nUwwwuee//c6TRYlBEz
+JIafT1U7/BiWTbPpLoa33l2jb2uL/P2yk2XwguKfohPg0vnK0+fgSFPDiVrY
+oD/r10C45mXhXK05iBf4aujBK+Sqd9xhmUTFZO0UxgXNG9GMgYWtgmPe+ozr
+FL6RZMGC/wxIVusx7pbwQ8d1yl88T243mXEfjS9m1MD8Ym9bE13GXdAWbpTB
+3NilC3o6jAswGjD+J8U/9Y40n8S4K5MzD+WSu+zyvbVx39/6pMfIDcq4f2kx
+rrWqviOU7o+Y1+QFC3+bdm8V3ecVpmINqyTmrbCEpbYGOYvhVOWsIQ3K9z60
+5hBsHn8oaBD99pwt6ORwvuacJkUXLAhNP1MCG4+M7n5E8fG921NQz++ebG0n
+OfmOTwzqvVp+5ksl5Q+/XhWNftZtfPYXHZzf81nU0hj0GxJw98VCmDncmLMX
+85DzFRNhZL7t2zWY17SHUd35VK9IYaqOeZpN8Ts7RPXmKXXS4X066XUuc1Hv
+16qKQTjJ6E3/N/Bvac1tWthHY5ilQwfM4hPnvEP8jXbRL1bzkJ/tpJIL+796
+Hh0B81puJVPh+q9zIq/BUnmM0B/3KzRDH/fBnN8ZSSzqq/SPnzfFDs8PLxqM
+Qv1BfdWhdmTJkWWB6G9Y7PGJGzm7PXgl+k/sDT6yGmZ5J6IXYD6NM1x3uVO8
+v8bMEfP7Sqb914VkzZdGvph3b9+KfTNgWUFx3BVNxnl59pR9pHrfevpawWMe
+QaFdZBbq+0SDcUenbvGohFns1sB7cElu2ZQLcI+1cew4XPH4UvhByje9Xr8L
+z9u+Otm0h+I/BDz4CMfEydcFUnymjfgn3D/0d9mpAIrf3vriCurbd+h9VRjF
+nXxdJKh/vd/uHTzNoyCwXYr+Dh9fHXmZHPGPkhz0b2VX7S6n+dUnvziO+bwJ
+br6sT/04GB7dgvllDIo7NsGCx1f+OwavsE6ruEj9339XJMK811hl3X4JSz/v
+8S2GNa9mejvbI/6wR1QG29xpkh6DZW0HnBJhDwvj0fswJ9vepKWPd03YnCGd
++chvv2O+U4/x5WOtadZwj2FR9qnJjHeJuDHCKN46uz8L9dqHXDvqBQuC1q5L
+02H85teCgR2wzCzcMxr9To/aqLUb5lcE/rpNm/GSiCFbsrBOaoHPE68+otcl
+JEfm24fQPPs/f7mFno99pp6jwfjGdwr/tXR/vaJGDfvYZNwY4gxLF4Uskaoz
+TvVd5Xaqj7+74GqcOuPTb9yXmJAdbh05Dkd2HEjVpvNT4rzlyFfctGh5j35Z
++HG5D+37B0XxC+pfOGGtiftF7k/P99J86ursu+CEWYJXClgQrjHciP0WbX6V
+Omr/x+fdoRH9PAnKf6RL5wcde9uIft1i4sYEMMswc6zFPLzPN1Uupfks35Qo
+wbw8ok74bKP6f1y63w/7Vdvrfu8g9Xf27eEBzNdXP2riMlla6bYc+w1WVz3X
+SOddnl4fiH1wjhGOb2k+uRfH3eElJTUHpzugfsHEJSXOszO5+KkrLN3SsmEH
+7GQX8S4AFrSWrrqky/iGCf3RBFiYkGtThfefn6HJHjHMF78+UY76LS6uupsD
+syGjPbl4/8oVGYrv6DzL2uzj6N+qovBpIT1vJl4Sj/no94mm5ZMjvx9Iwr6W
+2JmvlMCyjJZ1Esxf37lgQzrFr5fFDakx7r0Z25pC559aHyyCM3U25EdTPLjh
+vK0a48sqLmTtpH4SVHs+gWcrD4o3U3zvTdsvkO/QebtjJfUzM+tEBeKjhuy6
+C53n7unvhf3e7SywcKS4btlhU9Rz/knth0Xk9QuffoRP2Fu3UL5QN6Pqd9Sf
+YhHU7UHPL50fMor+luWdnulH8TXJd0awX5/qHvf95NZoo55JjLd3LcqjebFJ
+Yd7fY37XVlruKqX5qPD6X2C+w3GfRT6k+wZuVtVi33Viw+QPNI+BB07jsNuL
+ME/LBdjv8iCtCeS3We0IXgdzevonf0Y89VxKrAgWqq/X2gQvqz3tdhZmhaLE
+QtyXlfGktAQWZH4V/hD7cnn0sreO8lsyznRjX3amS5c8Jn95c+099LPZ0tR/
+gPKjc0zLNRm/V6PaVUn3ty2YJMX7/728yYYssB/XzcS+AmpMCilfmC7achXz
+PbL+u5NdlH92f8NzVcY7J1951kz1WG6M2aDKuIOPEjtvwnxhtoFSBd9P3I/N
+1yg+K6X2ZxXGJwVdmpFDLo3pbEd87lN7czHl9zU2zMJ5420zzA6TZy92KsJ5
+fYZTXZKonnvNVttx/4euyuB4WKaM2LUQ+7WPUvGkOFc/orTEPiPUbvgkU326
+k2Is0V97uH8ezYvLPc9Z4ftlW8MjlQIya0+bhn3Gx956W0vW6s2n/XZbJ1f2
+Un1yA4NizDN1UOyjuRD7rCl3dcbn11H0IHMuLNyxrfsU5v/viOVO3hSXlVtd
+Q3y++vvmAzBfOtuI4uGybeq5FP829YgT4q/11L65Bcuykxzycb7R7V/m91O+
+dGW0Avf/8Ttr0f9/b2mz/wHsVWpK
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.952631629795212, 1.8745372234640723}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVKetkgssJLdMJCCZliGyBiPWWF2oFCU
+CZ3NyAYKwzqQR+iQ6UaIFHkPNqoypdqNN+Et25Aw2DIYRUoHS52M+D/GJu3N
+L/e755zv33OPmyQ7Nt2MoigxvuRKWZEfL5r67/MKTdE2okpnWHX9JPsIPB2V
+WRQNm7rvr1yC6yRtxmJSn/LXnnly/ypnawJmHtKZW3rSVPdEdT/Hm6bUptnT
+HjBbPvSCApbZ6sL84Hy58fUp2DTI+sINTqriKj18UPd7aS8DnpvU6rJgijVb
+MYvx+1529GsmXt7oJfObczb0f8Aym2+vJ8PdtdZBj2G1VdenTjCr0+6jHXiu
+jOk470FTVlw/9hYs7WUrG2CmUGg3D/OCLgfI4XDVlHUPvOKVWJ8MF/VGakvg
+gWt/vhcHN+xbOvUObMGO+CUF5gacGnYj81/Y7FaQ59UCqRH9GBiaxy1wgt6/
+aRjWnFds6GFdpOLdTpht8aNtMNYX11L6wfcwt3qPXgmzHXJvtZD60cqaZZgj
+Mgu+CYvapNsC5PHhi2cPb8ArR0y2n8OiwgipF+bXRDGybsHm1idnZKTfT/ip
+JlhWuED9BjOzhAdYXORcOtTG8qWpkm1ZGQdO45lHyGBu8mcCF1g9teSgg9kP
+ZlIZsN7GXmfrR1MdIe05tzEeFeF0IgZebLiyWg8rvQsNBbDozK5TGnFjQPx3
+8Aqn9RH5P+nNkvYWmJdWmXMP/Rh6pqPUsJSxv70R1j/yqK+ENcuD/nI49/Tk
+mznweFPMz0dhVZhEFw6rR/pd3oJ1C1OCfbDF9t/rYrLfvhIEL2C96htOeZmw
+71habissGh28WkP278XnUopg2qcicRoOPBTz8ARs0i/buGJ906PnQhJgXuFQ
+uYzku6spSiTPZ1607Id1ed+MZ8EDwlaJM/IQlZVuVcHlzj9VZMINc5LqYZji
+TzxrhyltVygT65tzT/r1Acl38XZxKswcuLm+F+9FoNwn4Rps6Dg64gjXGcXu
+1v7Ie42x+hKsTHcUSuDxaaO7Gdxyo9i9A07gqy7fxXh1c0MzRlhWYHmlEd5Z
+fWrj+SpNBR0MOZwBs2VPzkXD5eIeGRceye40TyL3Z4dcH5J+msW1x2BD7PH0
+Zvj+P1oFqddEfr0phwPXdWY+xPravnhS//x6PgW/XVpzNxzuy/VcHcP8x/lf
+ur8BC9cuzdTCA65C/jF4hHVhTQqL5DvRhbBvdmhXKBxksM/phXn274e5wOrd
+rQKyvwx3BE8sYaZpKz0Onj94J3gv3BFlkP4Ad2vvJTkQj72WR84lRcaK4gCc
+vxR2RgxX5SoLs2CVVatWBTdwrINJXqwiju8kzM0Jz3hG8mqXVj8lees+3h+L
+fkyd8SZbvEd1FfzFJpJH9tlqO9iCnHu8/88/b/pf0S3MLw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.761512611302877, 10.651252930219968}, \
+{-1, 1}], LineBox[{{5.5, 3.9999999999976925`}, {5.5, 10.99999999999251}}], 
+        PolygonBox[{{5.5, 6.9}, {5.9, 8.1}, {5.1, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 7.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 4.}, {12.49999999999251, 4.}}], 
+        PolygonBox[{{9.6, 4.}, {8.4, 3.6}, {8.4, 4.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 3.0548}, {0, 1}], 
+        LineBox[{{5.4999999999976925`, 11.}, {12.49999999999251, 11.}}], 
+        PolygonBox[{{8.4, 11.}, {9.6, 10.6}, {9.6, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 10.0548}, {0, 1}], 
+        LineBox[{{12.5, 3.9999999999976925`}, {12.5, 10.99999999999251}}], 
+        PolygonBox[{{12.5, 8.1}, {12.9, 6.9}, {12.1, 6.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 7.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{16., 13.}], PointBox[{5.5, 4.}], 
+         PointBox[{5.5, 11.}], PointBox[{12.5, 4.}], PointBox[{12.5, 11.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN0fB/CbbHkiJCbZQ8JEi6w1ozxCkSxZWkwqUZFCSAst1miKihYp
+2RIpEiGTxKDRpCxRUilTSZQkit/nPD//3Nfbufec7/meZc696t57nLYLURS1
+cgpFkSvFn8SfAZMSJ9BlUnGCNiMOnFvezXo5n0kVOEgmHYCZH9uuVcI8z/rX
+hjD/qq1kPrx4Xc3cDwuYlM31k8FZsMLph0Fp8ODVjQtvwge8NN6uhUdX2ClX
+wzvTg/wkYMEZ65TXcHL4wJtGOpOS/rQ8QhTtC33P7DwD82ceX20CM8+oX9sK
+586O0dgLn5dcqrkcNqTbthbC3Qs3f9Yg9zuUin6DW+st5GRhlpgw00CPSSUs
+WL/+HzjyC03CH758WOmvJFw2MiKaDeuF6A/T4NSHGhId8AvrwGe6cJjUdIMp
++kwqxOXue0uYWcvuV4Uf2apYbSTxrn2muRie97TqUygc6FxsaAYveXHqAYnf
+Xf3SxyXwnT2/S27A4qnKl+bCC8eGXlXBAqPjGmJwYtR4KOk/q9nvQQ/aPz2q
+9M9T2PdWpuId2P6nZsB/+WmXNT4Ef606315B+m8r5mIFp57j9V4jz/dJdE2D
+dwV/vXyExDMqZM1HPpSfXQhxIi7LFbkAC9I9rJTgWG2Wrx/cntbO6EYc0tGB
+R5lwVmzwQBoc1pZMU4d/8+MU1sHcXfcTp8Pbts68LQJHPnnwYircqBnaVI52
+yzZc9hGDx46ZH9wDs6tTlinAJgOxXB2Y5rCldRH8RNqF3YcrX+G0oQeu8RNi
+EQW4stjl72JxpVpCP0bgKh6mpcrBdYJb3+FMyhO3Nv3BtULzzU8j4jMjKRao
+tzzxaZgGzP1qPY3kZ0ttyMLZZN6MdRdWwPqtu6KJOU++qozATbtMIsj9qSHT
+VHTRj/xlEfdJXDbxC4td4Wi/gkwb0n6XpkUonCbo2+ANF/FMDifC8opT3x4i
+5d3Cxedhz412KmmwWrUX+yw85eDAlDskvpYNq2Pg5XM9z9TBHQaa5/yJ808K
+tZL2GPxUW7iXk1fbBZc9DP2gRNovmEh7ScppQr6fEC9l2nGFR54/7eZ0m4x3
+/XX3e8StHJFQeIqf8O1z5PkLm8ZIPvx3naF2w77sW1kisIkES5Sso54hxpbn
+uC4ztno7jnU3SN/ulAvvP7RWuBzuOKHhEg3v6OqctxfO6BHpDYAr45qMtWEd
+0wbZrTD9XA2jUwfzxXx9OPGVSuH1p2D+zsuLAsl4WQyfWAWr+UZ2kvHc+27s
+vjBMhXeevglXfaq6yZ2H/aDikFgnbET35aXAaubcEzMQr4bjQ7Od8OA9K+HV
+ML0i/44tnLH2qkU8rDp6JGExzC2dW9MIr5FJKZoHO87LU5RA/jYels3UgiON
+DDv+ha9kKRzRh3NXfrgdAfd97RE2h5nety7mwWIBhVlrYcMvdl08+LZNS7Iv
+7O5NU+wj98vYtB6DU7UE+4ZhuRw59yswjbck4ifsm35JrBwWp/uv+gx3Js56
+10zqa1Tf+RwO2mUk+QZmGakM3IY/iq/+1AebyOX/Nz8GRMfVBaS+iB0eZP4J
+WoYrumGbfFdTFThjg6xqE9wT3L2iF/3liB9QKoA7eAWf8+CqI8cGj8O+flvy
+9sLV/quZzqT/jlLvlsHvJ6Rmzib9MbjeIA0bmCbXt2uT/VPfsR/5l/5XRPQ0
+sVDz9BY4RvVDoTXM9vejP4I/dt+oH9PC/LL030nWY8KCge234MhIv8kG+K5+
+X5oPLG2Yl/sGTmJre2jAgpz+LIrsCzzWzl5N9IeuU6MHi7UqORfCJt9GvLxg
+rf1TbaJgqt8yPg3Wtd6rthl2HAgQJ/vxFc0m+3/h1F2rQmjIR3XGQNtSOGN6
+vps7vFf0q9si2NBwhgVZfxmJM0WNSXvRtbwnsD9fvmwlPMicGPgDnxaV/L4e
+VjPLbJ6LfbB6U8VwAClfJj7OgGvPpT6NI45pCXSEhW2agrPgwDl+WS7w/ibX
+5mqYvT3u5Bp4R8vZ522wb/7jVBN4m7VZuoDEryconQ2HZLcf+gHn7t1pNUTm
+l/W6aSPwqOzWKQ9h+qxt9G8wp+rARDzZZ0WrjLtJf2OuxZB9V/exTncNrPPM
+Z7oCrOB5xvIyzHzcItqN/Kwqvt3vD5c59L3NhaVtQ5uNSLy8mz3hcLdGgOHI
+XMR3vUfUGWZoheYVwUULDISXwu8cfCR3wNJ+fA1N8vwzXc85MLPUzEwFNvey
+ynyqgfGaDM4m5ZKlHn9OwMyqLVbG8J5NvK1MOIM+P8gVXsmjF1Kwu0yJ4mH4
+r5FrEFcd+aINl96C8+vH/6bCRXEndgjgOcPblwfBZS/Fp2qjf38n73Hc4Miz
+u+k+8Kkopxxr2PeuZWA2zLu3N48BM4NUXXrhg1nK8itI/Z3SB5SR71tua7rW
+wBlDIiVr4e/H+tmb4Z4za+aEw2L7fWJC4Nyt8zVT4YGsvx2nYNZkXUE+fLDZ
+61A+zKG3SxbDRmPnN9fBNI8AhUJY50liQDcceKVF6TIZ/+uLK4dg6pVefyTs
+dTYuZgLm1iyt94T1FXOcpyIfnATH9fqwVa3MCCm3ucw6/4ucH1pqrg2S+hmO
+DQ/gfbe9htvh2I/vXY6T/SvScbCExFfcW2wH8w3jRWNhR80LbnJwjaqUpBN5
+Xv/iqffIp6e9vbEcHOY2tvc+7H6nfhpfDfmpq3l8AR7U22EXA6u9yxw8AR81
+Mx4wh4v6YgUH4YBluyV6VDH/fhXNj4TlzVXtVsOOXQW3T8HfP5nmVKlg/uoc
+mrwBXxif0WsGq1Xdpz0jv1clz5zqlLH+P5QmU4jPKmVNsTfM1xbPNoaTSs/I
+y8IUQ8g4mOx32gUNrUrYP4ecfxaT/fv+EptC4tP9AWS/XaO5wfgiTOtbpLsY
++av8dc6P2NEnrtofdpz95PNNOLCA9v0qfPTePjkeTDX21PHIej3VnzuqRNbT
+3LRvsO6ugWE9tG+zz1VPFOdQ7pasnyQ+plBfsTRcVyl1NA3mmnt/kIJ9qzpC
+mki5TtwQBSsWyr4ahmPFXGP6yLnq2bCCLPpv0/a56RGcYaYkoQYLyngO52Eh
+jQpDJZKf19zf5BzbK7XvoTC5P27pXz2Ya19f0YH6OOw95WR/SJI5/OM87Fuy
+OvsePKLrLbuStBdyyzQSblsWcroL/eEW0pvt4Z0Wj/K2wrEJNfEacPOP8GXd
+c1Cf3rU1JP+0WIP7DjC3ZzKZrLelCvE/yxQxH5xSgl+R8ZS6K6IOG5odjSfe
+rWKhkDAb689h+jC5X443YTlOQz3WmxzJefiV2u/NIbBNVMAjTXhi3tmePwrI
+j/yHCbJfjcqo3kqBwx7HrSW/b2aZjRIMeLCTX1hD5sPKI8F/5TFuSlXtU8i5
+vdIjnQ+P2ltvXgGbyRzbVga7/1rHjYLPVWU1F8PsXosccm7e9mBo9kNYoDpQ
+9AN2il/V9Brmfw1sV8f4fFRv5oqivdHTGput4WZ6f7gJ3HEt7YsXLM/y7A9Q
+IOeRpPP+cInssz9ZsE2Q0XAAPKZeGPUSzi27IbsNPtncFSKC/nL6LY/aw0nj
+yzW0aeS8wLHThxv1haxMiEc5b6fAR38tWmAKR3Iz5/DJe0SK2wdyf5nbPVoa
++T0x6VlMwSav7Qy8YCnm1dJatKdTee65Jpkfqq09wTDt8Z7D/chX9uKDv2Rg
+9vnG5DKyPhJthdPlyXqZZZdAxmP4GmcOXKSwM5nslz1GJ8OTZmG+l4ZNWwNr
+jKd//S2H/GtNf21B5tecAG1vOHUbp8EUvlH4zqFpJvq7L1hqJex4mRlrCheJ
+1ewkv6+9PknVRbKYj7Vn1cPhS68VTiyBI+V51HX4xcuCvnoZzPuFCf7t5L1g
+gYqrP2zT9ThYhvRHb36UNim39npD9uPehhHnYWm0c+2vDZvMfzlOTxssXl1i
+QvJlkTl9Ow8OizhmJkny7ZHgSMrdtdNHrWDqzxLXbzBbK8o5BE7JkTkyC/W7
+c5+HXoJpdflO/8qQ9w/ToTI4eNvI4AFiz3XlDbDwpyWMO7DvTKsVzXClhK1M
+H6xz/uDBOpi9tdhlFvpnErKq/Q787lWCmSmsNu5mkQI/efFw81q4yNtLdDfM
+fz7jiwspN1f4YQ4vrzMrWQULOhxkyP7i6bzHURtmlpTkPyHjz27TGkR7/DVL
+F5L3xA5WU2AWPCr9eY4HfEAk0HIVnPr2RDs5n1yYWRnYjv7GHvHLJfuhoX5Q
+ojscaL08hZxXizzZxy7OQL6clO2L4NqWsO0hUujP/Jlq6eR91E/+rrUk4lt7
+t4+8r2zstqtWmI55stRlKikfzeY+H5RAvds1ncnzl0o8v72chvz4RJs2k/Nu
+2DG/TnHMfw/W1RFS36HHuaNimE+xq6bpIL4XZpk9prD7S9FkFjz4z2TXVVHE
+9+GtfDrZr3WF2xbBsaLNpt2wi6ve1q8iiEeu8oQK8vNi5qpdfJjFGj26ETYZ
+f77kJSl3uPjsLBnvv/JRU/H8oKXwCi6syfl4zxYuSvf+MgSHvdigngWnnt3G
+kDFA//bL6UkhHp0JpqIWHPvZsvQgiW98f7M+rGm6YZcAjtzRqKcD19opSNui
+f77SRlEK8E0t01fnxMl8LEsbJ/EZPm5ohMO4i0paYbm72193w4GuJ/bnLCDv
+SXLbmmFWxoVX++CySfZc8jxXd2iuGawjmxOxBBZkHyuZJOM9Ob4/j+Tv3JhY
+HXx8dXbjCOJXc5nHPgXbLL9Yqwq7pz69vJnkLzpz/nzkgwrm2RiR/Y9hJDxb
+GM9/C/ecRZ7HMWlECP2hLM0puKjis2rDFIxnp1IvGa9c5/I9aRT+H5L04jcs
+HpDu8WaCQZlUH5CcRvZfx8R3OX8YVEagugzZfxwjlRMvjjGo2CG6wJbsXzlb
+btWPMqjc7wV65PwUqKzoYfyLQQ0ORc8sIt81rua8/f6TQUkHt8b2k+8W5TPO
+TA4zKJpvmDnZH3NzYgO84NTQz+VkvbCuV6rLwCyHoPh8uGN5qoQ0zJErsPoI
+q32R3e0C84XcbihiPKghoarnxItCHljDHfWP5KJIez5PX/rCtGz7IvsR1Hdq
+vOIIzJH2jp+P+DKSrVLjyfMGBZQw4me7C5TjYK6p8ZEnMMvcPSKCfOeKZ+oF
+/cb9uz03esM21nnRn2CTfarvl8Nhyk4ic5EPrljyJVlS/92gpFlw2T1W4Buy
+/q3KestxPxOJJPOB+fTD4D+w2jSuE/l9CQuT75dAezoV60wWw5zohh3liJfP
+NSwZJ991BkMXK6M/hrv/qjeQ71C699UYPxBfnusNcr6UNvHJ1R2CVS/qR9DJ
+OfOCoPMrgxrlZ+qR8wRVW3ad/gnlyloP1sM9x5PpAb0MSrwg/Nh/nvWwOeIN
+g3KnL73sTb4ThYQujmhD/LOeFhwgz5c57Dd8AvtuekXao+oMRnXuo7/xG16T
+707//RVV/f/74ALm/wBpUU4y
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.76814822984937, 16.138025500903524}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 17.000000000003638`}, {
+          5.5000000000045475`, 11.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.950887509261843, 15.744254101457688}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1QlMk2cYB/C6IsLCkAh4IMYpVLmcUIuKB3yCLqRsilAPDqcrYKlyVLwY
+VgQts7gqHjChMCxZXRgWrdcssRp0jHrUoJRKNYUgcqOldEBBRPZ/tzVpm1/e
+73m+//OkzbeAmx6V9BmNRkvCm3z/9+FP0UYn8fKmaMz6vE+ecCZDNUT3oWjS
+bJMDG5Z4MKrGcX5j1SFLKuyiWGXqgoNlM04UwNv782fVwxmKzYpqeL3+1BQp
+LCudn6uBOboAeiIcJbGEGWHttqA2Brl++ru0ftjO9cHtN14UzX/dxZohON4w
+620JbPOtjfso3OZ+bSAS3rh2fsMw6Z+zNd0ertsbzDbBfk7mzr8WU7T24/Tg
+dviRa9MVMeySrpE0wj0Jzk3RsEraQdWSvGdvuHrDgmXsXAXp19Cssod7JvWi
+Yrj2WY14ZBFyXJsU5ZH57/U+GYBlVp7yABxpv33NMFw53jqPBxtjWC62qN8T
+IajdQe6/O99hASw/Y42PgTsClgvWw1pXZW4s6X/0ypI0uOzl3JzvYRld9r4U
+fq4U8dNg/z0P/Z6SPFuCHXNJ/jmbto0R216fJPnUQXGdHphfbJhZdBuuXFN+
+KBx2LL1j0cMpLeJ3ifBsT47zGOxgOpV7GNbeidHNC6BoH0PExmy48A/uRCjs
+rvltfhZcFntkG4+YqRtMhm0Nxcp8WBFx4XgErBy9+r4Szpz78eRCWJDW5FoH
+p/i1Lx9Avi6eOf41vNJYEngTHrIR+vXD8bGv8gWwG9/qPULqj504TvZfL3i6
+ahwW/bSpvA37jE1KzfsAt61LFBST/a9QpQ/BrA3Oomi4PfO0tBd+5NxPucCh
+QabX5H5qZtRzI4OiWW40+z+Gn3/5bOo12G59uPo2qY/8my2BVXGdygqYGjAV
+HISF056En4ErUwLW7YWDRxzvCOFCybPQVHJ+/5JbGtwz/vtgFvyz/v2+BHK+
+9pjPBbhsnt3ZHbAwgrP1FmyUnXEmlkwbPELyzKju3Mkl/Zknt9iT30uLpTgV
+Vu2S81fCnvrzFdmkf3jcIh58v8jgXgTnJGdNnIfFrXYZSljAlubUwDZjDF0D
+nJjYcMRA6kPrNljIPje//sIEd8jrq2cy8b+4rFWPwurw069Ww7cOhPxohUUa
+p4JdsPYbfl8v3PN5bMkJWP2gZLABZnc91P8KO61o9a2CubpUqhaWN+qqfoCz
+n+6dbCb9xX3DIXDxddeUPrh4o3TsE+ZtFTHdrHCiQ5hFBW+vKzVOwIqjl6IF
+cMaUJZpPsOFPQ/ViWJbUu+QDbMPnnnvjSdH6yndVmGGVXpchg736snraYfHq
+oYLdcKzQbH1B6lVfNgfCTQuedN8n85x3a5wOq/Z/110Fd5gZRcMeyHNhk/9F
+2MGHebMbZm6YPSaC3QWnV3TBPmN3eQfhwpbky2ZyfYtvHh8eWsqcmIp+Xd79
+AVy4Nk+s8YSlS9Pdyf5YthxGBJx9V16TAHvRIzsOwY333oWkwsq4RRcvk3xB
+GrmQ7Oums7IJtp3z9S/n4LMsc9kUzM+xC6u4AnMY/LfecBcVOPiY5M8KXBMB
+Z3J45f2k3zk3RQJ8i76saPoy7Jt1tWQf7NjdWMmCy150te6HI6lwWQysfazS
+8+GXXE3YUVjotXxnNFzInrWnHHZJbu/wh6MOb56qhlWVvhw6HGo++JUeVs9d
+7aJFXidfztJe2CCTjEjghx1xp6yw3DqyMBz+9/nB+v/54UH9AzZnaeA=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.3252, 12.135199999999998}, {-1, -1}], 
+        LineBox[CompressedData["
+1:eJwt1gs41PkaB/C/u4g4nKgOO1kKFako2vSjUumyWygUjSRq0eROu51/0WWj
+6WIVxZmJWpc2l7Y9HJzMOlvKtTSFSCKmdoe2pM1RnO+7ezyPZ57P877/3++9
+zMwzM3fu2xyiynFcJv7p9c8/G/bnqwHjROJqhTt82nUwwwuee//c6TRYlBEz
+JIafT1U7/BiWTbPpLoa33l2jb2uL/P2yk2XwguKfohPg0vnK0+fgSFPDiVrY
+oD/r10C45mXhXK05iBf4aujBK+Sqd9xhmUTFZO0UxgXNG9GMgYWtgmPe+ozr
+FL6RZMGC/wxIVusx7pbwQ8d1yl88T243mXEfjS9m1MD8Ym9bE13GXdAWbpTB
+3NilC3o6jAswGjD+J8U/9Y40n8S4K5MzD+WSu+zyvbVx39/6pMfIDcq4f2kx
+rrWqviOU7o+Y1+QFC3+bdm8V3ecVpmINqyTmrbCEpbYGOYvhVOWsIQ3K9z60
+5hBsHn8oaBD99pwt6ORwvuacJkUXLAhNP1MCG4+M7n5E8fG921NQz++ebG0n
+OfmOTwzqvVp+5ksl5Q+/XhWNftZtfPYXHZzf81nU0hj0GxJw98VCmDncmLMX
+85DzFRNhZL7t2zWY17SHUd35VK9IYaqOeZpN8Ts7RPXmKXXS4X066XUuc1Hv
+16qKQTjJ6E3/N/Bvac1tWthHY5ilQwfM4hPnvEP8jXbRL1bzkJ/tpJIL+796
+Hh0B81puJVPh+q9zIq/BUnmM0B/3KzRDH/fBnN8ZSSzqq/SPnzfFDs8PLxqM
+Qv1BfdWhdmTJkWWB6G9Y7PGJGzm7PXgl+k/sDT6yGmZ5J6IXYD6NM1x3uVO8
+v8bMEfP7Sqb914VkzZdGvph3b9+KfTNgWUFx3BVNxnl59pR9pHrfevpawWMe
+QaFdZBbq+0SDcUenbvGohFns1sB7cElu2ZQLcI+1cew4XPH4UvhByje9Xr8L
+z9u+Otm0h+I/BDz4CMfEydcFUnymjfgn3D/0d9mpAIrf3vriCurbd+h9VRjF
+nXxdJKh/vd/uHTzNoyCwXYr+Dh9fHXmZHPGPkhz0b2VX7S6n+dUnvziO+bwJ
+br6sT/04GB7dgvllDIo7NsGCx1f+OwavsE6ruEj9339XJMK811hl3X4JSz/v
+8S2GNa9mejvbI/6wR1QG29xpkh6DZW0HnBJhDwvj0fswJ9vepKWPd03YnCGd
++chvv2O+U4/x5WOtadZwj2FR9qnJjHeJuDHCKN46uz8L9dqHXDvqBQuC1q5L
+02H85teCgR2wzCzcMxr9To/aqLUb5lcE/rpNm/GSiCFbsrBOaoHPE68+otcl
+JEfm24fQPPs/f7mFno99pp6jwfjGdwr/tXR/vaJGDfvYZNwY4gxLF4Uskaoz
+TvVd5Xaqj7+74GqcOuPTb9yXmJAdbh05Dkd2HEjVpvNT4rzlyFfctGh5j35Z
++HG5D+37B0XxC+pfOGGtiftF7k/P99J86ursu+CEWYJXClgQrjHciP0WbX6V
+Omr/x+fdoRH9PAnKf6RL5wcde9uIft1i4sYEMMswc6zFPLzPN1Uupfks35Qo
+wbw8ok74bKP6f1y63w/7Vdvrfu8g9Xf27eEBzNdXP2riMlla6bYc+w1WVz3X
+SOddnl4fiH1wjhGOb2k+uRfH3eElJTUHpzugfsHEJSXOszO5+KkrLN3SsmEH
+7GQX8S4AFrSWrrqky/iGCf3RBFiYkGtThfefn6HJHjHMF78+UY76LS6uupsD
+syGjPbl4/8oVGYrv6DzL2uzj6N+qovBpIT1vJl4Sj/no94mm5ZMjvx9Iwr6W
+2JmvlMCyjJZ1Esxf37lgQzrFr5fFDakx7r0Z25pC559aHyyCM3U25EdTPLjh
+vK0a48sqLmTtpH4SVHs+gWcrD4o3U3zvTdsvkO/QebtjJfUzM+tEBeKjhuy6
+C53n7unvhf3e7SywcKS4btlhU9Rz/knth0Xk9QuffoRP2Fu3UL5QN6Pqd9Sf
+YhHU7UHPL50fMor+luWdnulH8TXJd0awX5/qHvf95NZoo55JjLd3LcqjebFJ
+Yd7fY37XVlruKqX5qPD6X2C+w3GfRT6k+wZuVtVi33Viw+QPNI+BB07jsNuL
+ME/LBdjv8iCtCeS3We0IXgdzevonf0Y89VxKrAgWqq/X2gQvqz3tdhZmhaLE
+QtyXlfGktAQWZH4V/hD7cnn0sreO8lsyznRjX3amS5c8Jn95c+099LPZ0tR/
+gPKjc0zLNRm/V6PaVUn3ty2YJMX7/728yYYssB/XzcS+AmpMCilfmC7achXz
+PbL+u5NdlH92f8NzVcY7J1951kz1WG6M2aDKuIOPEjtvwnxhtoFSBd9P3I/N
+1yg+K6X2ZxXGJwVdmpFDLo3pbEd87lN7czHl9zU2zMJ5420zzA6TZy92KsJ5
+fYZTXZKonnvNVttx/4euyuB4WKaM2LUQ+7WPUvGkOFc/orTEPiPUbvgkU326
+k2Is0V97uH8ezYvLPc9Z4ftlW8MjlQIya0+bhn3Gx956W0vW6s2n/XZbJ1f2
+Un1yA4NizDN1UOyjuRD7rCl3dcbn11H0IHMuLNyxrfsU5v/viOVO3hSXlVtd
+Q3y++vvmAzBfOtuI4uGybeq5FP829YgT4q/11L65Bcuykxzycb7R7V/m91O+
+dGW0Avf/8Ttr0f9/b2mz/wHsVWpK
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.952631629795212, 1.8745372234640723}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVKetkgssJLdMJCCZliGyBiPWWF2oFCU
+CZ3NyAYKwzqQR+iQ6UaIFHkPNqoypdqNN+Et25Aw2DIYRUoHS52M+D/GJu3N
+L/e755zv33OPmyQ7Nt2MoigxvuRKWZEfL5r67/MKTdE2okpnWHX9JPsIPB2V
+WRQNm7rvr1yC6yRtxmJSn/LXnnly/ypnawJmHtKZW3rSVPdEdT/Hm6bUptnT
+HjBbPvSCApbZ6sL84Hy58fUp2DTI+sINTqriKj18UPd7aS8DnpvU6rJgijVb
+MYvx+1529GsmXt7oJfObczb0f8Aym2+vJ8PdtdZBj2G1VdenTjCr0+6jHXiu
+jOk470FTVlw/9hYs7WUrG2CmUGg3D/OCLgfI4XDVlHUPvOKVWJ8MF/VGakvg
+gWt/vhcHN+xbOvUObMGO+CUF5gacGnYj81/Y7FaQ59UCqRH9GBiaxy1wgt6/
+aRjWnFds6GFdpOLdTpht8aNtMNYX11L6wfcwt3qPXgmzHXJvtZD60cqaZZgj
+Mgu+CYvapNsC5PHhi2cPb8ArR0y2n8OiwgipF+bXRDGybsHm1idnZKTfT/ip
+JlhWuED9BjOzhAdYXORcOtTG8qWpkm1ZGQdO45lHyGBu8mcCF1g9teSgg9kP
+ZlIZsN7GXmfrR1MdIe05tzEeFeF0IgZebLiyWg8rvQsNBbDozK5TGnFjQPx3
+8Aqn9RH5P+nNkvYWmJdWmXMP/Rh6pqPUsJSxv70R1j/yqK+ENcuD/nI49/Tk
+mznweFPMz0dhVZhEFw6rR/pd3oJ1C1OCfbDF9t/rYrLfvhIEL2C96htOeZmw
+71habissGh28WkP278XnUopg2qcicRoOPBTz8ARs0i/buGJ906PnQhJgXuFQ
+uYzku6spSiTPZ1607Id1ed+MZ8EDwlaJM/IQlZVuVcHlzj9VZMINc5LqYZji
+TzxrhyltVygT65tzT/r1Acl38XZxKswcuLm+F+9FoNwn4Rps6Dg64gjXGcXu
+1v7Ie42x+hKsTHcUSuDxaaO7Gdxyo9i9A07gqy7fxXh1c0MzRlhWYHmlEd5Z
+fWrj+SpNBR0MOZwBs2VPzkXD5eIeGRceye40TyL3Z4dcH5J+msW1x2BD7PH0
+Zvj+P1oFqddEfr0phwPXdWY+xPravnhS//x6PgW/XVpzNxzuy/VcHcP8x/lf
+ur8BC9cuzdTCA65C/jF4hHVhTQqL5DvRhbBvdmhXKBxksM/phXn274e5wOrd
+rQKyvwx3BE8sYaZpKz0Onj94J3gv3BFlkP4Ad2vvJTkQj72WR84lRcaK4gCc
+vxR2RgxX5SoLs2CVVatWBTdwrINJXqwiju8kzM0Jz3hG8mqXVj8lees+3h+L
+fkyd8SZbvEd1FfzFJpJH9tlqO9iCnHu8/88/b/pf0S3MLw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.761512611302877, 10.651252930219968}, \
+{-1, 1}], LineBox[{{5.5, 3.9999999999976925`}, {5.5, 10.99999999999251}}], 
+        PolygonBox[{{5.5, 8.1}, {5.9, 6.9}, {5.1, 6.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 7.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 4.}, {12.49999999999251, 4.}}], 
+        PolygonBox[{{8.4, 4.}, {9.6, 3.6}, {9.6, 4.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 3.0548}, {0, 1}], 
+        LineBox[{{5.4999999999976925`, 11.}, {12.49999999999251, 11.}}], 
+        PolygonBox[{{9.6, 11.}, {8.4, 10.6}, {8.4, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 10.0548}, {0, 1}], 
+        LineBox[{{12.5, 3.9999999999976925`}, {12.5, 10.99999999999251}}], 
+        PolygonBox[{{12.5, 6.9}, {12.9, 8.1}, {12.1, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 7.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{16., 13.}], PointBox[{5.5, 4.}], 
+         PointBox[{5.5, 11.}], PointBox[{12.5, 4.}], PointBox[{12.5, 11.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.000000000003638`}, {13.5, 4.500000000003638}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.203937013962182, 14.894893814502087}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.518114191521104, 16.112957390365363}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1ws41NkbB/AhXURjRJHrMAo1oVxX2FFsbiGE6CI7lRRNQm5bwkqZkFuW
+SZPcKsVKUWRRuqoUE93ckzZblMvEpP2e/f89D57Pc37nnO/7/s6c5xkN//1u
+O8UpFEoHfsl/igT5s4JF+e9Hm0WhlS/LdoQTFPSe/bOMRWHXRV/KgHNcZiSe
+wvJTMXkCMr7fUacQplHKJWWYLIqOzrZNwbCittN3S1h6749l+jCvz1/oBw+0
+lxQNLWVRJJgekodgutgF/TOwxYUBwRH4TUbAVhe4rnjb2Wi45fWXPjFYh535
+815Ya64Dp1oLOTvfqbmS8Yx3p0LgAdpfDCZZz64t3RiO+ebKE4MVr3XsEIeF
+X48z2pB3YOp+1CsG5gcmx52H/XqYgnp4OF48LQwuy3rXWQ4zu/qoTnBV/IHN
+l2EjpmSKLiyfPX76OsydZDnQYOa3b44PyfxMaXlx2OlrSOUgXOfkb076adex
+s0AS+1vkekVLwawgs2IDOPZL0DQDbk2OU9wMu74fXGcP10TQ1sWS/GsM7aLg
+4XcXD5+Hx7wsQ67BdAMDtwa4yvVHlRA28ElPbYcTRk4UWqNe3r2dQV0wLyQw
+/SQs39Ge9wb2zlxw+SU8tlvc4wnMb39OZ6xEzlPLdlyFjap1f9oNc/ZOaXJh
+6Rz72PNwg5PncZLvjZrkGwFs8NJYUpWsJ4wvFsGhVwuSO1GvWW5Q42I9rLfZ
+2SuF9Gu93nkGXCXXN84iZhtsJZbXsVr8VRP1a8vnked7Ds4OKoG5s9tyZ7Ae
+130w0w9mrdRXewvTquVH6HCDjJJnFUyX8+X+rYEcN2c9SITb/SWl/oJFHJax
+F2wz+frkWdjoQTdHB36TfOMCF07yCrb7jvo7z/VvT4T5+drbOuGky0OqZFzI
+U5SqI+c1xfsOD+bE89ZdhANqh69eh9tvhcUWwmXqJ3o64H37Ui9fgpl0qw/f
+4QHGKvUGuEZazWgZ8t7xZKT0kvNZ1CTtDItOjSrJIA+7aep2CFzB0fJeDzs1
+WT89BQ/wp32S4ASZ44OlsJbpwLOnsF/QpNp1uHBroboy+sV0YovVwHzDmcjd
+pN9rj+VdJvvN+M+vhGkdssnZ8MhhUxkhfF99lfhB2CyIITLRx+doxdrmdXCC
+9ejpfbDKVJvGfJj99Ozi07DZMb/ue6iH2XlQ7xo8psVZfgSet2Gh9l04SVYl
+ejWcNj3a+wAWBipHDNDhxMbXDfAW0ysdp+FQ2z+XlcGFKm0/u8BVagNbT8L0
+FAvtBbBHa276LrgnuY9Too48FROG5mT/7HaOPSzhyfkyH6ZwyvvFYZWPrvzX
+qMe79rujQA33UPdZWjlcE908txF2vTBv4hjs527h1AynxVjcDoAbZmj6PbCE
+39oUd9h1yds6Klk/dbbQHq7wqVHeACd5s5ZsIOud8q7Jhsc6C8K2wor6V6IH
+Yfboo/EoOKHfJl4Z+QckfYcKYRsZuwhrWEeTOv8V2a/icbw/XGZ2MlMR+Y0C
+Nv4SQ55/Z+y+DbbglF/jwgZNX+tKSf1ZVON0mD0xITsO80MflCTDlZETlnQD
+5ByKOBwBG/XzFWzgmIjEW97wF/qXZjbcw/kmYsIU9hy1o/C8HLHbw8i77+0T
+7Rz4/goFtSDYRD9Y9wJco6K0ohv98G+sLb8KR/B4f66Hc2VOZFTDtKPPhy6p
+sijOEiHTVWS9o3vNZeECd6pPGdlPQX3WbyosSnFubUA+8Zrn7mPK8KCSOheu
+uGR6PRr+tOFmSThMjy+YXAxLVAW4bYeTBJGi+0o435qChPVw503P/Ax4HlXv
+ogHsp705+xDsnB6rqQLz2ypCQ+GFkbmrpcjz/9QVJcEtAq+/v5Pz4ZmY8Cdc
+8eBy3gg5X+O1kR9h6U/Hbn0m4+F3l67G/pSEfeIimPNmTmYszEoPa5yP9XI0
+hkKfwQ8DrbpUSf1flLeoo76Z7PpHJjCnQJeyE650n77hAXuX7Yo4A2freeaT
++hrs48LvwHdXNf6cR/K5iUW+gJOi5Gwb4SFxn7FWuGvXC5v3ZP7cx5xK2Mr8
+uUBqFXKZncmLgqm2OWdXwvPiXzssh1OK7AId4TSd3IO3kU+z5BWTDcfKTi20
+J/00YC05BLOOqEv9hXq7WgRF8fD9nRfGdWG3zIqM42S8r/GflCUsSn7fkdEk
+2LWF5fFVkUUxV+pVioN7mvPTtsA8t5VVYXCOM+/ZUwUWJc7iSwHZL+lEfOtG
+eHle8CxX2Cy15Y/Bxbgfak4q/wR788q2noJLU6ccNeCGM7UOHvCrO99+SJLx
+GXaoAby25h5vjPTrnPPdpTC90vJAnwH5PNrPNoRjmn4rbif9abn1dhPs3eu9
+ugVOE47OnIB/Sae2PCD93d5t/QSubPrQ/xiOHX39Ugn5Wqmq+Z3kfA294O6F
+KzKVnn0g70+YM3ITHq6NmiuGPHQr84uzUK/JNd/fVeHSuMEyFulH25SrFcmr
+TwsLgm8uYVj5w50PfS0T4XS9j9PHSH91O5YnweENGlpX4NaNYcEH4IHrVx3b
+4IDHtj7WZP0fjnITpP8LgvcIsX+ffKDpotV4v+8TzXNgbt7qs/owR4Yfw4A9
+rJ322MCltvefnkF9iVOrJtzgztjkXCk4IvToZx84h+rz4sAi3O/Tnx23wBHG
+JgKBPIuSubPaxQsWVnnMsoQ7RWHHnWDWw+SSMjnkZhY/soD58lFFurBH1pSm
+LtywxtymZiGLMqdK5uFCWDFtrcgXXpw0S3ka+Wkptc4KsIkR70g/zFHQLf0o
+y6Lsiqz2e0zqPXzL5SXcatq86CZsZ7iE3Q0Hp1IFF2F+C+/dNMxqOVrEJ+fN
+v/3xCqyXHXLBjUfO/+y/V++F9Tb6/ppPzp93bNg1eKKIK1dC3teVN+GzkZef
+mrHxOvk8hA22b4KnhsfrH5H+JlrqnoPDTeuqBkle6wS7Plj8ziLHOaT+/snD
+8uiHp2jsV1JvwLm0e4bwwm3aNc6kv8Oa0xYw85PLYCisc897fCUcUSEfnwu3
+TrZeng1HZTbq1pP5ny1s7mB9m44z3C7S/+ZPM4Hwcw+jhCm4Qvh+jYj069hr
+FVlDzNdR3BQN13O6zmnAwmjZyGH040TE7aIVcMPwj0gP2EHOda4+XCrOyKqh
+4Tlf6lcynrN+h7EabNa4tlcTpjG4uxfJIE/9njR5mNJauGoOFfW7HBaJwSN5
+P5oUFuA+TtrvPkze71LXrI3S6Pttp/ftcNrSUIcbUrg/ch+q3YLpw4cC3WBp
+0xfsYnI+yn8yV4N3nZ5USCfnc0FqmTKcu8c26iip78MfwevhpszigjDy/KNa
+Kg9eTqNy9pPxuO0WC7FfxO+/HPnP26+onoOrDJoZ4TCt1bbaCvkmRB2/xpPx
+Tfo7emBOhq8wm+zn1bguGvU4NIpcKkhevcoXEqi3R6076wlxAnfLQThUy7d2
+hOR/+dajHtYs3JGwiPSbNtDdBU/xvmatgelBOjKtcMq4ROIO2C9zk3oqzKTQ
+hn+H+abncpThhrjTB0pIP7WdPA5h/5Trgt47MIc/uasY+Qqde0zfkv7feDxy
+BfVU5udd/Ezmm1wR5KB+WsnItWni3ot+QfNxX314SRczwvnTk+0wkWT970uW
+0f+/X81j/QsnUMtV
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.049881517191032, 4.07817374061448}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.150426821111384, 13.782458980118262}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{9.4, 4.5}, {10.6, 4.1}, {10.6, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 8.6}, {6.9, 7.4}, {6.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 4.4999999999976925`}, {13.5, 11.49999999999251}}], 
+        PolygonBox[{{13.5, 7.4}, {13.9, 8.6}, {13.1, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 8.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{10.6, 11.5}, {9.4, 11.9}, {9.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 4.5}], PointBox[{13.5, 11.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P1", " ", "N9"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781961555774691*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"e4fa3707-0315-464f-ab5e-1a60f2018984"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", "dB2", "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.781961591658502*^9, 3.781961599224133*^9}},
+ CellLabel->"In[39]:=",ExpressionUUID->"a4b7229c-a45a-4b68-bf3b-faf0f642a2a2"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdfei/fjghgjhiij.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961599603859*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"07fffa7d-22b9-4c18-b888-ce1ae9733fde"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961599607522*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"065f363a-68fb-4a5f-a67e-acd35ebd4481"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbg/chdgei/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7819615996157713`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"f92d3e57-afe2-4c4e-b496-0c090d75a59d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbg/chdgei/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961599617997*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"d95596c0-fd24-4979-97fe-94e1f7cfd161"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdgei/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7819615996202993`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"f8b6cf22-32c1-4de9-b054-4773a2315697"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.000000000003638`}, {13.5, 4.500000000003638}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.203937013962182, 14.894893814502087}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.518114191521104, 16.112957390365363}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1ws41NkbB/AhXURjRJHrMAo1oVxX2FFsbiGE6CI7lRRNQm5bwkqZkFuW
+SZPcKsVKUWRRuqoUE93ckzZblMvEpP2e/f89D57Pc37nnO/7/s6c5xkN//1u
+O8UpFEoHfsl/igT5s4JF+e9Hm0WhlS/LdoQTFPSe/bOMRWHXRV/KgHNcZiSe
+wvJTMXkCMr7fUacQplHKJWWYLIqOzrZNwbCittN3S1h6749l+jCvz1/oBw+0
+lxQNLWVRJJgekodgutgF/TOwxYUBwRH4TUbAVhe4rnjb2Wi45fWXPjFYh535
+815Ya64Dp1oLOTvfqbmS8Yx3p0LgAdpfDCZZz64t3RiO+ebKE4MVr3XsEIeF
+X48z2pB3YOp+1CsG5gcmx52H/XqYgnp4OF48LQwuy3rXWQ4zu/qoTnBV/IHN
+l2EjpmSKLiyfPX76OsydZDnQYOa3b44PyfxMaXlx2OlrSOUgXOfkb076adex
+s0AS+1vkekVLwawgs2IDOPZL0DQDbk2OU9wMu74fXGcP10TQ1sWS/GsM7aLg
+4XcXD5+Hx7wsQ67BdAMDtwa4yvVHlRA28ElPbYcTRk4UWqNe3r2dQV0wLyQw
+/SQs39Ge9wb2zlxw+SU8tlvc4wnMb39OZ6xEzlPLdlyFjap1f9oNc/ZOaXJh
+6Rz72PNwg5PncZLvjZrkGwFs8NJYUpWsJ4wvFsGhVwuSO1GvWW5Q42I9rLfZ
+2SuF9Gu93nkGXCXXN84iZhtsJZbXsVr8VRP1a8vnked7Ds4OKoG5s9tyZ7Ae
+130w0w9mrdRXewvTquVH6HCDjJJnFUyX8+X+rYEcN2c9SITb/SWl/oJFHJax
+F2wz+frkWdjoQTdHB36TfOMCF07yCrb7jvo7z/VvT4T5+drbOuGky0OqZFzI
+U5SqI+c1xfsOD+bE89ZdhANqh69eh9tvhcUWwmXqJ3o64H37Ui9fgpl0qw/f
+4QHGKvUGuEZazWgZ8t7xZKT0kvNZ1CTtDItOjSrJIA+7aep2CFzB0fJeDzs1
+WT89BQ/wp32S4ASZ44OlsJbpwLOnsF/QpNp1uHBroboy+sV0YovVwHzDmcjd
+pN9rj+VdJvvN+M+vhGkdssnZ8MhhUxkhfF99lfhB2CyIITLRx+doxdrmdXCC
+9ejpfbDKVJvGfJj99Ozi07DZMb/ue6iH2XlQ7xo8psVZfgSet2Gh9l04SVYl
+ejWcNj3a+wAWBipHDNDhxMbXDfAW0ysdp+FQ2z+XlcGFKm0/u8BVagNbT8L0
+FAvtBbBHa276LrgnuY9Too48FROG5mT/7HaOPSzhyfkyH6ZwyvvFYZWPrvzX
+qMe79rujQA33UPdZWjlcE908txF2vTBv4hjs527h1AynxVjcDoAbZmj6PbCE
+39oUd9h1yds6Klk/dbbQHq7wqVHeACd5s5ZsIOud8q7Jhsc6C8K2wor6V6IH
+Yfboo/EoOKHfJl4Z+QckfYcKYRsZuwhrWEeTOv8V2a/icbw/XGZ2MlMR+Y0C
+Nv4SQ55/Z+y+DbbglF/jwgZNX+tKSf1ZVON0mD0xITsO80MflCTDlZETlnQD
+5ByKOBwBG/XzFWzgmIjEW97wF/qXZjbcw/kmYsIU9hy1o/C8HLHbw8i77+0T
+7Rz4/goFtSDYRD9Y9wJco6K0ohv98G+sLb8KR/B4f66Hc2VOZFTDtKPPhy6p
+sijOEiHTVWS9o3vNZeECd6pPGdlPQX3WbyosSnFubUA+8Zrn7mPK8KCSOheu
+uGR6PRr+tOFmSThMjy+YXAxLVAW4bYeTBJGi+0o435qChPVw503P/Ax4HlXv
+ogHsp705+xDsnB6rqQLz2ypCQ+GFkbmrpcjz/9QVJcEtAq+/v5Pz4ZmY8Cdc
+8eBy3gg5X+O1kR9h6U/Hbn0m4+F3l67G/pSEfeIimPNmTmYszEoPa5yP9XI0
+hkKfwQ8DrbpUSf1flLeoo76Z7PpHJjCnQJeyE650n77hAXuX7Yo4A2freeaT
++hrs48LvwHdXNf6cR/K5iUW+gJOi5Gwb4SFxn7FWuGvXC5v3ZP7cx5xK2Mr8
+uUBqFXKZncmLgqm2OWdXwvPiXzssh1OK7AId4TSd3IO3kU+z5BWTDcfKTi20
+J/00YC05BLOOqEv9hXq7WgRF8fD9nRfGdWG3zIqM42S8r/GflCUsSn7fkdEk
+2LWF5fFVkUUxV+pVioN7mvPTtsA8t5VVYXCOM+/ZUwUWJc7iSwHZL+lEfOtG
+eHle8CxX2Cy15Y/Bxbgfak4q/wR788q2noJLU6ccNeCGM7UOHvCrO99+SJLx
+GXaoAby25h5vjPTrnPPdpTC90vJAnwH5PNrPNoRjmn4rbif9abn1dhPs3eu9
+ugVOE47OnIB/Sae2PCD93d5t/QSubPrQ/xiOHX39Ugn5Wqmq+Z3kfA294O6F
+KzKVnn0g70+YM3ITHq6NmiuGPHQr84uzUK/JNd/fVeHSuMEyFulH25SrFcmr
+TwsLgm8uYVj5w50PfS0T4XS9j9PHSH91O5YnweENGlpX4NaNYcEH4IHrVx3b
+4IDHtj7WZP0fjnITpP8LgvcIsX+ffKDpotV4v+8TzXNgbt7qs/owR4Yfw4A9
+rJ322MCltvefnkF9iVOrJtzgztjkXCk4IvToZx84h+rz4sAi3O/Tnx23wBHG
+JgKBPIuSubPaxQsWVnnMsoQ7RWHHnWDWw+SSMjnkZhY/soD58lFFurBH1pSm
+LtywxtymZiGLMqdK5uFCWDFtrcgXXpw0S3ka+Wkptc4KsIkR70g/zFHQLf0o
+y6Lsiqz2e0zqPXzL5SXcatq86CZsZ7iE3Q0Hp1IFF2F+C+/dNMxqOVrEJ+fN
+v/3xCqyXHXLBjUfO/+y/V++F9Tb6/ppPzp93bNg1eKKIK1dC3teVN+GzkZef
+mrHxOvk8hA22b4KnhsfrH5H+JlrqnoPDTeuqBkle6wS7Plj8ziLHOaT+/snD
+8uiHp2jsV1JvwLm0e4bwwm3aNc6kv8Oa0xYw85PLYCisc897fCUcUSEfnwu3
+TrZeng1HZTbq1pP5ny1s7mB9m44z3C7S/+ZPM4Hwcw+jhCm4Qvh+jYj069hr
+FVlDzNdR3BQN13O6zmnAwmjZyGH040TE7aIVcMPwj0gP2EHOda4+XCrOyKqh
+4Tlf6lcynrN+h7EabNa4tlcTpjG4uxfJIE/9njR5mNJauGoOFfW7HBaJwSN5
+P5oUFuA+TtrvPkze71LXrI3S6Pttp/ftcNrSUIcbUrg/ch+q3YLpw4cC3WBp
+0xfsYnI+yn8yV4N3nZ5USCfnc0FqmTKcu8c26iip78MfwevhpszigjDy/KNa
+Kg9eTqNy9pPxuO0WC7FfxO+/HPnP26+onoOrDJoZ4TCt1bbaCvkmRB2/xpPx
+Tfo7emBOhq8wm+zn1bguGvU4NIpcKkhevcoXEqi3R6076wlxAnfLQThUy7d2
+hOR/+dajHtYs3JGwiPSbNtDdBU/xvmatgelBOjKtcMq4ROIO2C9zk3oqzKTQ
+hn+H+abncpThhrjTB0pIP7WdPA5h/5Trgt47MIc/uasY+Qqde0zfkv7feDxy
+BfVU5udd/Ezmm1wR5KB+WsnItWni3ot+QfNxX314SRczwvnTk+0wkWT970uW
+0f+/X81j/QsnUMtV
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.049881517191032, 4.07817374061448}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.150426821111384, 13.782458980118262}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{10.6, 4.5}, {9.4, 4.1}, {9.4, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 7.4}, {6.9, 8.6}, {6.1, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 4.4999999999976925`}, {13.5, 11.49999999999251}}], 
+        PolygonBox[{{13.5, 8.6}, {13.9, 7.4}, {13.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 8.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{9.4, 11.5}, {10.6, 11.9}, {10.6, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 4.5}], PointBox[{13.5, 11.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.}, {13.500000000001819`, 11.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.09538441690569, 14.704079264670717}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.717657384322742, 15.863036082896215}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1gs01HkbB/D/jq2Q61Q2hgzZdhXFFFZk/y5dFGLXuxFpXpeEaHRy2XKr
+M4vYLLFuLU2ivFKy4gjbzpa2qDQubchl4i3RSm8ql43e77Nn5xxnzuf8Ls/3
+ef7/OYeB/8GvgjgMwyTjj76Z9x/wWc0yf3+4LFOcqLTaYQ3LSAe8ttrDfjqe
+tidg92WxluGwrXGAeSfMH/45+xh8pdb1qZ4J3NCgFw/7c1xNgmGzoEf5e2FB
+cPFoJcya+7Ybw1Lt25+O035ru+x+TZbpeOe2cpUpy8jzjPLi4YW5n0R+A2du
+aQhShT0FGTNxMLNCJMjSYJkEwXK1Ajip1qpKFY6YsY+oIFctqVNXZ5m+6MDt
+1bBQQ1yopAZ3ldlfJjdOfuCq4t7iUJ8S8lWBlYUKy3zeGvc+g86bn0iPXcwy
+FdY+3VGUx3LXi2Fllmkudxn0IidqnImDRbOvjTfCksgfNbfApxZbDvPIbwWV
+9nBvaoQ5A0ttm29HwENav+mPol/pzKmaVjhCMz+1G066dandHfXq9qzgyMhH
+027PwgmNqffJTOkbqRT5ulL6Wx7DEo+UGwXIv33976H/I3PcFOPQX6/j3RpN
+qvfywoE96L/VzfQLW5idzh/VxnwyZb76Isq3tbzlCFzMHzKtpP5r/np5Dz4/
+vavjJSxKszupgnlnKr2ysFzLMjKx52lLOPRq584kmD25a3IbnFufM9sKv9K0
+CXGA17bdVV66Dnn1Vz0yhO0K3wV5w2YKHP0XuN/t+rnlBbCIZ2pQBO/TVAhr
+h+VjNeU28KaUpG8ZM7wPtjdO5yD/lE2exxI4abBWUoj+5pJfjPFhtreh6xT6
+19w8amwMyy06N6VgPoG8wDUmMMMfVzqO+RXe2ue4ms5zSlaexLyf5jXNrCTH
+NLVUK7GMxWPvj3WoXkG76bQi5s0d+FKV1sMn9IJhN995lznkS/Icb1KAc1uO
+pA+so/fXw6V9EctM78zfJ6X8Qxxl8p0/nRXKYKmh1UoO9jcVxoZk0DzSeb/8
+G/bUOxORQPuzn3NfwH2tsSXRMH+pXnke8jwvyrCLpXopHd/vRd7fG3Zqi2n9
+zu5qa/Tz2ntTUSHdd7Nusy76FVunNDf+7Wn+HFyyeKv2CCyx9zDpwHwU/Uz6
+qR+hi9/9LMwvIsRNQPMRGu7ZsR7zLeo2kLrSvLyWrKmCS0da8yNpnuLz8R/g
+MEOnulw4MytLXQPPZ3nZZwuaYNkZ9chF8NeSBSI53ddRef4u9uely8Y45vDN
+//h4wZnHn8Ubwkz/3rF61B/b7ehuByeV7FCdRL58+cEr/4Llw01L1ODVfz3g
+7Yelt+/ncNHPdD3HKYruy+lbqoz+jc/xuPG0/oPD2XnMKzk2+0Iirb/fv28W
+83RIfeZL6xKPfKdF8MWAiV+iaf/8WPBaPJ93sUbiA5Sn9uJIzEKWWb//bcZe
+qt+7PHJsAfKczu91p/0X1T5Khy9oVETZw/y4uCpf+HSZYrSA1p3bMoSwy6rg
+cSOqV3pW8iOsfEBpQBtmh2zl03CxupEZl/pN3u3/HeolxrmVq9F922ZTNyDP
+0ddhg+qUf4uW8zxsflZoq0X7c/wSe5A/xvjhhAHdP5Dg3oR+/7C0eE31hbbT
+mT/h/RAenFdwpnqmzmYizKdZ4nslgFw1W2KK+d3tnPI4Tvfd2LD1Hlzf+pt2
+KfXLr/vVCfP+xvvoJ3coj47IPgte1pfnOE77rXNkl+DmAq00rgCW/xCaD3dU
+Dj60hBltG54H/HOBia43LHXwed+D+4UW4uBYWPgoQd8K/nTq4ZNs8jAvIAL5
+li3d3l8B81NqN6Qgf44o5HETnW/LcUhDf3emPE61UL1tbvxj6N8pTToho3r1
+3U+iMJ/AXJl2JyxP8K0+hHleLwgJp3W2RifwGOY9uTnsCJ0XCrq4Fz/G771Z
+OncdlvRNXptSwLmKgp5qslX403B4tkhH5RzZ9VYYF/7vg5FSyivv5tk857DM
+28ipa2LKY++68RW8WWbgG0P5/Q99aYz9e0Qj6Qdov5GhbiY8+PXw2iDKo/Lm
+uj7qa4V5LfSn/B+G9rfDumWbLgRQv4F+b35C3jdeuodDKW+Q3ppv0c+vZz8q
+iKY8GSaf+aJfccIlpVSqV2nVaIN5bHvLPV5M+61u9atiXpd1jE5co/XDM9wW
+uPHyvahuqleYLAvEfKVzz6JmyRmVj3rgns4nuSvW0+8j+5ghnkfMwaYHjrB0
+0ePZjXCRzcTiEJg9NB5mAO/a0WZ5klwfrPIHzmcljW+pov03H/B94Ll1as5t
+tH740tBV1P980jB0lNa7FDxHFf/5P2LDP9+K7P8BYjjyQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.244066109927797, 2.1624198096871057}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.372684128093524, 13.593276950937812}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{9.4, 4.5}, {10.6, 4.1}, {10.6, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 8.6}, {6.9, 7.4}, {6.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 11.500000000002307`}, {13.5, 4.499999999998607}}], 
+        PolygonBox[{{13.5, 7.4}, {13.1, 8.6}, {13.9, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 8.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{10.6, 11.5}, {9.4, 11.9}, {9.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 11.5}], PointBox[{13.5, 4.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.}, {13.500000000001819`, 11.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.09538441690569, 14.704079264670717}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.717657384322742, 15.863036082896215}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1gs01HkbB/D/jq2Q61Q2hgzZdhXFFFZk/y5dFGLXuxFpXpeEaHRy2XKr
+M4vYLLFuLU2ivFKy4gjbzpa2qDQubchl4i3RSm8ql43e77Nn5xxnzuf8Ls/3
+ef7/OYeB/8GvgjgMwyTjj76Z9x/wWc0yf3+4LFOcqLTaYQ3LSAe8ttrDfjqe
+tidg92WxluGwrXGAeSfMH/45+xh8pdb1qZ4J3NCgFw/7c1xNgmGzoEf5e2FB
+cPFoJcya+7Ybw1Lt25+O035ru+x+TZbpeOe2cpUpy8jzjPLi4YW5n0R+A2du
+aQhShT0FGTNxMLNCJMjSYJkEwXK1Ajip1qpKFY6YsY+oIFctqVNXZ5m+6MDt
+1bBQQ1yopAZ3ldlfJjdOfuCq4t7iUJ8S8lWBlYUKy3zeGvc+g86bn0iPXcwy
+FdY+3VGUx3LXi2Fllmkudxn0IidqnImDRbOvjTfCksgfNbfApxZbDvPIbwWV
+9nBvaoQ5A0ttm29HwENav+mPol/pzKmaVjhCMz+1G066dandHfXq9qzgyMhH
+027PwgmNqffJTOkbqRT5ulL6Wx7DEo+UGwXIv33976H/I3PcFOPQX6/j3RpN
+qvfywoE96L/VzfQLW5idzh/VxnwyZb76Isq3tbzlCFzMHzKtpP5r/np5Dz4/
+vavjJSxKszupgnlnKr2ysFzLMjKx52lLOPRq584kmD25a3IbnFufM9sKv9K0
+CXGA17bdVV66Dnn1Vz0yhO0K3wV5w2YKHP0XuN/t+rnlBbCIZ2pQBO/TVAhr
+h+VjNeU28KaUpG8ZM7wPtjdO5yD/lE2exxI4abBWUoj+5pJfjPFhtreh6xT6
+19w8amwMyy06N6VgPoG8wDUmMMMfVzqO+RXe2ue4ms5zSlaexLyf5jXNrCTH
+NLVUK7GMxWPvj3WoXkG76bQi5s0d+FKV1sMn9IJhN995lznkS/Icb1KAc1uO
+pA+so/fXw6V9EctM78zfJ6X8Qxxl8p0/nRXKYKmh1UoO9jcVxoZk0DzSeb/8
+G/bUOxORQPuzn3NfwH2tsSXRMH+pXnke8jwvyrCLpXopHd/vRd7fG3Zqi2n9
+zu5qa/Tz2ntTUSHdd7Nusy76FVunNDf+7Wn+HFyyeKv2CCyx9zDpwHwU/Uz6
+qR+hi9/9LMwvIsRNQPMRGu7ZsR7zLeo2kLrSvLyWrKmCS0da8yNpnuLz8R/g
+MEOnulw4MytLXQPPZ3nZZwuaYNkZ9chF8NeSBSI53ddRef4u9uely8Y45vDN
+//h4wZnHn8Ubwkz/3rF61B/b7ehuByeV7FCdRL58+cEr/4Llw01L1ODVfz3g
+7Yelt+/ncNHPdD3HKYruy+lbqoz+jc/xuPG0/oPD2XnMKzk2+0Iirb/fv28W
+83RIfeZL6xKPfKdF8MWAiV+iaf/8WPBaPJ93sUbiA5Sn9uJIzEKWWb//bcZe
+qt+7PHJsAfKczu91p/0X1T5Khy9oVETZw/y4uCpf+HSZYrSA1p3bMoSwy6rg
+cSOqV3pW8iOsfEBpQBtmh2zl03CxupEZl/pN3u3/HeolxrmVq9F922ZTNyDP
+0ddhg+qUf4uW8zxsflZoq0X7c/wSe5A/xvjhhAHdP5Dg3oR+/7C0eE31hbbT
+mT/h/RAenFdwpnqmzmYizKdZ4nslgFw1W2KK+d3tnPI4Tvfd2LD1Hlzf+pt2
+KfXLr/vVCfP+xvvoJ3coj47IPgte1pfnOE77rXNkl+DmAq00rgCW/xCaD3dU
+Dj60hBltG54H/HOBia43LHXwed+D+4UW4uBYWPgoQd8K/nTq4ZNs8jAvIAL5
+li3d3l8B81NqN6Qgf44o5HETnW/LcUhDf3emPE61UL1tbvxj6N8pTToho3r1
+3U+iMJ/AXJl2JyxP8K0+hHleLwgJp3W2RifwGOY9uTnsCJ0XCrq4Fz/G771Z
+OncdlvRNXptSwLmKgp5qslX403B4tkhH5RzZ9VYYF/7vg5FSyivv5tk857DM
+28ipa2LKY++68RW8WWbgG0P5/Q99aYz9e0Qj6Qdov5GhbiY8+PXw2iDKo/Lm
+uj7qa4V5LfSn/B+G9rfDumWbLgRQv4F+b35C3jdeuodDKW+Q3ppv0c+vZz8q
+iKY8GSaf+aJfccIlpVSqV2nVaIN5bHvLPV5M+61u9atiXpd1jE5co/XDM9wW
+uPHyvahuqleYLAvEfKVzz6JmyRmVj3rgns4nuSvW0+8j+5ghnkfMwaYHjrB0
+0ePZjXCRzcTiEJg9NB5mAO/a0WZ5klwfrPIHzmcljW+pov03H/B94Ll1as5t
+tH740tBV1P980jB0lNa7FDxHFf/5P2LDP9+K7P8BYjjyQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.244066109927797, 2.1624198096871057}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.372684128093524, 13.593276950937812}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{10.6, 4.5}, {9.4, 4.1}, {9.4, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 7.4}, {6.9, 8.6}, {6.1, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 11.500000000002307`}, {13.5, 4.499999999998607}}], 
+        PolygonBox[{{13.5, 8.6}, {13.1, 7.4}, {13.9, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 8.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{9.4, 11.5}, {10.6, 11.9}, {10.6, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 11.5}], PointBox[{13.5, 4.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt2Hk8len7B/CHJMKxZKc6WUJRtiyDzokaQpJStilS1uJEk7XOaRKnUo5t
+0jZOZiyDZEmEpPqmlJ1CK429ZZAQ0u9z/75f/3i9X9f93Pd1X/fyPKzaH+py
+UJCiKEkBiiK/OeM/8LOGSf3/jy6T8+AKZX+P+ELOTx1rmZSGtplXBKyYdb64
+ZC2Tw1t6M2wNzOsrXHINrjy9IPRKh0nxz8k5/o72XZKdeefgmcch/5D4xuvi
+XzbCra0m3DLEPdN73Ka1mZRZpcC2F4hznLxlKmC7rxdyhXSZ1HNpY4oDa682
+OGWJfDSch9J2wsMfC9xjEHc8WffQEHZO2rujFvEyaZ+vy+G62y77BPWY1C/5
+A4JycKtZRvBmPSZHPOOOqQJcGWRx7CTiGYuWeKjDAd6q1bdh6fy9d0xhkenZ
+9j54OHfI2gVmzum2UuuYVPW05mUWzE/NdZWB75Ws38Ajfm+XKweXbKFiimDv
+kMzSpfCTB+z3T2CKXS85gf6MJp5JvYFZa7fNNiKfoPfuX4dh+tNY62uID6nx
+34+S/BOLTA/Cd9apZ/XBxf+WJmqh/dSxyd8aSb6/pZkOYb7OV6d8Ckhc0tQp
+F/U4e/NUwQlSz/tRfUFwrbXPbluSX2VatzG8Q2FjtzAZf8S/eQmef5FgLXtP
+C+3fuk8MYD1Uqk9tDoO5vJ8+t2I9vJf6v1ODi3n72xtgp1qj6I7VTGrMYF6k
+De0jNYzy4+HWetqOQcQv+7QObIQrDRLui6B/80M6/guaqMMJpU4TuGPnEenH
+8JhPVEQIXKO93+MyzCqV1L6B/OpUGs2iYP0ji2ljiDPoMkoHYDM9q5XGmP/q
+7cu7PUj74r9sjqE+Rz4IPvKCZz7qRpfByZ12fwfAvKii+WG4afXBrlg477WE
+jyzW4y7r2caLsPaLZbeN1jE5lvUX48rJeCbXL29B/NJM8crncKSFjtNW2EtB
+JuILrFh3485G+OHdNopG5jvWxloN074c9VYj862ZyheAXR+on1oH15mUGbdj
+/L8/hVTqw3yP3R6X4fSxE/VaJN4S1ugFn9SsnpGBvWNq2KqYX9l/zLUnyPj5
+FWdeox43TqXefQRzb7yby4RjE4QKL8DMtd9rA+FznrJ+TrCUw34WzgcVKO7Y
+KAx3byq0Vkb9IqueyFdpYP4P2f/gPHGULtyuCoKHfaP9v2O9EhXGHVXg3io7
+KxL3DNX2bVbHfrwXo60EH7WYPxoPZyh7brZA/z8YJ2q3wFJVKTQyvr3jcU0a
+af/OIooPN37uUutTw34XDlr0Dh4SGCy+BzOl5LtWYX7eSs8Y+bDZYsEP2N8c
+96VWxXxYcRellUfW6+z8rixYROwTdwDxqsZPszfgSJtMOxXUV6M/dPo+zPLT
+/PYzvGOTreVrOMPjXrYf1tN4uR5rFh5LtxyJRFwq7O1SZeRXLJu7EAu/4niG
+m8Fc06NPw9Be/P3nFTthVlvTKw9438iZm/6wm2j/QRM4TUpc6ijMf3bRYAn8
+dVT9/DG4blCb24J8l6XxRw7D3l6DCinId7ydedidxBdpde5AnNvg9ImMV0eJ
+tkvDj8f5zeJwr9Y19eeor97sEPUC+ea5m5T9AQernPySTrw1lX4EtqK5xDnB
+dLlT151Qz3KdmBEBuJsbM2SGeMaK0d9LV6F+/V5iBvCAhegqX3hsmSvHFN7R
+M7JcHi42ZtMc8bxBp4dwMx3nMZv9/DB86IuX4nk4IOL77itw5a3dlq4kPhLD
+bcfz3AXbz1pwXkLtBynMj29J0xWGFTekFe7EfFr9lTp6V6I+gtkPLsJ2EYny
+TTCnvEjuJWzb59zSAnd/O5GlgPrPvRi7Ngj3ho7/sQ31PNx4UmkJ+rPLsrkS
+Req/ba/FKnisRz/zEtqP7B7xYsAzptGbChH3i6qe2gtz6Q8qi+HUynehx4kr
+xvtzYKPlLy0ziDdVOifheTUPiYVCWCpeZm0wHNgke/UOXByqZW4Jv+DUedfA
+3UVq94Xw/M9dXLFbsHanaOhjzHfuwuneTNKfbatxAixC21DChlnuWlq2mN/F
+qvy3O2G32iK3pXBKg6jrctjZ2qq8A/VcrywkUL2S1HfmbTZ8svXPSF3Y+cpr
+2il4dJd+VOoK5DOsO3sIPp76fWhyOe6vUdHaA7BE+sRHV7hyeFU7uc8bWSO3
+qlVxnq4pL2LDvFsdRmthnsD0UXL+9rsljOSpYLxTXjeaYKv4mQIzmP7MMlsI
++f261zfqjTLW7blUnzUsnHlm1yV4LPfUhdOw5Jabuofh3hGdnAbYNOZouxvM
+CiiTFEe9fFdLz3rAzPGBenI/1ni8sD8C69/K/cGGp85bxGTAlVlBtlgvKiFJ
+K7IRnskPzGqE6y5lposgn+4cjz/fkf3Q8Xu9LTwmHx3bD49/tOmJgznamqKv
+4L9qdcurSHu/pJaHsPzlRRn9cF0BezYTjphlOy3AihL7HI7ALsaJfkKoB92I
+ufgnuHuW5TaJePGxnrZ5zOfnVzLZjTAv7Nb1Gth8smsokTw/SzsTC2ts2fdq
+A2k/L3WFAYc6tzo3IH/FXtojEVitQ0fZHg7Yn1TwEvVl/Js8XK2E9ZepOFsB
+N9Wa09Vhs8EUletwifk/f8Yp4r61P8nOgOcexF4eUMD6v7tpiPNOVdQlGjjA
+rMDtwqWw2+S2fVXyuM/2PFQj+8dXySfXFO7NKZWmyPguPf31cmjfcLLFBL6e
+p60aDIucP/DPUTK/8GV7VsN2+sOxFXCCpnviN1nUg5OWPgdXtBin9cNugjJy
+5H1Gb7BaMwib6WpOxcASisnzc3B3w3+CSmGFsPOP1Uj/7Kvf38IxD57H7oa5
+OsE3f8CMksfhKXBr2FvasvVMKp6hfr0N9i5v3qoIxw3Zd9CQv36khKkk7Guy
+bWwzmU/wDrcZPC95ucMwFOZNa3d2wqrbV/qegd2SLQJwnqmDDodEeaT91+O7
+QuG2y94XOfCTuB1MQ9hc+lK8O8wtblEm31fDEwNByjBdq2a6hLx/+72mHyIf
++qG6UVIfi0uCU3vggDV5763I/u4OMezBfAPSXOMl4UMbAt0cYG6ZlNxH1D+8
+R/xJ6TKsP7vQAfc15eLA9pGFzToebG+EN1gV2P8qg/OQ8eN6Gzy1pbLkpTTu
+Q6GVigOw1p2VSVvhmcbBt4vRf6m/TVC9FOI5gnGG5Lxpb1N3hd20nZYEwk/H
+a86MS2L97O5O5MDMF+H3/GD99EcRI7BIpX6/GMw8N8zTw/yrDPgVvTTyfm7W
+ZMGJTuX33sORwwz9Ivj2pIOfBGkf4tBLzleI/MJ6D5i+89VdaazHZo0rovfh
+7tsm9YZk/bJ37FJFPiwD4bifYYl/1Y57wmO19+iOcPPzl00ZcN6lv0Ns1pP3
+tcraFtiMMz+qC+e1JTV+g7tHxSpF4babYsdkMX/nT3eSyHmO1tPIV4HHYrqL
+/oKHV7/vEIdZzJAqf/j67LWDg6Q/vRV8LfL+nk35kAvz1NeGD2H+Pz46SLuQ
+8VPv2ObDo/e3GTUhfzc5YVo4vOB0LbUV889LsQvdTOrdYMcrl0D9S4du0GG/
+N7Z9ceLoryDyrCgs03Bxk50Y9pdD8zpyvkojxmZFlyJeJE0n61Vs3RTUKYLn
+O8+aKcLRmdz4kiV4P/zm+7cZuT+/7jqQL4z52mwXIt/rnRVZzfWLsf+1sx2v
+wGGPhIfE4Tz+Cske+OPAt9ccIeynayvZ5Hvmtu/rag2Y36aTsQ+eHEh2mVmE
+5+0/bMqC83S7NnyDi/3Mf+2FFZuN3qihPWf/Rm8F1DfHULcnBOYxdLib4c/l
+a+jPYfqdpsGDsIgjN8QR40udaBeMhnmm5uVPYea8owAH3u89mbwF+UeenrkZ
+AWfttHhWCpt1X0jwIf09in4qgvnaia3O2QhnRKbQGMRyXfelSH8ph5OdiB0d
+ZV8iPx77s4oh3PpxLfMaue8rbOIG0R9H9qrBL/DSoeqOINjNwG1OFeZTu1zq
+kE/r9EzJO7K/N4dHjCJ/brKmLfkeVE04U/eZ1OPtQb8oOCchNrRTEPuH8ZOr
+KzyVNmH0lwD2z96pLnKeo63jH/pTqFfEn6r4e4G6+iLimcsCA3kMFpL1OlCz
+dWJwjkGxLNL8Hch4i15/zvzGoIZTLH4Lhl8L2c8nTTOoSosrKeR7JrY38WH9
+VwbltuRsZhNx0x6+8ySD4uglmokh/wOlRyRMvjCoJxKzKdvI++pKKCNmAu2V
+vQqSYfGGhImVMFf3cCC538YS2w4TR47KPpJB/Sxn6qtZMC+YP7oVVv3FR24J
++uMGcr3IejR2NEW3w1JXDaQvwcNnLobVYXzvbzbnbsCT3z0Ha5BfnsWxD2Ww
+7KO7MmVT6N/822wB/FHJj30B8/G+Ibzu9/Xku+r0F4sZ5Pv+6B/h8K0Almc+
+3EvxFrbAvXuupj2DWWPP48h9HcuIl0+H3Zrj29qRP0VLY1EwlbKlJQXu36pw
+UQz9KyYzeC4wV6NjrhL5tCrH6JC/h+ej37Akka9d4qILb1C/J+2GXUqYb8Bk
+fnCRHnkPJpo3/cug+HHCYmfhvDfmdNoHBqV/WsM4DKYPz6gtH8T6LLNWCoAD
+RMt3q/dhfWzYdodgfuyB8LRujJdqmX0C7i30oQ01I1/5I4F/kPvTc8TqVg3q
+azuy7qne//6vUXD3v7/XMf8PEmtJ5Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.72102250104224, 16.744111812358444}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0VGsbB/BdiEqMSyWUcWiSlJFyysLsdOF0cummxHRGiXKiCUW6nCHK
+JUxM6HSb4qN0MUVyK1Mpo+sYFUlCKhShEIXv/37rm7Wsd/28ez/v8zx773dv
+4y271mwbS1HULfyRkfoxip8xTf3vp05T9vMNBkth3q3Gcb4TacpPw7N0Nywo
+se0emEBTlq/iJSawVONr4l04eKw//wUT8wlZsytg/7t254/A9D1jLoXzT+f1
+19rBlMnEiaFwwZ3Gnl4jmhK/CgjXx3rxj5k2B2HBk8cxX2CBwuqtAUyp2Kg0
+T6KplU/DV1fPwPEhw2adGjRVuMeo4ywsSNM9PJZBU6LVbfXRMMOUpZ0Er2Pd
+t4oi811KE3S0aMpC3a5FBDfJkqIS4Bu6to3FMPXxH/NeWDTUbNsJy2WpRx21
+aSp0uPEvc6zvrpFisQ+mJtQ67ISZQdktqbBIM1B4leTnoVdxHLZ926PTDgu7
+ZziFwP5vfD6po17+qOsiW/hsADtrOszM+ZDVjvU8eBZNprD0Xd/NGLhMv2qu
+MSw/uuAQybf5rk+mFiw5Ii3LQD02tgeffEZ8emdVugE87lQZ9zTp1983spZp
+0lRQxJljNqSfsZFj/NAfv6SAwTLUwwsMOpSN/j28/nW+Ncwcv6xBE3bMS0g4
+Mx3zU3d1XUK/ixxVP1Aw1RNjFwE/asjes8UQ/WLGlh+GWfUOcZUGWF/91+2H
+8B0/xyULYab+aRmNeJKH1R4SfZJPae0XWDmnoNkO5vWMHL2PfLrieliN05Af
+nRhSiny7jTbsToOp9vJqX9Rzr6emzw+WP58+oQemq9or3GBmwmKTA+iH4ubn
+KmL3gOGOUVitXqPOF+7emnt0L/orts+rSICF6cF36uFn5fGJUrLekGi+mQ5N
+BRiYxo2Q9Uapf73gjHqVczTJz1P1QzDst8shJhKmnRdvCITH6bBxTTC/c6Xw
+TzjWIt/4M5lnxEdrwvM8U6InoP4moeu2MqzH0E6NnAKLLXdFeMD0iQQvddKv
+6tNdLch3BR3M68D5wn/VjvvD3pa1w3kw+5Bzcgfqjd0tr+SS9VIrzYNhlrdy
+cB/y5Q8uD1SGn/Walu6DeTZfy13Qv4+qNX926cF/bT1ehv4GDYfFb4DpklNN
+3nDRSXO/kqm4HqK+dmtYu8/IwBAWNy1dvwyuU4R9i5yC859KJyeR89V4qj2T
+4eiLARqIP78kZTSQOGcPJSXX6/6Ut7900b8faRku5H5U6pCJYammF/sxzFj7
+ttMLlo/ZsWgt6ruQHrTZEpZUX858By8Y06BqAItPMdkB6I/wwcT86TDThXvj
+C3xhs53OQpidqsLzQX+HRh41c2HeicuT78OHfpOqiGD6QLVoEsZG3rIHCozu
+74xu2WNM418c0UW+0nB/0Wp4yNfdbz3MeJ550hkWxaQ/TILFHu3JJvD2zFyH
+Mpgd+jmlFfH7uVsPvobdRccGkuB7XZv7WmBa+bLJLLhgd4PqKxLfSdPzBvKd
+Ec01vQ4Le3/usYEFKxPehJD4HO9rxaj3ztz9rTPIfO0n2hFufa6tW0Dqm3t/
+ziv0a83U3hU2pD8c89YIOKDli8MlrEOpJ+suhLu5BXu0YPFiJ181OPet4iPZ
+V8ShLWlduB6FS4/UvERcedrMPrL/pQW4HbaDmeHeVnPI82S8UPkqRsl9q7Ag
+jGrKtzvJ/yVeOweqMB4IHlgTgTiSrO13FuO8Y98LjlbiPpALn7wvgutOZCQt
+hXnDFQ+WYN2NNVynbjzX/CHK5Rn83YNa8RSmLGxsNiLPVRGNtbWwQF7IfQ3X
+xa81nUjiLYwbvwp1Wqxz8OfB1JmoeZfhrNo8x+cws83kai980feTiSvykQ96
+HjZC39R0XhcqyH0nq+q2hLWP+VnNZpDr1ZtgAm+6ZrjNB6YOspx+kr6atJkk
+wnIWc1sxXFjAt7oIS8+XcH3gvfky/TyYV69XMID87ixQ552Dm5LnSyNh54OJ
+KWGwu/fGIBV4hslvfr+TeMlFA7Go98DjQzvKkQ9j3dJ0bZgnCG5rRf7imHCH
+i+gX46G9/QfUL+/NdXGDMxrOG8qwT7ozDdaqw5JA5XNpeO/xbQdrWhD3Sk+O
+YhPekzzeR+OXsGCJs6PReByX2u/QSvaDuJd7ulTJeTHVmjj/yT9uIYpxqDeF
+b+YBi3fcXf5CBffX7Wi3AtguerLwpzLWy2RZs5Cfd+NHtissfBxbnQ3rjeT+
+fK6EfmsZhrHJ/qcTHx8Fy1/zlG7DMqnWnG2wwLx+/gr0S1d66WMo8df/dDwg
+z4vbluwrSuR6m0fZoP/hVgF8FcQXG2xWTYVFdcvK9sKSmLCIWjj6QOXrflgQ
+YTFCYZ+RaI7124982dFLhybBi9qOywZh+T/V80ZwvN7MsHx/1CefbH9LAesO
++p8rhQX8978S4QZ+pUMnLJ07etIaXtbysrkPZvLY82TIL3xoS6UcZlRdZ5Hn
+v+iKtcd+WGjdcOAF6qPz/Oz6sJ6gfVIQuV8NDb1CaBVSjzf7PdmPXNtm+SBf
+5pFTORFwWY1SLBf1CjudZpiS53uzdbj9WNyPGjkqreh39+8uCyaMQT3KZtLb
+sN4NNempUQ6+b2LD82GzGKVprGEOxdiWq/oQjmVn7pYNcSihD7fjO7zdem12
+2g8OxfROcHJA/Lo+tagL/RyqOz1u3DmYP2fvp6HvHKrJZ993beSrpr9p+uVv
+HMrdcaBfBC9S/L2ipBfzrII/jMg+OtNp4hxYeolRQZ6vImpHxM8e5KMdbLIA
+/SrSKDGaiXmm/LnHDXgj9+iaM7D79fZKJq4HW3tR4XrEF4bmn42A+aGXP9lh
+fcY+2c9SuC1ay43Tx6HoGNasFjjc11PdGfkyjX5JPsMCVe1vSwY4FLt+JKoO
+FgY1xemhPjouvPnSFLLvRo8phsUnR7y2wLGzHk3VGeRQfEXCNRV4o2fJm2kw
+U3W3KIO8d8plf1TgeOFUu2Qm2cfvZRdNIm5fnpWJ+mQvTmj1k359VtM1I/uo
+dXJ1JPITtF7RKEB/wi0sa4pRD++axw4XmBH45X0u+iE+fHfDIHk/ay1Z+6gL
+/aoPmUve3xIXt/L+dtQ788jsk2R+XWK70gf01zLYLYXcHyeUZhs2cSh5bIXr
+Rbhp1fSzileIJ3gZQb436JsDxSufYP17nQoW2cddE8bVF8OaofrxOv//rs64
+TTHIqEv/F6niFE4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.245181569676696, 3.3258894180601777}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.}, {6.5000000000081855`, 14.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.850455074238777, 16.59527726407387}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd13tcTOkfB/BTLKVkYnRRmO6ppHtZxUGSEbohCpOKLmTIioSJSr+URmrl
+2mippDQyirR2IqlUO9Kk0mqQSiqD1q3S7/Ps/DOv9+t7zvN8v5/zTK+O3tZd
+3iGKFD4KFPXf938ffZpikW9VmuLxVlbPgMUDb3jak2mq2aznLA0Lflzz0VOj
+KQ8t4UMuTAm649Sm0JREyXRWAcwLPmndBsfOuaX3HuaXhcS6MGjKrmFgyNqA
+pujNzqeiYVFsBC8W5iXbcs/CYnfVhBpY6HhNlANXXf9+a5ohTXHK/6AyYMOr
+7Mf+xEVTvkTCjNbl5y7B3GVeRg6waroH3Q4LxNVvyP6sk57ak41oSibz6rCE
+W4MWvbGHWe3dW/aif0FV8GMfUj82c5EI8+mmbQ7aBnNW3Uv8hvlF8fYNO2Eq
+LYK5EjY13p0eDosruHNvq9BUYalVySZSX12iswhujkxKdyf1f92kHybRlJNn
+xkcL4gKzknpYUtHZpArTOU62baSu0hvWh35lc2s7NHA/3zJbsQbmDcYZJ8C9
++OTBVNf4OD3s3zGk6ZlC5ruzeHcP6a+YuyCa3K/lJpagf8H4wtBwWOyf9qcU
+84l0OS7bYTp4xqkBzJ8fN/1OJMxa9cbjOPJiOueHxMHyM2rhmuo0FZC1zT8b
+5iud08+Bqy5YOJB+WO3nS/Sn0lTK24RZw2T/uZkPMmCnzmtPHTCPcHpD5hCc
+tf3TjQOwoN3RZtE0nI/PzrWVMH86zdsDu++OHVY1hvtmBqbCASqCMT+Yc6qh
+PI3UFdoT/4BZbkYHYuAqx6XefTBFjR1bA+f7NLPNTXC9ZmeBOrw/UnQmGJb7
+fUyswv6uAR9uZsA0+6LvDmJ25d5ymLLwqJ4MS5Tr5khhcc/SpiLMFzsjl98F
+M2JuHPKCTXMuvOqFBVHj8kaRT7x82ZPXsJA/pakUVnq4NOIZzP1R9ZUH0yN+
+SyrI9c4t/lvg/vothtlkv2myMF+40K3W8DDMOpx5PhCWO+/j+ZP9ohXCSP6y
+i9KE+aTfyYlLH8Hu/W6xM2BPuvG8NvpR3fH4BEXqDlGf4uDCUwNXB5CHMOCP
+Tz9gxj7T3W9IPl7FmTzMxxllOf5nnsJqNeQjn/i9hVzPWljqmA1L6obvjSN5
+fW3wsGQiB8qgzRCWxdWfK4X3jrt8zZPMY/G/aNvpeN724Q6JZJ47wyUCOL7g
+KKuK1Jd8evgDthq5XKxkivVPNA0s1EBfzfwuL1jMeLYpArZ7cfDkRVK/G7Xw
+CGw63W/rO5grDRHHwIL7m6fZzsH6HvFaW+D+cecj9sOev3/cYwm7hxwLKoOF
+7Lcv3mM/17Ycx0Filt7s83BsZvhBHTP04RKWTcN+TUGmC2HWc6HJK8xTkzP7
+2lpYsPNDWRzMiOR2BsI8xco1JqQuKzAKgjk2KndbkI/M4BV7I6nnyHwzYPF1
+OtmdWL+qPwjurRg8NI9YdWGyOzl/f32YrA579uxZ50rOs+Bv/w9zyO+FecwP
+rtHuul5P+r171SUB9l2vs+o6TB8+VVQLNw/58VJhvq/9qAH6aTYP5fxG6mpR
+O0/B+98dexJM8nGlotQwn7gseM0mWFLk1PE7LMq8psWBedtko0bIK0NnVffO
+OeTvw7euUpjWLVI4TurPTp9w1cT51Y9ZQPYXFkap1cFdpcUDbSTvXMdXS7TI
+75CnOJXk0fT+ZwFcUdk/5kXyNfjMHIOT1BM1s8i8SkdznbVpSmtK+fzXpL7G
+0mQrrJv+zNzSHPsF7FfZBYfG12QfgOX/XmgMgpVOSj0ewMLA3QOLiatkEydY
+IPc6XosK7Dp0qX0JLChlSqqwX2hCvFY0qU9fKOUSJ+VwL8Pic74RTLg1+eaw
+GObvKtktwjxUumiZFOZ1FQ+sheMLG7xfwqyUSdJR5GHVwMjugBlfP7cKYfmP
+ddpPyf1TR22j4ELWCu0/YeHBoVh3cv5KVb1yYMr4LM8W1v1pdu8o7Pn4roED
+rCSOSuAQp4yt9iL3n6n47gJLjix4Gw8zH+wNmUnWG71Y9TfM6lJXUCDrOT1p
+mof+PEb9W/uQBzXBY1oO7JScKeogro54rI/5vs0OU24leabO+72IzOsR+vYf
+WHKgotwFefUfr+wehGn7hY6NcJVCrp0KyeuS5aSNM3BembmHbIg/PQrqgPnK
+GsNBMP3Vr81TB+dHef2BS6Tfc7yMW7Bhw/VgGWzlMy1WQRfno3NKu8lc5BT6
+61onuPnIpnt7YEn24hfr4OCbfY/uw7RIvyEAdn9xvUDZEs/vnwVyNixXbDf2
+ghleTCUDeGjLdN3TsKQy8WEP2T9TMa8BFlrpCC7AdvRu2zFSd3lQtQwe6rFL
+NZ6Hvp150h70L34y0r8EpgpfVR6HTUWXKV+Y48rmm8FdB04NboC5871Mpcij
+9Yut71pSZ2+flQI3X9u4aDksWfbvUR84Q0/BwBoWx46UWsL1Ri2PmbDg7kR3
+Fiw+aDN/iPQ3f6B5Dlxh5V78lMyjHj+yEh4a2RNdTOZd+cv6RFjokfsijVzv
+uyXmOcwcP6b8G0wlr1J2QX+8okOjHFLXOF1/C2YcfxW6Fvac5SF1xLxZ7MQr
+PmQ9757cKlh+aIIggHi10va1uuQ5Lmjlknz6fdTfwoxDyt58mNc9Whg5E7+f
+h0bnymGWYUfcAJyV9q52kNyvXsveNIumLnAG+eaYT/7y16By2OqgxtJdsExg
+Oqgwm6YsEkP7ykjeJReHrOHg7rEiBSvkkCqKWQF/KsjKMyF+qpXsDmf9+rXc
+A+brC6ytYIaxsG4XLDP+eUCR+HZ7YxrsGabq+QD7ScrUZddhwaKTIVGwxmet
+xQ9hTup95RlwwArxNimpyzyGy9F/7Gnh6CtYGHXb3h8uCeka6IWtNNUrxjD/
+1JY8/z6Y0ZsRVASfFDFzu8l6L0eyQ2HvnTpBL2HqykRfe3L+updsaCL983/m
+acBK47ZGk/3lk8b3qsFW3wvqSsj1qWkRs2G3oj1Rl0k/V3WPu8MZl83P8sk8
+SVeT/kf2u8XcHAdzb6v9JYNzJsx+tpf0d8EuZSX6bV6W0h9B1nvUzquGX1fe
+j95O8hJ5x63CvKaL86eGkvXKfD6+IHlo2BpFkutH5r3dgfwm/XjfcYCsr7Jx
+3TB8X1fH/ARMMxMsFrNoqqmZ84j0lxUTlH8Y/j3mb9M/4Rp7CUMEO68LzO6A
+tW5MvNEJN67gLx+DQ5ECpYd+GfdnGlqj30U8MRMWxitNZMPy3k/jZsJKZhr/
+7IJ5s9YaacPc3oCYDJhR5CdRhjvqt1SXwqa/TDaXY32WdmCl1Jqci/O1DXDy
+E5U0OfztaPjFKzCnM+fIBBvkuT5Qtg9mb/DV1IRrulmjbvCX6Vun6cP5ZU6/
+acLfIt/tMIElE+pTpJj/h5nFBmLx/W/ZibB39frl5HqZqkmUG7z62esXWjD3
+OeOOFkx133ynAtN/pfpT8APDVWEj6Ef23X/bGPLeZxMf+d6aPM+IHg3Um18P
+6raT+eae7iXr3fB4dL6WOMYk8iRc95KvfI/ktX5/3Hu4q3o+txhuPf06Zy76
+NbOW382D87WDVXbCXXXb867AQmnt85uwU3fD41yY9YFR+B3mWkv23CDre7Wp
+LEGehwc+V5H1qTWDe5Pg8ufBlxphjppaTB288bz7lW7yPKRPO37Be9U+YZLr
+OBvy/3vOVSe426HvngGs1XnXKRAeLLaZtRzuvbJ6+2G45YQiZwfJO90hNg32
+dBgJTCfP48repRnwy53ikTIb8v4WrJoK1zctmtxB8ksNz42Bj2q85I3CpntX
++22G7WzecnRs8X9KSVbTfLhkd2OHHaxUkTRzCmx88bP3CphrufWYDP2Lzq5c
+7we3FnyPFsJq9/vKAmFBUOLhONhySONICMz4+LfaOlh8pu1TEFzzZ0uMFdx4
+b1r6JjjfjNEyFWZPspviA3OyF3b+RJ7G+dXuy2Dq+dOBf+G6cEvaHuaPZb75
+Brsu7lMzhK1Wsg2UcH+AdVv7VFjseizFAOZP+FGrSPqvHn+IDadvnvNlCPPu
+N0p4fhAO7+AE9sGtCaemlMIvvw/1vYFZccxfv8IWW1zdXpO8Rhr1XDA/d5Xz
+57ckX0nv5gQ4S09x/gdyv/witwFmqw/r/yTPj/Hl+VS89yZ/9eL918/1MBsf
+uD2Q6jaHPT+s90mB3ecuu0Xy9Mtz8a+A1ZQ2aEXAWnNuP3kFU1bas9PgpJSw
+M8OwU83K2yL4Trn3XGW8txVOZNxph7OcHhyeBI8n7/l2mJd8G9L/B4/XuA8=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.278814934002025, 3.4867457599351623}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs01HkbB/C/sim5jGsubU1lxbozpdz6N2pjM1FrhcQkNiRRwm5tvDaF
+OA05oZRRyb28KclKo3rXhI2QFSuzsrUrl5F2V73i/T7vnDNnzuc8v99z+8+c
+MyuCD+4InccwTD7e9MnMzOH1OctwCEtZJiF8dYvADP4ztkAH/vVkz9MCuMNV
+8E4dZk0vu4zA0YfMjccNWUbY82CrnTk+q+LLqmGpy1z4Ebh6aaGbHxxmoxR0
+Hfb60mLxGwOWKT3TKPyVziuWcyLg1AxTs1lY1LkksF+fZW4FjalrWbCMZEu8
+eBOcF1IyawBX9298XaHHMklpt1J0YS9ba/8lsLApqHUBLFR/PpaxBPHA1sQx
+qrf4kYEmrLKLL20jt0Ser9BlmYYdE0YlsDwxwmI3nBHnuCOR+klIPGAKc1o9
+VvvCspwHVRowV9nlMA9ml4aN6MC8N3f7dGGuhVzKo/vFl+4owB0FdaX74bpT
+a2b+xn7kxasf1sKPrgUaTsNJiq/8NNBPqm7335/QfZUp+RH46rXd3Vy6v6ot
+6wXM8/vW343irTHam2m+qqKco7DEqS3iCvyu8eNsHRwd2j0yBcdmjubR/rg3
+3521wb5i21I/utO+Tnt6+MLdUe+T8mB5yIxmKGxuabL9NSyO6DLygR/9S5Bn
+Z4n+ChQ1zWCTlvLC72D2VMzDYeRfp/VYfhe2/iT1YArc3Xn18AS5wTiRA2uX
+e6fqW+H5dfyyNx39s9lyA3vYWiF4zzTmb4v4T/UWWHZiq0AIRy6zi9oKs8qh
+W6Q6OFc4pu1K5/dJo9bCqd/UfrCieMlv56q1WaY3iXmvBXOD9RgnePT9Fp9J
+1PfKSl4yoIU5ztuWt8CiezVsLux2tf3eZVgWv6EyEq5LORp+DGbyRpwC4Ya1
+iw75w1yDrmP74cqL/d9soPh6rSvZsEpTZrIFzf/8fFkH7LSq7IwxLNTjHVqB
++gEKdZ1mtC92fDqRXHb/gzPcsedk1iv4VpdMbzf1Z/bC3BPzSM+dKEylem2W
+V2pg1p0bfp/6Dds/p4p9jA46/zQHi/vspb6w775Ps2lfSR1/8c/Q9yt8yiMH
+lpy+WVUFS9b/4PASruZaHfg3LHJvb9KzxrzSJ+b5cPpnCeYuMLfu5XgIvO5V
+TboQFqdlq+jCtXc9bxyHq8sEn91AP0auveJcuu9TM2sHuxSlFZfDjKevTxnt
+W9/O4w7db7hdog1zoopi7sEdm+b9eRT7GT4u4JO9Vlvwf9dkmWyJwzo6zyz8
+rskHtpQs16mERTW+Gj0aLFOfzH1eQPdbFO3C4IDUjNp0qh/jslEDDmleOz8e
+5rQtcunmsEzOBkOTvbBwtn/sJhxwxEDkBbP6001V8LDjpXMsHJ2i2PUQvmQ3
+E8ejuI3h6FuYv2GPswVs7fBzsT3ybxPO3jWj/dS2n8mEjbq04q0p/ttX+yZg
+Ps/7piMs6YvZuRP91xbI/QSUvzSLvQ+PjMaohlL/QWHzV2D+5AVfr0yG5Y5T
+rXEw/45N5RXKb9nn+yNce29hqpTs3O44Audct4yYoP3UPVNnsM+4w6bjujao
+3/bL5Q+IvzVpLHGGZbkZnOf0/YsP5AWTn4X8fIHcs9zjB1hkPi3eROclkU8L
+YfFRe1EP+pvef+NFLczJP1j3NewQsu1pMyzXHVrajPme+Mdu74QlqoHh1rBK
+o6tPD+UTPa7Mxb4Uq/nG3RT/OK42H04QfPiqDU4yW6s8qcYy13re1t6HWblA
+87+qeJ6DwXtuUH+hPZUWMGvIOVtA50fEQSIV/P6K5pWn0vn9KXtN4ADrnzSO
+wELT2JDpxeg3ZoHtXqrXKxEyiD+y3LXbm/Kp25c5w2oy3SZ3yqf7j0IFLK8f
+8NlE8zqkDbFUP+p2L1miodf5F5yRv7xuK9VLDu9vRL/J0go9P5hbvVhLpM4y
+Xxx3fRJJ++grzrHEfOtsNgedpPOXvmcyYZNib+Vi6u/L10UDcF1pfjvtjztY
+EGeIfeU4zhwbo/q7zwbz4fJj0gZtW/yekncEe8J/rFUydoI5PYM3WFj4+oEg
+GI72S+jVgYMrQntTKB6i9qAd+Y2dd6UXw3IfN3E0LNM02ymBkzzUav5Bv0ZR
+26OewbJlifVvME9D6/rNw7DwkHt/M+Y195NdHIXF9ccac2lflo/Txun+73OX
+92G/efNNw0fIBbnNrsos4z3g/kpmS89jstt+Efa2KWSsk/JPDm7bthDzfL69
+qAnmFl/QEimhvmGh4DrM5FhNzIeHAm/7nCcn8N2uL8C+hc0mp+j80JoREVyv
+H24cR/kPWE6Uw3kN+blh5IsardNwhLb2+SCqpzQVF4t86d9e1QqgeRoH6nVQ
+f8ERs5JA8unD2Z1w7fddlftovk/PlhSiX9vlzy3iyaEmA9GY54O9/nAG5V95
+4uV6zDs+EOFcSvkDV7aPwwaaBcFSivPLyk9gP0PjP26kfSUlrfo4CXek8S5o
+2qFe5CIXK+xT8oW2hgN5TbqNPWyU3Gq/BxZLy0yU4GWZWSUn4aRFK1YW4v4f
+fRdUy2AJ70CLAtzt5+3UTPE7qrt4qO9vJV0vg2Ueyf4u6Le89+LWKcofYMCa
+Yp5Z+v8F//+1kP0fdp5jRA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77627226468353, 5.608447160322252}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwV1As021ccB/B/1YZW2lCPiFewYmxkD+OUdn/PZtiqum7p2JY6a8vWquK0
+tKs+phPqkDBEvcscfSATuqAsK1bUc2ULilDromuPHMy03ZJ97/+c5J5P/vf+
+7/f3+98Th5jjkYf0KIr6GB8yUobki01T6zpc1jQlCNXFVcG8YXb4BKwYjGH6
+YEzITbXNxyjdGlxxGyPrkZnIE6PIXzPkakNTldWfJjVhHV2lVZyCuUntJg4w
+1yuHVwur5izmL1jRlNyBbyWDBekvXB6wMP+kZrIcFgXOZXjDsfVM+6NwbOhU
+QYklTQktzvrawyOXdx7aCnNW2ow6sa/PnTb7YguaUtfvFe2BR9wY13fCkqLy
+K1Nk367EKAquaw8K/pI4zGNg3hw5Ox5f2ggLDBY7FuC6ip0tDcgl2Rhpr4/5
+Ij2GYyIsON7tRp4nooZkkTB3zqM8C153e1q1D15v1Rk+ghVdTkEnyXrjAnce
+8vGUYm0rLNpwI+YaLBjuCrXBfuomMUuP1LdsOy2Bhe+WeYXBcqv0hVeR3/X0
++5lpMM8xV9ALp7SYOxfBvYX7Mkk/OLcSr4thTqQ8YIst6sgxSToKs543fvc9
+rLKzk7nAdazPHdztcD91z4ke7K+QfpQngeV+03HvwbEzOWtq+PwX1r/LkZ+a
+bNhsZY/3+9OyExtmlcTEu8DytebsZPSHuqRpMIMr/xyRDZvh94vTvIdYz5JU
+cN+CfTqt04rgXqMJu9ptqKPmkaU3rKrzavGAeXl/M/uQL3Zy/+KoKfpWoX19
+P8ysDXTOh3vXhFkPUZ8waMgqGea9aON8Td531s0SYgHN3udMzteR8cY8WNFq
+fk5Nzuny4+p+8ry+xvK7xAz9EEvslxLYof0FVvKvvZFILPiPQeaLpGKPMVjQ
+MLPbjZxHcXWJF/Lz/dz9LpP+tm5S5cBqoZvsZdLPkt+mlLAwzvFJIRxxvnQv
+A/2QlBcvv436Imq0AS7k/IiOvTQBaxLadzjBvF3dRmfQL9r02Tkd1ndfLr5g
+xMHz37nveRsuvW/aEw4rfmjwjYKD2GM26bDS9qtwFfJF37MxqIdVBbbZEbCN
+2FTZQ2x1+kAT6q1Lz/p1EHbNiV40hvUrtG+S+wrJX1NHTGhqQG78GlmfEJJx
+r5+J97VdNpZB5g8xH/jBldJIIz7Mbdx+VbgVuU0C/B3I/JvjBwe2ID9z9NYQ
+8mt0NathcEpQc180zLH0nNsECyfErauoV/qKTs8I5o5nLZeR9x0vyw6A1coU
+1Wcw9fQTWgqL4u/k+pH+dPVN7sZ+VHxmzA6Y+2HjjX9haXDGzAE4xWnUVYB8
+/MNnC6/AfN+quz/DkuEM7nNY6ZFTaI36DL1XhcnII+orO3YYVpsM/rMB+enU
+Br1SWLG0rTMCZo22hfwI89f9266SeiWz0mY4+YMbsytwyon+xDw4gcPwoB2Q
+Q//b/AhYP2r2yTfES2ZLGuy/4HN+vh2OyFexT8GaXQbpf8BMrevBEeQ3XnnG
+1sGC5DX9AtKf8qYZA0esF6WdCWXgeeT/1ZH0E9dm+n9frvJj
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.582298081084662, 5.349305811371944}, \
+{1, 1}], LineBox[{{13.500000000001851`, 14.}, {6.500000000002592, 14.}}], 
+        PolygonBox[{{10.6, 14.}, {9.4, 14.4}, {9.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.0548}, {0, 1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 9.9}, {13.1, 11.1}, {13.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        LineBox[{{6.5, 14.000000000002307`}, {6.5, 6.999999999998607}}], 
+        PolygonBox[{{6.5, 11.1}, {6.1, 9.9}, {6.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.5}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.}, {6.500000000002592, 7.}}], 
+        PolygonBox[{{9.4, 7.}, {10.6, 7.4}, {10.6, 6.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{13.5, 14.}], PointBox[{9., 3.5}], 
+         PointBox[{6.5, 14.}], PointBox[{13.5, 7.}], PointBox[{6.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt2Hk8len7B/CHJMKxZKc6WUJRtiyDzokaQpJStilS1uJEk7XOaRKnUo5t
+0jZOZiyDZEmEpPqmlJ1CK429ZZAQ0u9z/75f/3i9X9f93Pd1X/fyPKzaH+py
+UJCiKEkBiiK/OeM/8LOGSf3/jy6T8+AKZX+P+ELOTx1rmZSGtplXBKyYdb64
+ZC2Tw1t6M2wNzOsrXHINrjy9IPRKh0nxz8k5/o72XZKdeefgmcch/5D4xuvi
+XzbCra0m3DLEPdN73Ka1mZRZpcC2F4hznLxlKmC7rxdyhXSZ1HNpY4oDa682
+OGWJfDSch9J2wsMfC9xjEHc8WffQEHZO2rujFvEyaZ+vy+G62y77BPWY1C/5
+A4JycKtZRvBmPSZHPOOOqQJcGWRx7CTiGYuWeKjDAd6q1bdh6fy9d0xhkenZ
+9j54OHfI2gVmzum2UuuYVPW05mUWzE/NdZWB75Ws38Ajfm+XKweXbKFiimDv
+kMzSpfCTB+z3T2CKXS85gf6MJp5JvYFZa7fNNiKfoPfuX4dh+tNY62uID6nx
+34+S/BOLTA/Cd9apZ/XBxf+WJmqh/dSxyd8aSb6/pZkOYb7OV6d8Ckhc0tQp
+F/U4e/NUwQlSz/tRfUFwrbXPbluSX2VatzG8Q2FjtzAZf8S/eQmef5FgLXtP
+C+3fuk8MYD1Uqk9tDoO5vJ8+t2I9vJf6v1ODi3n72xtgp1qj6I7VTGrMYF6k
+De0jNYzy4+HWetqOQcQv+7QObIQrDRLui6B/80M6/guaqMMJpU4TuGPnEenH
+8JhPVEQIXKO93+MyzCqV1L6B/OpUGs2iYP0ji2ljiDPoMkoHYDM9q5XGmP/q
+7cu7PUj74r9sjqE+Rz4IPvKCZz7qRpfByZ12fwfAvKii+WG4afXBrlg477WE
+jyzW4y7r2caLsPaLZbeN1jE5lvUX48rJeCbXL29B/NJM8crncKSFjtNW2EtB
+JuILrFh3485G+OHdNopG5jvWxloN074c9VYj862ZyheAXR+on1oH15mUGbdj
+/L8/hVTqw3yP3R6X4fSxE/VaJN4S1ugFn9SsnpGBvWNq2KqYX9l/zLUnyPj5
+FWdeox43TqXefQRzb7yby4RjE4QKL8DMtd9rA+FznrJ+TrCUw34WzgcVKO7Y
+KAx3byq0Vkb9IqueyFdpYP4P2f/gPHGULtyuCoKHfaP9v2O9EhXGHVXg3io7
+KxL3DNX2bVbHfrwXo60EH7WYPxoPZyh7brZA/z8YJ2q3wFJVKTQyvr3jcU0a
+af/OIooPN37uUutTw34XDlr0Dh4SGCy+BzOl5LtWYX7eSs8Y+bDZYsEP2N8c
+96VWxXxYcRellUfW6+z8rixYROwTdwDxqsZPszfgSJtMOxXUV6M/dPo+zPLT
+/PYzvGOTreVrOMPjXrYf1tN4uR5rFh5LtxyJRFwq7O1SZeRXLJu7EAu/4niG
+m8Fc06NPw9Be/P3nFTthVlvTKw9438iZm/6wm2j/QRM4TUpc6ijMf3bRYAn8
+dVT9/DG4blCb24J8l6XxRw7D3l6DCinId7ydedidxBdpde5AnNvg9ImMV0eJ
+tkvDj8f5zeJwr9Y19eeor97sEPUC+ea5m5T9AQernPySTrw1lX4EtqK5xDnB
+dLlT151Qz3KdmBEBuJsbM2SGeMaK0d9LV6F+/V5iBvCAhegqX3hsmSvHFN7R
+M7JcHi42ZtMc8bxBp4dwMx3nMZv9/DB86IuX4nk4IOL77itw5a3dlq4kPhLD
+bcfz3AXbz1pwXkLtBynMj29J0xWGFTekFe7EfFr9lTp6V6I+gtkPLsJ2EYny
+TTCnvEjuJWzb59zSAnd/O5GlgPrPvRi7Ngj3ho7/sQ31PNx4UmkJ+rPLsrkS
+Req/ba/FKnisRz/zEtqP7B7xYsAzptGbChH3i6qe2gtz6Q8qi+HUynehx4kr
+xvtzYKPlLy0ziDdVOifheTUPiYVCWCpeZm0wHNgke/UOXByqZW4Jv+DUedfA
+3UVq94Xw/M9dXLFbsHanaOhjzHfuwuneTNKfbatxAixC21DChlnuWlq2mN/F
+qvy3O2G32iK3pXBKg6jrctjZ2qq8A/VcrywkUL2S1HfmbTZ8svXPSF3Y+cpr
+2il4dJd+VOoK5DOsO3sIPp76fWhyOe6vUdHaA7BE+sRHV7hyeFU7uc8bWSO3
+qlVxnq4pL2LDvFsdRmthnsD0UXL+9rsljOSpYLxTXjeaYKv4mQIzmP7MMlsI
++f261zfqjTLW7blUnzUsnHlm1yV4LPfUhdOw5Jabuofh3hGdnAbYNOZouxvM
+CiiTFEe9fFdLz3rAzPGBenI/1ni8sD8C69/K/cGGp85bxGTAlVlBtlgvKiFJ
+K7IRnskPzGqE6y5lposgn+4cjz/fkf3Q8Xu9LTwmHx3bD49/tOmJgznamqKv
+4L9qdcurSHu/pJaHsPzlRRn9cF0BezYTjphlOy3AihL7HI7ALsaJfkKoB92I
+ufgnuHuW5TaJePGxnrZ5zOfnVzLZjTAv7Nb1Gth8smsokTw/SzsTC2ts2fdq
+A2k/L3WFAYc6tzo3IH/FXtojEVitQ0fZHg7Yn1TwEvVl/Js8XK2E9ZepOFsB
+N9Wa09Vhs8EUletwifk/f8Yp4r61P8nOgOcexF4eUMD6v7tpiPNOVdQlGjjA
+rMDtwqWw2+S2fVXyuM/2PFQj+8dXySfXFO7NKZWmyPguPf31cmjfcLLFBL6e
+p60aDIucP/DPUTK/8GV7VsN2+sOxFXCCpnviN1nUg5OWPgdXtBin9cNugjJy
+5H1Gb7BaMwib6WpOxcASisnzc3B3w3+CSmGFsPOP1Uj/7Kvf38IxD57H7oa5
+OsE3f8CMksfhKXBr2FvasvVMKp6hfr0N9i5v3qoIxw3Zd9CQv36khKkk7Guy
+bWwzmU/wDrcZPC95ucMwFOZNa3d2wqrbV/qegd2SLQJwnqmDDodEeaT91+O7
+QuG2y94XOfCTuB1MQ9hc+lK8O8wtblEm31fDEwNByjBdq2a6hLx/+72mHyIf
++qG6UVIfi0uCU3vggDV5763I/u4OMezBfAPSXOMl4UMbAt0cYG6ZlNxH1D+8
+R/xJ6TKsP7vQAfc15eLA9pGFzToebG+EN1gV2P8qg/OQ8eN6Gzy1pbLkpTTu
+Q6GVigOw1p2VSVvhmcbBt4vRf6m/TVC9FOI5gnGG5Lxpb1N3hd20nZYEwk/H
+a86MS2L97O5O5MDMF+H3/GD99EcRI7BIpX6/GMw8N8zTw/yrDPgVvTTyfm7W
+ZMGJTuX33sORwwz9Ivj2pIOfBGkf4tBLzleI/MJ6D5i+89VdaazHZo0rovfh
+7tsm9YZk/bJ37FJFPiwD4bifYYl/1Y57wmO19+iOcPPzl00ZcN6lv0Ns1pP3
+tcraFtiMMz+qC+e1JTV+g7tHxSpF4babYsdkMX/nT3eSyHmO1tPIV4HHYrqL
+/oKHV7/vEIdZzJAqf/j67LWDg6Q/vRV8LfL+nk35kAvz1NeGD2H+Pz46SLuQ
+8VPv2ObDo/e3GTUhfzc5YVo4vOB0LbUV889LsQvdTOrdYMcrl0D9S4du0GG/
+N7Z9ceLoryDyrCgs03Bxk50Y9pdD8zpyvkojxmZFlyJeJE0n61Vs3RTUKYLn
+O8+aKcLRmdz4kiV4P/zm+7cZuT+/7jqQL4z52mwXIt/rnRVZzfWLsf+1sx2v
+wGGPhIfE4Tz+Cske+OPAt9ccIeynayvZ5Hvmtu/rag2Y36aTsQ+eHEh2mVmE
+5+0/bMqC83S7NnyDi/3Mf+2FFZuN3qihPWf/Rm8F1DfHULcnBOYxdLib4c/l
+a+jPYfqdpsGDsIgjN8QR40udaBeMhnmm5uVPYea8owAH3u89mbwF+UeenrkZ
+AWfttHhWCpt1X0jwIf09in4qgvnaia3O2QhnRKbQGMRyXfelSH8ph5OdiB0d
+ZV8iPx77s4oh3PpxLfMaue8rbOIG0R9H9qrBL/DSoeqOINjNwG1OFeZTu1zq
+kE/r9EzJO7K/N4dHjCJ/brKmLfkeVE04U/eZ1OPtQb8oOCchNrRTEPuH8ZOr
+KzyVNmH0lwD2z96pLnKeo63jH/pTqFfEn6r4e4G6+iLimcsCA3kMFpL1OlCz
+dWJwjkGxLNL8Hch4i15/zvzGoIZTLH4Lhl8L2c8nTTOoSosrKeR7JrY38WH9
+VwbltuRsZhNx0x6+8ySD4uglmokh/wOlRyRMvjCoJxKzKdvI++pKKCNmAu2V
+vQqSYfGGhImVMFf3cCC538YS2w4TR47KPpJB/Sxn6qtZMC+YP7oVVv3FR24J
++uMGcr3IejR2NEW3w1JXDaQvwcNnLobVYXzvbzbnbsCT3z0Ha5BfnsWxD2Ww
+7KO7MmVT6N/822wB/FHJj30B8/G+Ibzu9/Xku+r0F4sZ5Pv+6B/h8K0Almc+
+3EvxFrbAvXuupj2DWWPP48h9HcuIl0+H3Zrj29qRP0VLY1EwlbKlJQXu36pw
+UQz9KyYzeC4wV6NjrhL5tCrH6JC/h+ej37Akka9d4qILb1C/J+2GXUqYb8Bk
+fnCRHnkPJpo3/cug+HHCYmfhvDfmdNoHBqV/WsM4DKYPz6gtH8T6LLNWCoAD
+RMt3q/dhfWzYdodgfuyB8LRujJdqmX0C7i30oQ01I1/5I4F/kPvTc8TqVg3q
+azuy7qne//6vUXD3v7/XMf8PEmtJ5Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.72102250104224, 16.744111812358444}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0VGsbB/BdiEqMSyWUcWiSlJFyysLsdOF0cummxHRGiXKiCUW6nCHK
+JUxM6HSb4qN0MUVyK1Mpo+sYFUlCKhShEIXv/37rm7Wsd/28ez/v8zx773dv
+4y271mwbS1HULfyRkfoxip8xTf3vp05T9vMNBkth3q3Gcb4TacpPw7N0Nywo
+se0emEBTlq/iJSawVONr4l04eKw//wUT8wlZsytg/7t254/A9D1jLoXzT+f1
+19rBlMnEiaFwwZ3Gnl4jmhK/CgjXx3rxj5k2B2HBk8cxX2CBwuqtAUyp2Kg0
+T6KplU/DV1fPwPEhw2adGjRVuMeo4ywsSNM9PJZBU6LVbfXRMMOUpZ0Er2Pd
+t4oi811KE3S0aMpC3a5FBDfJkqIS4Bu6to3FMPXxH/NeWDTUbNsJy2WpRx21
+aSp0uPEvc6zvrpFisQ+mJtQ67ISZQdktqbBIM1B4leTnoVdxHLZ926PTDgu7
+ZziFwP5vfD6po17+qOsiW/hsADtrOszM+ZDVjvU8eBZNprD0Xd/NGLhMv2qu
+MSw/uuAQybf5rk+mFiw5Ii3LQD02tgeffEZ8emdVugE87lQZ9zTp1983spZp
+0lRQxJljNqSfsZFj/NAfv6SAwTLUwwsMOpSN/j28/nW+Ncwcv6xBE3bMS0g4
+Mx3zU3d1XUK/ixxVP1Aw1RNjFwE/asjes8UQ/WLGlh+GWfUOcZUGWF/91+2H
+8B0/xyULYab+aRmNeJKH1R4SfZJPae0XWDmnoNkO5vWMHL2PfLrieliN05Af
+nRhSiny7jTbsToOp9vJqX9Rzr6emzw+WP58+oQemq9or3GBmwmKTA+iH4ubn
+KmL3gOGOUVitXqPOF+7emnt0L/orts+rSICF6cF36uFn5fGJUrLekGi+mQ5N
+BRiYxo2Q9Uapf73gjHqVczTJz1P1QzDst8shJhKmnRdvCITH6bBxTTC/c6Xw
+TzjWIt/4M5lnxEdrwvM8U6InoP4moeu2MqzH0E6NnAKLLXdFeMD0iQQvddKv
+6tNdLch3BR3M68D5wn/VjvvD3pa1w3kw+5Bzcgfqjd0tr+SS9VIrzYNhlrdy
+cB/y5Q8uD1SGn/Walu6DeTZfy13Qv4+qNX926cF/bT1ehv4GDYfFb4DpklNN
+3nDRSXO/kqm4HqK+dmtYu8/IwBAWNy1dvwyuU4R9i5yC859KJyeR89V4qj2T
+4eiLARqIP78kZTSQOGcPJSXX6/6Ut7900b8faRku5H5U6pCJYammF/sxzFj7
+ttMLlo/ZsWgt6ruQHrTZEpZUX858By8Y06BqAItPMdkB6I/wwcT86TDThXvj
+C3xhs53OQpidqsLzQX+HRh41c2HeicuT78OHfpOqiGD6QLVoEsZG3rIHCozu
+74xu2WNM418c0UW+0nB/0Wp4yNfdbz3MeJ550hkWxaQ/TILFHu3JJvD2zFyH
+Mpgd+jmlFfH7uVsPvobdRccGkuB7XZv7WmBa+bLJLLhgd4PqKxLfSdPzBvKd
+Ec01vQ4Le3/usYEFKxPehJD4HO9rxaj3ztz9rTPIfO0n2hFufa6tW0Dqm3t/
+ziv0a83U3hU2pD8c89YIOKDli8MlrEOpJ+suhLu5BXu0YPFiJ181OPet4iPZ
+V8ShLWlduB6FS4/UvERcedrMPrL/pQW4HbaDmeHeVnPI82S8UPkqRsl9q7Ag
+jGrKtzvJ/yVeOweqMB4IHlgTgTiSrO13FuO8Y98LjlbiPpALn7wvgutOZCQt
+hXnDFQ+WYN2NNVynbjzX/CHK5Rn83YNa8RSmLGxsNiLPVRGNtbWwQF7IfQ3X
+xa81nUjiLYwbvwp1Wqxz8OfB1JmoeZfhrNo8x+cws83kai980feTiSvykQ96
+HjZC39R0XhcqyH0nq+q2hLWP+VnNZpDr1ZtgAm+6ZrjNB6YOspx+kr6atJkk
+wnIWc1sxXFjAt7oIS8+XcH3gvfky/TyYV69XMID87ixQ552Dm5LnSyNh54OJ
+KWGwu/fGIBV4hslvfr+TeMlFA7Go98DjQzvKkQ9j3dJ0bZgnCG5rRf7imHCH
+i+gX46G9/QfUL+/NdXGDMxrOG8qwT7ozDdaqw5JA5XNpeO/xbQdrWhD3Sk+O
+YhPekzzeR+OXsGCJs6PReByX2u/QSvaDuJd7ulTJeTHVmjj/yT9uIYpxqDeF
+b+YBi3fcXf5CBffX7Wi3AtguerLwpzLWy2RZs5Cfd+NHtissfBxbnQ3rjeT+
+fK6EfmsZhrHJ/qcTHx8Fy1/zlG7DMqnWnG2wwLx+/gr0S1d66WMo8df/dDwg
+z4vbluwrSuR6m0fZoP/hVgF8FcQXG2xWTYVFdcvK9sKSmLCIWjj6QOXrflgQ
+YTFCYZ+RaI7124982dFLhybBi9qOywZh+T/V80ZwvN7MsHx/1CefbH9LAesO
++p8rhQX8978S4QZ+pUMnLJ07etIaXtbysrkPZvLY82TIL3xoS6UcZlRdZ5Hn
+v+iKtcd+WGjdcOAF6qPz/Oz6sJ6gfVIQuV8NDb1CaBVSjzf7PdmPXNtm+SBf
+5pFTORFwWY1SLBf1CjudZpiS53uzdbj9WNyPGjkqreh39+8uCyaMQT3KZtLb
+sN4NNempUQ6+b2LD82GzGKVprGEOxdiWq/oQjmVn7pYNcSihD7fjO7zdem12
+2g8OxfROcHJA/Lo+tagL/RyqOz1u3DmYP2fvp6HvHKrJZ993beSrpr9p+uVv
+HMrdcaBfBC9S/L2ipBfzrII/jMg+OtNp4hxYeolRQZ6vImpHxM8e5KMdbLIA
+/SrSKDGaiXmm/LnHDXgj9+iaM7D79fZKJq4HW3tR4XrEF4bmn42A+aGXP9lh
+fcY+2c9SuC1ay43Tx6HoGNasFjjc11PdGfkyjX5JPsMCVe1vSwY4FLt+JKoO
+FgY1xemhPjouvPnSFLLvRo8phsUnR7y2wLGzHk3VGeRQfEXCNRV4o2fJm2kw
+U3W3KIO8d8plf1TgeOFUu2Qm2cfvZRdNIm5fnpWJ+mQvTmj1k359VtM1I/uo
+dXJ1JPITtF7RKEB/wi0sa4pRD++axw4XmBH45X0u+iE+fHfDIHk/ay1Z+6gL
+/aoPmUve3xIXt/L+dtQ788jsk2R+XWK70gf01zLYLYXcHyeUZhs2cSh5bIXr
+Rbhp1fSzileIJ3gZQb436JsDxSufYP17nQoW2cddE8bVF8OaofrxOv//rs64
+TTHIqEv/F6niFE4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.245181569676696, 3.3258894180601777}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.}, {6.5000000000081855`, 14.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.850455074238777, 16.59527726407387}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd13tcTOkfB/BTLKVkYnRRmO6ppHtZxUGSEbohCpOKLmTIioSJSr+URmrl
+2mippDQyirR2IqlUO9Kk0mqQSiqD1q3S7/Ps/DOv9+t7zvN8v5/zTK+O3tZd
+3iGKFD4KFPXf938ffZpikW9VmuLxVlbPgMUDb3jak2mq2aznLA0Lflzz0VOj
+KQ8t4UMuTAm649Sm0JREyXRWAcwLPmndBsfOuaX3HuaXhcS6MGjKrmFgyNqA
+pujNzqeiYVFsBC8W5iXbcs/CYnfVhBpY6HhNlANXXf9+a5ohTXHK/6AyYMOr
+7Mf+xEVTvkTCjNbl5y7B3GVeRg6waroH3Q4LxNVvyP6sk57ak41oSibz6rCE
+W4MWvbGHWe3dW/aif0FV8GMfUj82c5EI8+mmbQ7aBnNW3Uv8hvlF8fYNO2Eq
+LYK5EjY13p0eDosruHNvq9BUYalVySZSX12iswhujkxKdyf1f92kHybRlJNn
+xkcL4gKzknpYUtHZpArTOU62baSu0hvWh35lc2s7NHA/3zJbsQbmDcYZJ8C9
++OTBVNf4OD3s3zGk6ZlC5ruzeHcP6a+YuyCa3K/lJpagf8H4wtBwWOyf9qcU
+84l0OS7bYTp4xqkBzJ8fN/1OJMxa9cbjOPJiOueHxMHyM2rhmuo0FZC1zT8b
+5iud08+Bqy5YOJB+WO3nS/Sn0lTK24RZw2T/uZkPMmCnzmtPHTCPcHpD5hCc
+tf3TjQOwoN3RZtE0nI/PzrWVMH86zdsDu++OHVY1hvtmBqbCASqCMT+Yc6qh
+PI3UFdoT/4BZbkYHYuAqx6XefTBFjR1bA+f7NLPNTXC9ZmeBOrw/UnQmGJb7
+fUyswv6uAR9uZsA0+6LvDmJ25d5ymLLwqJ4MS5Tr5khhcc/SpiLMFzsjl98F
+M2JuHPKCTXMuvOqFBVHj8kaRT7x82ZPXsJA/pakUVnq4NOIZzP1R9ZUH0yN+
+SyrI9c4t/lvg/vothtlkv2myMF+40K3W8DDMOpx5PhCWO+/j+ZP9ohXCSP6y
+i9KE+aTfyYlLH8Hu/W6xM2BPuvG8NvpR3fH4BEXqDlGf4uDCUwNXB5CHMOCP
+Tz9gxj7T3W9IPl7FmTzMxxllOf5nnsJqNeQjn/i9hVzPWljqmA1L6obvjSN5
+fW3wsGQiB8qgzRCWxdWfK4X3jrt8zZPMY/G/aNvpeN724Q6JZJ47wyUCOL7g
+KKuK1Jd8evgDthq5XKxkivVPNA0s1EBfzfwuL1jMeLYpArZ7cfDkRVK/G7Xw
+CGw63W/rO5grDRHHwIL7m6fZzsH6HvFaW+D+cecj9sOev3/cYwm7hxwLKoOF
+7Lcv3mM/17Ycx0Filt7s83BsZvhBHTP04RKWTcN+TUGmC2HWc6HJK8xTkzP7
+2lpYsPNDWRzMiOR2BsI8xco1JqQuKzAKgjk2KndbkI/M4BV7I6nnyHwzYPF1
+OtmdWL+qPwjurRg8NI9YdWGyOzl/f32YrA579uxZ50rOs+Bv/w9zyO+FecwP
+rtHuul5P+r171SUB9l2vs+o6TB8+VVQLNw/58VJhvq/9qAH6aTYP5fxG6mpR
+O0/B+98dexJM8nGlotQwn7gseM0mWFLk1PE7LMq8psWBedtko0bIK0NnVffO
+OeTvw7euUpjWLVI4TurPTp9w1cT51Y9ZQPYXFkap1cFdpcUDbSTvXMdXS7TI
+75CnOJXk0fT+ZwFcUdk/5kXyNfjMHIOT1BM1s8i8SkdznbVpSmtK+fzXpL7G
+0mQrrJv+zNzSHPsF7FfZBYfG12QfgOX/XmgMgpVOSj0ewMLA3QOLiatkEydY
+IPc6XosK7Dp0qX0JLChlSqqwX2hCvFY0qU9fKOUSJ+VwL8Pic74RTLg1+eaw
+GObvKtktwjxUumiZFOZ1FQ+sheMLG7xfwqyUSdJR5GHVwMjugBlfP7cKYfmP
+ddpPyf1TR22j4ELWCu0/YeHBoVh3cv5KVb1yYMr4LM8W1v1pdu8o7Pn4roED
+rCSOSuAQp4yt9iL3n6n47gJLjix4Gw8zH+wNmUnWG71Y9TfM6lJXUCDrOT1p
+mof+PEb9W/uQBzXBY1oO7JScKeogro54rI/5vs0OU24leabO+72IzOsR+vYf
+WHKgotwFefUfr+wehGn7hY6NcJVCrp0KyeuS5aSNM3BembmHbIg/PQrqgPnK
+GsNBMP3Vr81TB+dHef2BS6Tfc7yMW7Bhw/VgGWzlMy1WQRfno3NKu8lc5BT6
+61onuPnIpnt7YEn24hfr4OCbfY/uw7RIvyEAdn9xvUDZEs/vnwVyNixXbDf2
+ghleTCUDeGjLdN3TsKQy8WEP2T9TMa8BFlrpCC7AdvRu2zFSd3lQtQwe6rFL
+NZ6Hvp150h70L34y0r8EpgpfVR6HTUWXKV+Y48rmm8FdB04NboC5871Mpcij
+9Yut71pSZ2+flQI3X9u4aDksWfbvUR84Q0/BwBoWx46UWsL1Ri2PmbDg7kR3
+Fiw+aDN/iPQ3f6B5Dlxh5V78lMyjHj+yEh4a2RNdTOZd+cv6RFjokfsijVzv
+uyXmOcwcP6b8G0wlr1J2QX+8okOjHFLXOF1/C2YcfxW6Fvac5SF1xLxZ7MQr
+PmQ9757cKlh+aIIggHi10va1uuQ5Lmjlknz6fdTfwoxDyt58mNc9Whg5E7+f
+h0bnymGWYUfcAJyV9q52kNyvXsveNIumLnAG+eaYT/7y16By2OqgxtJdsExg
+Oqgwm6YsEkP7ykjeJReHrOHg7rEiBSvkkCqKWQF/KsjKMyF+qpXsDmf9+rXc
+A+brC6ytYIaxsG4XLDP+eUCR+HZ7YxrsGabq+QD7ScrUZddhwaKTIVGwxmet
+xQ9hTup95RlwwArxNimpyzyGy9F/7Gnh6CtYGHXb3h8uCeka6IWtNNUrxjD/
+1JY8/z6Y0ZsRVASfFDFzu8l6L0eyQ2HvnTpBL2HqykRfe3L+updsaCL983/m
+acBK47ZGk/3lk8b3qsFW3wvqSsj1qWkRs2G3oj1Rl0k/V3WPu8MZl83P8sk8
+SVeT/kf2u8XcHAdzb6v9JYNzJsx+tpf0d8EuZSX6bV6W0h9B1nvUzquGX1fe
+j95O8hJ5x63CvKaL86eGkvXKfD6+IHlo2BpFkutH5r3dgfwm/XjfcYCsr7Jx
+3TB8X1fH/ARMMxMsFrNoqqmZ84j0lxUTlH8Y/j3mb9M/4Rp7CUMEO68LzO6A
+tW5MvNEJN67gLx+DQ5ECpYd+GfdnGlqj30U8MRMWxitNZMPy3k/jZsJKZhr/
+7IJ5s9YaacPc3oCYDJhR5CdRhjvqt1SXwqa/TDaXY32WdmCl1Jqci/O1DXDy
+E5U0OfztaPjFKzCnM+fIBBvkuT5Qtg9mb/DV1IRrulmjbvCX6Vun6cP5ZU6/
+acLfIt/tMIElE+pTpJj/h5nFBmLx/W/ZibB39frl5HqZqkmUG7z62esXWjD3
+OeOOFkx133ynAtN/pfpT8APDVWEj6Ef23X/bGPLeZxMf+d6aPM+IHg3Um18P
+6raT+eae7iXr3fB4dL6WOMYk8iRc95KvfI/ktX5/3Hu4q3o+txhuPf06Zy76
+NbOW382D87WDVXbCXXXb867AQmnt85uwU3fD41yY9YFR+B3mWkv23CDre7Wp
+LEGehwc+V5H1qTWDe5Pg8ufBlxphjppaTB288bz7lW7yPKRPO37Be9U+YZLr
+OBvy/3vOVSe426HvngGs1XnXKRAeLLaZtRzuvbJ6+2G45YQiZwfJO90hNg32
+dBgJTCfP48repRnwy53ikTIb8v4WrJoK1zctmtxB8ksNz42Bj2q85I3CpntX
++22G7WzecnRs8X9KSVbTfLhkd2OHHaxUkTRzCmx88bP3CphrufWYDP2Lzq5c
+7we3FnyPFsJq9/vKAmFBUOLhONhySONICMz4+LfaOlh8pu1TEFzzZ0uMFdx4
+b1r6JjjfjNEyFWZPspviA3OyF3b+RJ7G+dXuy2Dq+dOBf+G6cEvaHuaPZb75
+Brsu7lMzhK1Wsg2UcH+AdVv7VFjseizFAOZP+FGrSPqvHn+IDadvnvNlCPPu
+N0p4fhAO7+AE9sGtCaemlMIvvw/1vYFZccxfv8IWW1zdXpO8Rhr1XDA/d5Xz
+57ckX0nv5gQ4S09x/gdyv/witwFmqw/r/yTPj/Hl+VS89yZ/9eL918/1MBsf
+uD2Q6jaHPT+s90mB3ecuu0Xy9Mtz8a+A1ZQ2aEXAWnNuP3kFU1bas9PgpJSw
+M8OwU83K2yL4Trn3XGW8txVOZNxph7OcHhyeBI8n7/l2mJd8G9L/B4/XuA8=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {12.278814934002025, 3.4867457599351623}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs01HkbB/C/sim5jGsubU1lxbozpdz6N2pjM1FrhcQkNiRRwm5tvDaF
+OA05oZRRyb28KclKo3rXhI2QFSuzsrUrl5F2V73i/T7vnDNnzuc8v99z+8+c
+MyuCD+4InccwTD7e9MnMzOH1OctwCEtZJiF8dYvADP4ztkAH/vVkz9MCuMNV
+8E4dZk0vu4zA0YfMjccNWUbY82CrnTk+q+LLqmGpy1z4Ebh6aaGbHxxmoxR0
+Hfb60mLxGwOWKT3TKPyVziuWcyLg1AxTs1lY1LkksF+fZW4FjalrWbCMZEu8
+eBOcF1IyawBX9298XaHHMklpt1J0YS9ba/8lsLApqHUBLFR/PpaxBPHA1sQx
+qrf4kYEmrLKLL20jt0Ser9BlmYYdE0YlsDwxwmI3nBHnuCOR+klIPGAKc1o9
+VvvCspwHVRowV9nlMA9ml4aN6MC8N3f7dGGuhVzKo/vFl+4owB0FdaX74bpT
+a2b+xn7kxasf1sKPrgUaTsNJiq/8NNBPqm7335/QfZUp+RH46rXd3Vy6v6ot
+6wXM8/vW343irTHam2m+qqKco7DEqS3iCvyu8eNsHRwd2j0yBcdmjubR/rg3
+3521wb5i21I/utO+Tnt6+MLdUe+T8mB5yIxmKGxuabL9NSyO6DLygR/9S5Bn
+Z4n+ChQ1zWCTlvLC72D2VMzDYeRfp/VYfhe2/iT1YArc3Xn18AS5wTiRA2uX
+e6fqW+H5dfyyNx39s9lyA3vYWiF4zzTmb4v4T/UWWHZiq0AIRy6zi9oKs8qh
+W6Q6OFc4pu1K5/dJo9bCqd/UfrCieMlv56q1WaY3iXmvBXOD9RgnePT9Fp9J
+1PfKSl4yoIU5ztuWt8CiezVsLux2tf3eZVgWv6EyEq5LORp+DGbyRpwC4Ya1
+iw75w1yDrmP74cqL/d9soPh6rSvZsEpTZrIFzf/8fFkH7LSq7IwxLNTjHVqB
++gEKdZ1mtC92fDqRXHb/gzPcsedk1iv4VpdMbzf1Z/bC3BPzSM+dKEylem2W
+V2pg1p0bfp/6Dds/p4p9jA46/zQHi/vspb6w775Ps2lfSR1/8c/Q9yt8yiMH
+lpy+WVUFS9b/4PASruZaHfg3LHJvb9KzxrzSJ+b5cPpnCeYuMLfu5XgIvO5V
+TboQFqdlq+jCtXc9bxyHq8sEn91AP0auveJcuu9TM2sHuxSlFZfDjKevTxnt
+W9/O4w7db7hdog1zoopi7sEdm+b9eRT7GT4u4JO9Vlvwf9dkmWyJwzo6zyz8
+rskHtpQs16mERTW+Gj0aLFOfzH1eQPdbFO3C4IDUjNp0qh/jslEDDmleOz8e
+5rQtcunmsEzOBkOTvbBwtn/sJhxwxEDkBbP6001V8LDjpXMsHJ2i2PUQvmQ3
+E8ejuI3h6FuYv2GPswVs7fBzsT3ybxPO3jWj/dS2n8mEjbq04q0p/ttX+yZg
+Ps/7piMs6YvZuRP91xbI/QSUvzSLvQ+PjMaohlL/QWHzV2D+5AVfr0yG5Y5T
+rXEw/45N5RXKb9nn+yNce29hqpTs3O44Audct4yYoP3UPVNnsM+4w6bjujao
+3/bL5Q+IvzVpLHGGZbkZnOf0/YsP5AWTn4X8fIHcs9zjB1hkPi3eROclkU8L
+YfFRe1EP+pvef+NFLczJP1j3NewQsu1pMyzXHVrajPme+Mdu74QlqoHh1rBK
+o6tPD+UTPa7Mxb4Uq/nG3RT/OK42H04QfPiqDU4yW6s8qcYy13re1t6HWblA
+87+qeJ6DwXtuUH+hPZUWMGvIOVtA50fEQSIV/P6K5pWn0vn9KXtN4ADrnzSO
+wELT2JDpxeg3ZoHtXqrXKxEyiD+y3LXbm/Kp25c5w2oy3SZ3yqf7j0IFLK8f
+8NlE8zqkDbFUP+p2L1miodf5F5yRv7xuK9VLDu9vRL/J0go9P5hbvVhLpM4y
+Xxx3fRJJ++grzrHEfOtsNgedpPOXvmcyYZNib+Vi6u/L10UDcF1pfjvtjztY
+EGeIfeU4zhwbo/q7zwbz4fJj0gZtW/yekncEe8J/rFUydoI5PYM3WFj4+oEg
+GI72S+jVgYMrQntTKB6i9qAd+Y2dd6UXw3IfN3E0LNM02ymBkzzUav5Bv0ZR
+26OewbJlifVvME9D6/rNw7DwkHt/M+Y195NdHIXF9ccac2lflo/Txun+73OX
+92G/efNNw0fIBbnNrsos4z3g/kpmS89jstt+Efa2KWSsk/JPDm7bthDzfL69
+qAnmFl/QEimhvmGh4DrM5FhNzIeHAm/7nCcn8N2uL8C+hc0mp+j80JoREVyv
+H24cR/kPWE6Uw3kN+blh5IsardNwhLb2+SCqpzQVF4t86d9e1QqgeRoH6nVQ
+f8ERs5JA8unD2Z1w7fddlftovk/PlhSiX9vlzy3iyaEmA9GY54O9/nAG5V95
+4uV6zDs+EOFcSvkDV7aPwwaaBcFSivPLyk9gP0PjP26kfSUlrfo4CXek8S5o
+2qFe5CIXK+xT8oW2hgN5TbqNPWyU3Gq/BxZLy0yU4GWZWSUn4aRFK1YW4v4f
+fRdUy2AJ70CLAtzt5+3UTPE7qrt4qO9vJV0vg2Ueyf4u6Le89+LWKcofYMCa
+Yp5Z+v8F//+1kP0fdp5jRA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77627226468353, 5.608447160322252}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwV1As021ccB/B/1YZW2lCPiFewYmxkD+OUdn/PZtiqum7p2JY6a8vWquK0
+tKs+phPqkDBEvcscfSATuqAsK1bUc2ULilDromuPHMy03ZJ97/+c5J5P/vf+
+7/f3+98Th5jjkYf0KIr6GB8yUobki01T6zpc1jQlCNXFVcG8YXb4BKwYjGH6
+YEzITbXNxyjdGlxxGyPrkZnIE6PIXzPkakNTldWfJjVhHV2lVZyCuUntJg4w
+1yuHVwur5izmL1jRlNyBbyWDBekvXB6wMP+kZrIcFgXOZXjDsfVM+6NwbOhU
+QYklTQktzvrawyOXdx7aCnNW2ow6sa/PnTb7YguaUtfvFe2BR9wY13fCkqLy
+K1Nk367EKAquaw8K/pI4zGNg3hw5Ox5f2ggLDBY7FuC6ip0tDcgl2Rhpr4/5
+Ij2GYyIsON7tRp4nooZkkTB3zqM8C153e1q1D15v1Rk+ghVdTkEnyXrjAnce
+8vGUYm0rLNpwI+YaLBjuCrXBfuomMUuP1LdsOy2Bhe+WeYXBcqv0hVeR3/X0
++5lpMM8xV9ALp7SYOxfBvYX7Mkk/OLcSr4thTqQ8YIst6sgxSToKs543fvc9
+rLKzk7nAdazPHdztcD91z4ke7K+QfpQngeV+03HvwbEzOWtq+PwX1r/LkZ+a
+bNhsZY/3+9OyExtmlcTEu8DytebsZPSHuqRpMIMr/xyRDZvh94vTvIdYz5JU
+cN+CfTqt04rgXqMJu9ptqKPmkaU3rKrzavGAeXl/M/uQL3Zy/+KoKfpWoX19
+P8ysDXTOh3vXhFkPUZ8waMgqGea9aON8Td531s0SYgHN3udMzteR8cY8WNFq
+fk5Nzuny4+p+8ry+xvK7xAz9EEvslxLYof0FVvKvvZFILPiPQeaLpGKPMVjQ
+MLPbjZxHcXWJF/Lz/dz9LpP+tm5S5cBqoZvsZdLPkt+mlLAwzvFJIRxxvnQv
+A/2QlBcvv436Imq0AS7k/IiOvTQBaxLadzjBvF3dRmfQL9r02Tkd1ndfLr5g
+xMHz37nveRsuvW/aEw4rfmjwjYKD2GM26bDS9qtwFfJF37MxqIdVBbbZEbCN
+2FTZQ2x1+kAT6q1Lz/p1EHbNiV40hvUrtG+S+wrJX1NHTGhqQG78GlmfEJJx
+r5+J97VdNpZB5g8xH/jBldJIIz7Mbdx+VbgVuU0C/B3I/JvjBwe2ID9z9NYQ
+8mt0NathcEpQc180zLH0nNsECyfErauoV/qKTs8I5o5nLZeR9x0vyw6A1coU
+1Wcw9fQTWgqL4u/k+pH+dPVN7sZ+VHxmzA6Y+2HjjX9haXDGzAE4xWnUVYB8
+/MNnC6/AfN+quz/DkuEM7nNY6ZFTaI36DL1XhcnII+orO3YYVpsM/rMB+enU
+Br1SWLG0rTMCZo22hfwI89f9266SeiWz0mY4+YMbsytwyon+xDw4gcPwoB2Q
+Q//b/AhYP2r2yTfES2ZLGuy/4HN+vh2OyFexT8GaXQbpf8BMrevBEeQ3XnnG
+1sGC5DX9AtKf8qYZA0esF6WdCWXgeeT/1ZH0E9dm+n9frvJj
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.582298081084662, 5.349305811371944}, \
+{1, 1}], LineBox[{{13.500000000001851`, 14.}, {6.500000000002592, 14.}}], 
+        PolygonBox[{{9.4, 14.}, {10.6, 14.4}, {10.6, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.0548}, {0, 1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 11.1}, {13.1, 9.9}, {13.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        LineBox[{{6.5, 14.000000000002307`}, {6.5, 6.999999999998607}}], 
+        PolygonBox[{{6.5, 9.9}, {6.1, 11.1}, {6.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.5}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.}, {6.500000000002592, 7.}}], 
+        PolygonBox[{{10.6, 7.}, {9.4, 7.4}, {9.4, 6.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{13.5, 14.}], PointBox[{9., 3.5}], 
+         PointBox[{6.5, 14.}], PointBox[{13.5, 7.}], PointBox[{6.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs4lPkeB/A3lzXrklnjHpkWkbLrsj1YaibCsLQO1jpymUpRZMdmt3s7
+ndQq1IRU58ROVmKXTJH7MuiCWmdKhNyryW0YGqdC2e//nDPP4/k9H+/7/n+X
+//vOO6u2fxe4U4miqLP4I5GSLuGzgk3990NnU+JrGQPfw0zx7dgAbTZl2GMs
+7TLG8Yg1Xj3L2dTmpB82ORDv2yO7Cpf3SrNTjdjU0FU36xtwpOnxojFDNsVX
++WLpPezbPfU2EBb2uVanYz2LucXoPw2QR82bthb5NK1ovRGwIEfXvwDes1Kh
+ToPlG5VsHT5hU7Hm593a9ZGvZnjDfVhHLdzyJsyde5wRoYP11Lc/L4XZOu/X
+yeAwaRetBRbt8dybwGBTuiaF9XOwnU8Zvxf2MmUuOJL1vQ83rtVlU+0m51qP
+wLz+LWqRME35Q24rHFBwaCQBLt/hVMlA/TxOan0EHJy+mBQMi/6VNk6ur6HT
+xSdJv717T/Vh/Smdga15sOSzzJAkuCrstX0BLJ7Q4L9Dfe6DzLSzcECbnf0+
+uGmM7hoGcx2SXcfQX5WL9fWPYTmPn78DlmY2tuWSeTGOO45jPlfmGPqmMGW9
+UjkZngr528bT6I95yMzECU4bLJsf1cP5TdfMaHCgi32ZO8wdzFVXYP7B2aGW
+Oag7IFFpRgvHR2/GqyyhTsF42acecF2s9j/J3Ni5ussuwpxLD+NnUKeYfmaj
+Kupx4BybSYX5szv1U2CV9WNfbYLp0YpcQ9LPBYNPGYgSh0drSxHDj04mL0MU
+SjRrPbDunVuu0+qwnS89ph2OXJW4dR1ZP2Kyyxt1ZSzPSNgGB5R3FRTBimWO
+FfkkX4Na8xQc5iGfm4YFv8lKGehraPUKvhvW4XreqtWHf2sszToB81YH67/F
++W5v/BvrST+nF9ur4fmSEbdRcryssiIKTnOacFmA7Xo+t5lGPGPbZKNAHCra
+e5fMoaLbRiFBDLDqVZUiL1f6lcZ5cr20ejAc1nm59+h6mP6lpv8zzMO9UmtY
+TPqxMOiLhTfv17N3gtlymYcmLHT3zMpB5GVOqDzAfMNbphnziEx3nnER4mS0
+iVcQIpfm1lSISB0sGozCvoma08Lb4Kr06z62eK7EgXd3kfWqlr/oMNZC/arj
+gjh4HUetwUETx0PFkyOwbuZT+REN3E/Grx3jUUeaQHrigzr2JyV4FYW6+zyV
+fqqGueac7mx4lMWrKoZFj7KCrTGf0I4UaQdMFcX2FcP0vKY+K6xHDTknmGLe
+B0rvzeQSl+6wSIKvNAyk2CI/1aZxuhimQowr78GS7JOdzWS/Aj/Mh6NeYa3E
+qBrWnExbHIHl2jKfdNjkiw++fuhPmOBv5wGP8vK0zsKC59Zeg8g/et009xdi
+tYF9MXDhrXjlwzCXL68bIfdXyoCXKTwk8u0LhVMavXNPkXwX/bseof9LoXq7
+a1AP3azt1Dfwi6poqgH104td7Ccwr7rOe+E56FewIt7oMlwou5HN/Rjzjdxt
+Ew3nv7jK0aNhv1QPi74m+2k08azlI9SftckmAqblt7emqOL/+xMd02DRfOez
+bSrw57vO9MLhq4d/iFLGXMLc7DYjv+jCCsUZJeSPK7raTJ4j0VPLiWWY12yM
+ZSDqF12vnDwB2zn0rSX3rbN2smoITF/8peYo+vf7e/37SFjQvtCvjnkxzfkh
+l2Gx1ZJRCpx0rezxIvHj6SdTZN7XfCaPIZ/d4urbLvjeoI292s0g9XRZyqJh
+E+0GzRJYzC9MTICtG4b8NqJ+5oMK/RDimDyjGphbpZdhCrf8GZWpi36Zym+2
+t5Dvnfdbyj1gthpbuBUOMFcbZMH0SzaiftR76aDEVwUWeG+WfQOLjld5nyPz
+Ke7Z8BD9dZsLQ0aQX5h+5VcOLN4/zlCCmb83tT7GfA7cfDM3R/pVm7mYCE+W
+aD6/T2FeQmWJDdnfPIaP2hKL4gVY1SnBzMsnj8Uvsii7Ax0zC5h/S/n5pN53
+LIppRrM1IM+z02hd3Bu47plnELl+tnHWeQ4OkLFLYN7ztvBvX7Mobq7kIBP1
+8D/6sf7pDIuiJxu+LICZC2d335WzKHlE0C4Xcn/2c3IsYUG1/XoJLOng7Z+a
+ZlGUhrPfDszD8B9PexxwnF7+pHcc5qy0WvMAHnpwojwK8+RbqN8uwfrCrU8q
+asn+nNsy1jyL8//IZ86T91ycX5AC9QR8Vt9pgPcA0/GOhgXqFbQuT2XA3Hc7
+1zv/h0VJtmn1yHB+oc79Qwbob0i6ybGIvAdtL/z4OyxM3XPXB37roz47DHNf
+rHPuRD3CEcWrEpjXlMMNJM8fZ2YDjVx/xGCwhfTz8Oc1cuTjvWy+xYbFvmmu
+cQrUZzJ0vxHzMPxJ/5OTqJffqfFzECyp+O7GFvTHtX0Vt0jmmeBkXDuB40d7
+CxvJ93hK55MsKeaTb91fQMw3+nfUMOpbiBkm8+cadX+Z383C/cgq6SLvAYZH
+5rF2XD/V/60Z2Q/j7+9U17IotoWFYzLj/79jMv74X9Rl/wX5tzcv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.2807968978321704, 3.5703782848251917}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd2Hs8lGkbB/BRrRQyapKknMIUtSMlh1ZTSbKqIaGykVTDKxRZRUxFUWhI
+kZAWJaGpkFfSFJW3JJtjJSadpkWGohzK+7u2f3y+n/twHe7nyXPT8Qpw2jmO
+wWBoyTEY9JPxfQz/ZnEZTAKTyxA6uohXaXIZ9R4Xso/B7PXWp9JhXvQh23Gq
+XIYoUj1BYTaXwdDcet4fDq18rhoNi+XGf38E53Fd706Zw2Vw213DFadyGdJf
+eNcuwpIr3zlL4UDNeykWWljPW6JpD8d03Rn6GxZ1BDnYwOLBPLapNpfBcU9p
+MaDxL3W6B+DAaP9nX7B/lmtyVxnMHMw1KoKDRy0fyGDxE3b+Zti5OsFWS4fL
+8NRYcXkY+adO7vZZBQtddXrPwJqzdFLdYYH6wxMcqlftVpEvzBi5yLqggjgX
+POT8YUknJ7N3CpfR5hTqshsWF2y6thUe3fy/dleYm/taq0uZy1Cf3MJeQeul
+Fetz4LzEdUx9Gk8ybT8JszSX5v9C+YwLPkLjzC91C98jX22LlnefYYWTr988
+gD2L/k73wf4ViueGr8CC/V+sVZFPwWzFuNMwV9n5sAQuc/rmH0X90fpiwUf+
+rOwFCyOoP7yFO7th3iONwcO0/3xbjVA6r0erY4TUn6h6T3n0k+HCNc2H61Xl
+9JPgHF3PZ3W032nxHrVpXIaxm7f4hzadc15iAmz+dmBkCdUfVcQfhFOd77BC
+YNmf/qH2LC4j2SR1bQU51nJmDMw+/HuqvC7ih+9KKoSVZnc/d4KFKlnG5bC3
+t/qtTJjZL7QogmuSFeWlcFZpKPMkXD35RLqxHuKpvB1zgm12XY71hbULpy6Z
+BGt+DtLLgrndBmnXkY+EUaJeS/bYWcCD3cd3R/TAgf07HLpQX222Wtv4uYiX
+rXriGFzdKTZSgTk5j/wNadzQtINcn3Hx0XP0i3+tvFUeFiW79cfB7iJrrwHK
+x+BeET1f6rHHtF7Dgt/aBq3oeVeqGr0LMx30OpbAvDssDcpPFrBdYEf9r5UW
+R8Ii9i/dQeT/zmZup/HOXUa36Hn179lqC0vklOyZyEdzTUamCZxlesA3HK5Y
+1505l3yw9N032O6Q/t/aMM+YuycC9YZKL6wxpPz8Hq5URH/C9Zwum1M8nUbP
+c3DMYL/2JpijsLJEbzp+SmT+4TAjZ5lLLty6waW1EBYeziidqYbz6Aszl8L1
+XT7N4XDwjKWK86lfxvv2PIEF7uMO7aX+SOynjJ+BuMbBERWwp58RVxeWxpq+
+VNDHeFJGAhuOaRA4OMNZHS4JanB6guv5dBqfqdDSg/0WvzQs6oC5Fd79Ilj9
++vycWQboZ8iMFTvgNo0d0vVwvU51swIc6vDnylBYIp+y/hLyZ4QWvT0LC4Sc
+NC4sMIkNyCcXfK9tQ/0FBufGbtD6BYofIuGowwG612nc40faQrjxZGFTLsyt
+vKnfg34KO0PCkuBApW0z7tLzlF7yhOIxh0IXXYa5Jk/vbaH9Kn3WkWNeRBy3
+hBkHu63F9Dz2d/yhAfN89Zv6aL941+hRqleruMUS8cSX/9J/C3uG3GDR+XAC
+283qYQZreugk5M/Wifd7QPOzgo1jYHfmfr1qWPt5ZxUT9Y+umbXxKSy5pL47
+ExZdCj76BuadmDjJGP3l5Vk9YiC+9qq89GJYKdzw9nzY8/hje1N1jI9TPrGN
+6pdezs2G1RvuDKTB4kBWq9xMPM9PbL3baf3HTXX2cO0nRp+BIepe/tklHFbi
+Vwr2weKDIxZnYLu2Za2VsCDX1Jac+rH75iQ27NnvdAiublSV8GDPySuXboDr
+vyzlJcGBc7ilynB67sQltbDwU+H2CuQzmhmn8gOWRH4M8oC1jefe05uH8bjm
+v0ZQj/AHP2U5nMW713MGTq7N2MiDOfVKfFOYrW+3wAUWJ80b/wL9iWvteOYI
+M1S7Np+E07uubrSh+VcPRq4nq89c9CvMDZE16MPvlOTNWHDgRw/JNNjtQAF/
+APmIRpqtNGC+Sv9II9XHCThoAWdpKJiW0PjeuYZ7YYf9Tvap5IibNXfpfXE5
+6yFg0/93v/fR+xGY7L81gOp75++WArvFDrTtYtP78eGHOuqdsOMQm//vfG9n
+Oh8HYxWNYLLLj70m6Jf2ba7mSZjhHWlTCVfsr9IrhOv3hD2y0UDc2FfXXlC/
+FW5ZiOHa5vJnKqhHtLR5gzF+z0vPHjNeD/NiZ3tFk7+mzzhN/XLYeboG1vQ8
+kt5G/U7M7P0Ci/64dYY9H/N35wjk8R0gEaZWBcNC+zA3BiwYdH5XCQu8E4Wd
+tL5m+MkEI+wnnGh9Dc67kBZmAzNnCLb6wLINJ8zC4cAnHldYsPu498n5sEC3
+MboE+YpFR5PqjOj87Sp5VM+DunMfaT+ZpXsX6tXsG4gdoPlliQEnYNFyh7Lv
+RlR3Yesi2Nm8vLsP5vWFsD6hf8sYfps7YdkiodJ1uMaYlfCE4p/O64mHy9rt
+d1+DhdcLfjkCC6aXD5+i/e9YXU2A2fP+EQTQ+mu7fi2GKy6m/caj9dqOL/vg
+HM3s3Yspv1Mt/asRP0r+D9U5FP/2p/pCOh/XxKkqsGdB05A+6jEPb/qqQPv7
+uqzOhxvvs98q0Xrpq0lm6EeOzuGMWVTPs8Xrq2F1bm3gEvLm2J8b0O9Au3LT
+LeSJQbqNcKMs2C4W1u6VqTrgOyw0h5N9j/bfMuHyTbhM6tgkZ4z9+9/5TMR3
+WJ6xSNMO5hoOlNjAo9YbQ5LId7ubfGCbyLc322FtA2W1EDiQJU2avwD5W2U8
+oXGm1avGIPJDd0db2PzdNNcymOc1fUgZrq2MnjcIZ9V39lchPstmZ7bRQpwn
+z9LID5b9bAh2hTlrZukowt4jrcWhsCfDsDSX6nvO7EqA6+0zh7lwbUARKw0W
+mAV8e4N+ZCWk5JB5TxND42H+4PmIRFqv3ftiDdwWN9wTCYsa+lvp+fIzP5ey
+G5ZFlvh9Q79DVxzh28PiD7sv9cE2R7Yfng9rMzecn4D5yedeaU2GmTFWmzlw
+nLnoWBfqkfkPvg+CK47nvq+HRXvy1z6l8dFlKytgTtWLbAvkq102z+sajAfb
+vkSTnts9ZVdpXHLlsxXq1a6WbroB189c9KwG5tkOva6ifjXFf3Ch/s0XRUpg
+8YZy3Tcwp7X1y0TK92JVmhe+k6XTeyMtqD9lrKpmOLn/zY8gOKawv04T3218
+S0dpCfVnTNK/Cv4+dt/3B+z20zTVA9Z0nLvf7lf6flgxIQBum/jg72SYvTbt
+517Y2fTdMgksadnVwIfjBvjWLA7yu2LOc4ZfZjyvWAIzLQ/dXgK7l1df2Qhz
+dT4+nAK7ZW2x2kPzle4N30d+fmGzmg9z6PdvwhZPuLZ077REmLHg5oVh1Of9
+6fODNDjw039fn4WjRheOZMKeKXrTLOHyM7YjGRz6f2DxVyn6ldR1f3UqLNF8
+UXYZ5k/cGpdA60OKew/AU4dPXKV4gkvL3bxm03u9++I+ys8s6gFZMlH5qBfM
+ExRNDqf3I0JtrxPFk9j0F8J/OWacXEXzvbdzv8Ev860+mNH+a5vvbkI+Z88n
+hy+g+T7XNz+ES+VeGbKpnq1zzVajvvtDD88YUn7Tg94/hdvWbllhDJfdTHu0
+AP0pGBTvof3MVYeTgmGlu1F6tnDe4og6utfU7jfhbIXFndNVvsMnDPzZ+6me
+7ttzOPjOtq4I9jsNs1fKszzgfcKyhSWUn0b0rqN07/geHP6C6htQHzsPV8fU
+rBmDhSsSV+Xp0P2sb5++Cc5PNGN23r/7mbTZw+alekM0P/+sxMcf5k/vro6C
+1bx01E7R+M9jb3fABXaPh67CgVq6WlZws804l2rYbrXsjBLsFG+S3gKLP6Zk
+v6R7y/3eoPcw13ZazWWY3SSq7IFjJMrxIXB6/qRzMpit+8p3LbxILXLzZ1i0
+zqBIF3482BX3keJ9CPKYANc158jayE39WyTo72hIiu8zite0o7QO/soqH7tL
+8fht3k3wSw7nf9dg3pSOwa9w9cZU6QVYavzhgBr287cfC0uE3dqDen+DS9WG
+EqPhsjUp2fR+ZDlvm3PIhO7DBTK6l61XMJCFUr1L/2z6h+5dE2ryDsCy+IjJ
+dD5Kz46WRMKpHU4af8KpTxrsT8LqgXfD7sDyv//mlQ4L+XUFDNx7JF+Ty2/A
+rdaCddbwlsfFL59S/ndmWgTDgT3H1KhfwoHh9Cy4OPDXsyqLkG+OotJ9ujc9
+VvBYDPPe9sS3wDUq07ZtgRWmbroioXtW9q4gAVyWN9XnNdxuxYnIhbOmZG+t
+g3OCS/k1MMd6eXwx7HJLaiqFv++/EZ4IH/tjVG6CKfJU/I/ibth55JLWLJjv
+GOizFOZlnlZcADMspv2cADcWVYVZwHbWTuuf0/PC+8uTC6fGynVehFtzrrxf
+AYvdmth0j4yYfzrAmtyxx9MR9sowSDWDzRUPhNO902akwdAIzrORqs6l9bXu
+yrPhsmMzbOfAvn7vNyrDoYrn7tP4/YGWGT+Qf0yAYdFSuEJTJawHrtk46aoL
+vKjpYWoHzM749lJA+xk3HGiE7erdpcV0fq1pk57CnjonWX0U/4290mPq96ij
+vSnqC+69qlYLh1osWHwAtlwtO94Aa7fobBLD/2RVREuof4eX68nTPcv77HD/
+IvoOKtC1g9vbHp2djHyZFZqMKNj99+sNBuRtKVduwWzHHUO2MNvouPcbOJW1
+xsCX+m9sIBmDk/9zxO0UjYuPrJqKe5dz+83QEupX7nEzdfjdj9M7X5GbL71X
+hX/S33dgBfr7zlzu/wFLi3W0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.041851370299756, 4.042946021129489}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1As41OkeB/B/ZbdxpyyTW6NUyj0Suew/93bRpEjiVG4rpxinVsqlOeSu
+TC3tpJJirUsubURFlHLpYqZNs0QZuaZIK8xK2/m+55x5nnnm+Tzzvr/3+/u9
+/xmdgAjP4IUURZXhTT7/99KnKQb51KGp2L+10zxhTjrf9QuLprjV/MkCeLRW
+S/s9zAm69mAS7mpQOC2A955+KdpgQFP8qYLky3B+3lt/DjxYf+BqCKyXtm91
+Hvm+RH2fDix35VNZA1ylF7WmZDnqqxcZd8DFY1ssFsO60oK7Apgp4CsGadPU
+Dr2Ezc0wK2x6sEUL9ft82aUw45NejgXMuDtlnQLTgk3uNzVp6rGq3Cs/sl93
+qdkO2Oak5o9GsGvFDm1ZWBITe+QL8rNsHALFGjRlsvFE4DPiwOzfOmHWavus
+cpjpOaw4Avf+6T/Hgy1t9/apYL9BW5EuF2YbNkn7wqlvUt/GEh8aNL9G6ie7
+cFJhyvS+vAryaRb+g0Hmx07pvhQDh7YMWj6GhfNONWJYstugYSHyCSu5m2xI
+vzlb+I7E0Qb5KfBhmQyTLJhSerKhAa5TDDvUR+bhfzi6C3aLX0itN0S+b9Zs
+E8Fdtq1eiTD/Ff/bGjjoy7iUEE5lTYb/COvyPr5UMULfgsjrTJj2qtDaCke7
+b4i8gjyTTtE/xcKW5+0OqsGWGQmN52ElZmpGHPozicocKYMls5lxPZhPUNsU
+q5zUa7sdbAlX6WduzYd9Ep4ePq9OU9maW5elwJORkcmycOqiLEEgXGzgc+/U
+Mqzzf+NhRdb/4uKyDla5f/0PGVh8ymGwn4l+4xf39yB/qN77gVrYJ6B7tBKm
+/nr97ios3lrtkA4rBVVKGuFQ72sTB+FRKUbABMxxWxviD7dp7JA2R/0qe99E
+XzIfh7KTGXCdZk9ACFxVrP/zBEzJ2nn9G3a1/9XIG3lttG68KIW7qHGt23Dv
+xvmSfpiTFLNdFf1OclXurURelpO14z5YaPwlKRzWK5M4nYV1z4vEd2DeyVsv
+q2BK+ANH2Rj12+s+l8O01V/XA+C9BueMM2HGwzqbSpiqKyn+HpZ7b/ZyClaS
+fHGewPm/uRSOqZrAq385cgT2iFOLNYR9CswXv0P+GabLkA0svh/btw12U4x7
+5AhL6upqKjGPDimxtRPMtBOUy8HOI/WldjD/8LnZCDWaKu2zHTeF23RS/ilW
+Rf7mIUMWTEs+6wfBodkRvTJwdFIWm4JTG16bjSCf5Rz/Ut03uNfzpY51cH4a
+0zcL/rjubmgmzItI1UyCM/XWTIXATbsOiviwj9q+V9/Bxdly3a3wgWS3gk2w
+T0f8vDzqUwXTqpYw98Ly7mBYr91xmyOZTwe9pB02r+y/uAdmLlCvMEH+q0Oa
+0Wkwo2dDVA5c7M4800TyHdfbPQl7fAo+tAD56z4YiDaReXBmx1bDrMRAhwg4
+j9bR3UrmKxAap8FNQ6sORsOjPUNnk8h6Yc5Xl+HiaFu5QHhFUopFK5lnu5tA
+h+y/5hb2Bg41mWltxnlVLn72X5ti/4jhATe4yNm+VBMW62rxmpC/QzVrWB+e
+5PiuXA17VM3mmcFdBc9eJWIeuUHqA8SMpO4RsQpNvfAuWmsIs7W3H3SEuVEf
+trBg4YoIx5qlNNX51oujAKduNkm3gkWrJPJ/IY8wZ9xDtAT3aia63w9z9niz
+s2D1XebbHpK8uxsfhMC05qXIatjEM3GzP9wU29FB+q0K0iqJhFuO1w7+ROYx
+vt/xMqz6jDGRAbPZ1gMjsF+r4bN08jy9sFajcT5ldE/rNOx66XN8ARzlrfsh
+D86/qa8ti/zR7RkMch5LoH4nAn5o23hLQO6Hm7DtIZxfbrHoA8n3/WcvFcxj
++Kw+TxX91aXLGLnCK9jPO+3gvT/UhO+Dowqfa4fCoVSFpj987GZ5OQ/2eZv8
+3Iqsl5p9eIOsH+h5PYv6YZ7Kr7tg2sPH4hw5z/3vnGky37hODx1Y/aN1p+x6
+3E/v58U5yD8vd25AHRbuWbNzDv1ecLYIXwFLjAYlO+GOxLXJxJbvxUtrlGmq
+2jyxUAOmd0mJmHBvSPMVBbI/xUg5XQm/V4dllfM4z1J5qlcBbnmsaDMC53/b
+fsJHEc93V9o7AXk+tsy9e6SAe2OviKuDKZ1W91jYl7/26hW4ybmwNgwuksrU
+If3y/I/2Z8P3wyZ2JsAcNUvXaVjy1ib1GOmfLR2TiPqUQwv/KMzaOeeijvO9
+hY+VuGT/Mr+XcbCCgpXyKfI8BYjih2D77373LID5K89Ob0E/dh6q6xph5r9O
+WBTCxYwYnpjUW1XcPA6H83LXf41+2fVjX+lgPjNjSQlGcFNhSK4VHMXb/GQn
++X5KKcsc5jy39+TCPjVRGUqwUUrJ7iKYmbdr4AnqHasd9moj+43WnQmHfePT
+hgbJetHF5TPI1za/aG6OzP9kb/h+OP1RUK+0GZ7nymfTF9DvxLyllTLcdLl/
+sQ/mkT8ov4qYzv0jcIk8TdV77tCQgZVmggNfyOL/pqV6dh71qPrsggYZmrqj
+Yjo2Blc9zXZtk8b/2VRtyHOY0z7hJQVrN8sr3yH3y9bSPcrAuiusIpJ/cpXM
+p3Vw9e4Fgzyy/9awSB2ecX8SGQ/vreb5OsMWRqI2Dqz0wHbyV3hex4G1H86v
+KFPdiPp+CY5+oaS+sFQ0CusZ31sQAfMir/pWIZ93qpFxHCweXpN/HPmV9Ptz
+z5B8Do5WrnL4vToq/VwBc7meKvOwT72phpDkqfK0O4X+u17b/z5N5mu28OwU
+nHvc1FAb88i//SB4JeZlqRoa7ULmOaXZqwYvKdw+FQFTLE2/DqwvrL44mgOL
+TU9fdoHfNT56UEvmeaDvRgrO41GfTTphzlOthhzke9V9TmMMnpyOS4tB/gu6
+fwolMJdmazmhv/++zP//yaD/A2Slx6s=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25695895996216, 5.4856114964743385}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMk1cUB/BPoqVCkVKcFlAEdNMG0OKgA3XwARVfzFWYZHYbqygGpJGm
+VEU2tTAeBbaEDSRaBaoyHZLwqEoUSm2ngBLQ4iBDXimCik6wWAaKgvvfaZPm
+5Nd7vtNz7r35POOSo+JtKIr6Bl8S339c6ffRk6ZqIp1jD8LPLo4G3PGgKfYW
+6/edsFbQ662CLZd4wVw3mpq2PyAIgfnWFs3n8Aq5l/fDZTQlEda2hcEXiqSl
+obCykdWwEj5Zb2Sdd8d62jmXMdTb3yg6y4KVtLv/KVgWbeZmLqUpM1Pa4gvv
+m+IqFsCShHxjrQtNjZU1Xa5egvzckHFvmHNXc24/bHjTW3GeS1OB2/OraVh0
+yFHiAUet9u7xI/k7nwsrFtPUV51T2g2wxT17WAi3zq89EPt/va3trxbRVI93
+IKsQrrFtFt6BU7e15nURT7Y7XIfrXuh8PdCPyGZZOFmPeLKqVQoXKBI3v4Yv
+XUhwvQobqk/cj0B9seMcZyusfGZiVMHXwlL9PTGvjK2v4qG/THFL1zq4oJB5
+/DL8OOnwng1kP1aUSoWYL2ySU7Cc7NdfDqwuuLVfnPKC1MueM/kd9idhprhY
+A1Mx6d7dcNrbXaOBsOypVkHOI8HCbWhA/2ax01UVvEryZp8vTOX+wa+DSy8G
+0YWIdFmF/iYit8hPYEUdQ2jl4xrYxotSRZN70cV8coyc988Pk+vRR43CrpwP
+SwN67vrCpoHrylbkFfPs+7WYw+B3eHkUzCljDX0Bm5vkvLvIUwyMvJsDm1xc
+2jfC/PP9sybsi/KH1ZkG/L7XhhvSAEtSbqs3wnbvtFU3YJnnUVMvYh1j/QMS
+DYdsZlSIosMWJgt5SiHHuIM8Z513ZBssaTJuCoLTXvsVF5H1Y2fcQuG9T3lb
+B4nbmp0SyXmkzN9O7hEtDoushhm2kcelsKElIJqNvGzb3rVlZF75YHgOPCFq
+T9eTeec2cxYg+kvu5DeTdc3R/hJEi09O5RXEghfWTWswf/fLCnUOrPnU0VwP
+3/a1/ymE5DGyMoKwf2ud8t/2oy4/IquhHE79LWMqHqb1S92n4Dzj6yIyb82Z
+ul98cG7ySt1YOGy+d/NgGPwtT3i/HPdOqbz2/DM4z8FNPhdm98QZHOALaU+d
+Ej9CP78yk5pRTzx8srZ7IXzl7/F4OC3WUfc1TJ2WV42jP68H9xpHneG3qQwZ
+XBW3e+VpZ3IfhxeOoG9B9A33PXCNoG3LbrjOZnNcBMxnVM0bQt9tW7TBQtjU
+khWggO8LCk6KYU2g7b+u8DNjHzMbNreOrO/DHKt72PZ/wqLgs2py7sqkL9fN
+Rz8e7R/bEe8VS9U7YVlnQEcPHJz7ckQDi4JKlC6oJ18yOD4MmxdrGOT/xmZ/
+H3LDvPSEqvsRzDY+KqFh6pOV/ET0+6rj8eR2mB83s2sKvrRmwhoOG0SzjrmY
+t1zRML6UPD9t17cI+3MtLaO+D/UtJ2Z+PAWfiWLkpsPs5JHNdtjf0uW9Uwtg
+k09Mzh5Y0OEzoMI8dMstvQbum9a5TXBQXxg6roc5RQMxMbCsY+yWDp7WjVZf
+dUL9ruhiNaw+suMAl/gfRYoYPlQnrcxkf3gvL/kQ2fR/EnMCOw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.118561596984358, 6.001529066331595}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{9.4, 15.5}, {10.6, 15.1}, {10.6, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.5, 15.500000000002307`}, {6.5, 8.499999999998607}}], 
+        PolygonBox[{{6.5, 11.4}, {6.1, 12.6}, {6.9, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 12.}, {1, 0}], 
+        LineBox[{{13.5, 15.500000000002307`}, {13.5, 8.499999999998607}}], 
+        PolygonBox[{{13.5, 12.6}, {13.1, 11.4}, {13.9, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 8.5}, {6.500000000002592, 8.5}}], 
+        PolygonBox[{{10.6, 8.5}, {9.4, 8.9}, {9.4, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{7., 4.}], 
+         PointBox[{13.5, 15.5}], PointBox[{13.5, 8.5}], PointBox[{6.5, 8.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs4lPkeB/A3lzXrklnjHpkWkbLrsj1YaibCsLQO1jpymUpRZMdmt3s7
+ndQq1IRU58ROVmKXTJH7MuiCWmdKhNyryW0YGqdC2e//nDPP4/k9H+/7/n+X
+//vOO6u2fxe4U4miqLP4I5GSLuGzgk3990NnU+JrGQPfw0zx7dgAbTZl2GMs
+7TLG8Yg1Xj3L2dTmpB82ORDv2yO7Cpf3SrNTjdjU0FU36xtwpOnxojFDNsVX
++WLpPezbPfU2EBb2uVanYz2LucXoPw2QR82bthb5NK1ovRGwIEfXvwDes1Kh
+ToPlG5VsHT5hU7Hm593a9ZGvZnjDfVhHLdzyJsyde5wRoYP11Lc/L4XZOu/X
+yeAwaRetBRbt8dybwGBTuiaF9XOwnU8Zvxf2MmUuOJL1vQ83rtVlU+0m51qP
+wLz+LWqRME35Q24rHFBwaCQBLt/hVMlA/TxOan0EHJy+mBQMi/6VNk6ur6HT
+xSdJv717T/Vh/Smdga15sOSzzJAkuCrstX0BLJ7Q4L9Dfe6DzLSzcECbnf0+
+uGmM7hoGcx2SXcfQX5WL9fWPYTmPn78DlmY2tuWSeTGOO45jPlfmGPqmMGW9
+UjkZngr528bT6I95yMzECU4bLJsf1cP5TdfMaHCgi32ZO8wdzFVXYP7B2aGW
+Oag7IFFpRgvHR2/GqyyhTsF42acecF2s9j/J3Ni5ussuwpxLD+NnUKeYfmaj
+Kupx4BybSYX5szv1U2CV9WNfbYLp0YpcQ9LPBYNPGYgSh0drSxHDj04mL0MU
+SjRrPbDunVuu0+qwnS89ph2OXJW4dR1ZP2Kyyxt1ZSzPSNgGB5R3FRTBimWO
+FfkkX4Na8xQc5iGfm4YFv8lKGehraPUKvhvW4XreqtWHf2sszToB81YH67/F
++W5v/BvrST+nF9ur4fmSEbdRcryssiIKTnOacFmA7Xo+t5lGPGPbZKNAHCra
+e5fMoaLbRiFBDLDqVZUiL1f6lcZ5cr20ejAc1nm59+h6mP6lpv8zzMO9UmtY
+TPqxMOiLhTfv17N3gtlymYcmLHT3zMpB5GVOqDzAfMNbphnziEx3nnER4mS0
+iVcQIpfm1lSISB0sGozCvoma08Lb4Kr06z62eK7EgXd3kfWqlr/oMNZC/arj
+gjh4HUetwUETx0PFkyOwbuZT+REN3E/Grx3jUUeaQHrigzr2JyV4FYW6+zyV
+fqqGueac7mx4lMWrKoZFj7KCrTGf0I4UaQdMFcX2FcP0vKY+K6xHDTknmGLe
+B0rvzeQSl+6wSIKvNAyk2CI/1aZxuhimQowr78GS7JOdzWS/Aj/Mh6NeYa3E
+qBrWnExbHIHl2jKfdNjkiw++fuhPmOBv5wGP8vK0zsKC59Zeg8g/et009xdi
+tYF9MXDhrXjlwzCXL68bIfdXyoCXKTwk8u0LhVMavXNPkXwX/bseof9LoXq7
+a1AP3azt1Dfwi6poqgH104td7Ccwr7rOe+E56FewIt7oMlwou5HN/Rjzjdxt
+Ew3nv7jK0aNhv1QPi74m+2k08azlI9SftckmAqblt7emqOL/+xMd02DRfOez
+bSrw57vO9MLhq4d/iFLGXMLc7DYjv+jCCsUZJeSPK7raTJ4j0VPLiWWY12yM
+ZSDqF12vnDwB2zn0rSX3rbN2smoITF/8peYo+vf7e/37SFjQvtCvjnkxzfkh
+l2Gx1ZJRCpx0rezxIvHj6SdTZN7XfCaPIZ/d4urbLvjeoI292s0g9XRZyqJh
+E+0GzRJYzC9MTICtG4b8NqJ+5oMK/RDimDyjGphbpZdhCrf8GZWpi36Zym+2
+t5Dvnfdbyj1gthpbuBUOMFcbZMH0SzaiftR76aDEVwUWeG+WfQOLjld5nyPz
+Ke7Z8BD9dZsLQ0aQX5h+5VcOLN4/zlCCmb83tT7GfA7cfDM3R/pVm7mYCE+W
+aD6/T2FeQmWJDdnfPIaP2hKL4gVY1SnBzMsnj8Uvsii7Ax0zC5h/S/n5pN53
+LIppRrM1IM+z02hd3Bu47plnELl+tnHWeQ4OkLFLYN7ztvBvX7Mobq7kIBP1
+8D/6sf7pDIuiJxu+LICZC2d335WzKHlE0C4Xcn/2c3IsYUG1/XoJLOng7Z+a
+ZlGUhrPfDszD8B9PexxwnF7+pHcc5qy0WvMAHnpwojwK8+RbqN8uwfrCrU8q
+asn+nNsy1jyL8//IZ86T91ycX5AC9QR8Vt9pgPcA0/GOhgXqFbQuT2XA3Hc7
+1zv/h0VJtmn1yHB+oc79Qwbob0i6ybGIvAdtL/z4OyxM3XPXB37roz47DHNf
+rHPuRD3CEcWrEpjXlMMNJM8fZ2YDjVx/xGCwhfTz8Oc1cuTjvWy+xYbFvmmu
+cQrUZzJ0vxHzMPxJ/5OTqJffqfFzECyp+O7GFvTHtX0Vt0jmmeBkXDuB40d7
+CxvJ93hK55MsKeaTb91fQMw3+nfUMOpbiBkm8+cadX+Z383C/cgq6SLvAYZH
+5rF2XD/V/60Z2Q/j7+9U17IotoWFYzLj/79jMv74X9Rl/wX5tzcv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {3.2807968978321704, 3.5703782848251917}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd2Hs8lGkbB/BRrRQyapKknMIUtSMlh1ZTSbKqIaGykVTDKxRZRUxFUWhI
+kZAWJaGpkFfSFJW3JJtjJSadpkWGohzK+7u2f3y+n/twHe7nyXPT8Qpw2jmO
+wWBoyTEY9JPxfQz/ZnEZTAKTyxA6uohXaXIZ9R4Xso/B7PXWp9JhXvQh23Gq
+XIYoUj1BYTaXwdDcet4fDq18rhoNi+XGf38E53Fd706Zw2Vw213DFadyGdJf
+eNcuwpIr3zlL4UDNeykWWljPW6JpD8d03Rn6GxZ1BDnYwOLBPLapNpfBcU9p
+MaDxL3W6B+DAaP9nX7B/lmtyVxnMHMw1KoKDRy0fyGDxE3b+Zti5OsFWS4fL
+8NRYcXkY+adO7vZZBQtddXrPwJqzdFLdYYH6wxMcqlftVpEvzBi5yLqggjgX
+POT8YUknJ7N3CpfR5hTqshsWF2y6thUe3fy/dleYm/taq0uZy1Cf3MJeQeul
+Fetz4LzEdUx9Gk8ybT8JszSX5v9C+YwLPkLjzC91C98jX22LlnefYYWTr988
+gD2L/k73wf4ViueGr8CC/V+sVZFPwWzFuNMwV9n5sAQuc/rmH0X90fpiwUf+
+rOwFCyOoP7yFO7th3iONwcO0/3xbjVA6r0erY4TUn6h6T3n0k+HCNc2H61Xl
+9JPgHF3PZ3W032nxHrVpXIaxm7f4hzadc15iAmz+dmBkCdUfVcQfhFOd77BC
+YNmf/qH2LC4j2SR1bQU51nJmDMw+/HuqvC7ih+9KKoSVZnc/d4KFKlnG5bC3
+t/qtTJjZL7QogmuSFeWlcFZpKPMkXD35RLqxHuKpvB1zgm12XY71hbULpy6Z
+BGt+DtLLgrndBmnXkY+EUaJeS/bYWcCD3cd3R/TAgf07HLpQX222Wtv4uYiX
+rXriGFzdKTZSgTk5j/wNadzQtINcn3Hx0XP0i3+tvFUeFiW79cfB7iJrrwHK
+x+BeET1f6rHHtF7Dgt/aBq3oeVeqGr0LMx30OpbAvDssDcpPFrBdYEf9r5UW
+R8Ii9i/dQeT/zmZup/HOXUa36Hn179lqC0vklOyZyEdzTUamCZxlesA3HK5Y
+1505l3yw9N032O6Q/t/aMM+YuycC9YZKL6wxpPz8Hq5URH/C9Zwum1M8nUbP
+c3DMYL/2JpijsLJEbzp+SmT+4TAjZ5lLLty6waW1EBYeziidqYbz6Aszl8L1
+XT7N4XDwjKWK86lfxvv2PIEF7uMO7aX+SOynjJ+BuMbBERWwp58RVxeWxpq+
+VNDHeFJGAhuOaRA4OMNZHS4JanB6guv5dBqfqdDSg/0WvzQs6oC5Fd79Ilj9
++vycWQboZ8iMFTvgNo0d0vVwvU51swIc6vDnylBYIp+y/hLyZ4QWvT0LC4Sc
+NC4sMIkNyCcXfK9tQ/0FBufGbtD6BYofIuGowwG612nc40faQrjxZGFTLsyt
+vKnfg34KO0PCkuBApW0z7tLzlF7yhOIxh0IXXYa5Jk/vbaH9Kn3WkWNeRBy3
+hBkHu63F9Dz2d/yhAfN89Zv6aL941+hRqleruMUS8cSX/9J/C3uG3GDR+XAC
+283qYQZreugk5M/Wifd7QPOzgo1jYHfmfr1qWPt5ZxUT9Y+umbXxKSy5pL47
+ExZdCj76BuadmDjJGP3l5Vk9YiC+9qq89GJYKdzw9nzY8/hje1N1jI9TPrGN
+6pdezs2G1RvuDKTB4kBWq9xMPM9PbL3baf3HTXX2cO0nRp+BIepe/tklHFbi
+Vwr2weKDIxZnYLu2Za2VsCDX1Jac+rH75iQ27NnvdAiublSV8GDPySuXboDr
+vyzlJcGBc7ilynB67sQltbDwU+H2CuQzmhmn8gOWRH4M8oC1jefe05uH8bjm
+v0ZQj/AHP2U5nMW713MGTq7N2MiDOfVKfFOYrW+3wAUWJ80b/wL9iWvteOYI
+M1S7Np+E07uubrSh+VcPRq4nq89c9CvMDZE16MPvlOTNWHDgRw/JNNjtQAF/
+APmIRpqtNGC+Sv9II9XHCThoAWdpKJiW0PjeuYZ7YYf9Tvap5IibNXfpfXE5
+6yFg0/93v/fR+xGY7L81gOp75++WArvFDrTtYtP78eGHOuqdsOMQm//vfG9n
+Oh8HYxWNYLLLj70m6Jf2ba7mSZjhHWlTCVfsr9IrhOv3hD2y0UDc2FfXXlC/
+FW5ZiOHa5vJnKqhHtLR5gzF+z0vPHjNeD/NiZ3tFk7+mzzhN/XLYeboG1vQ8
+kt5G/U7M7P0Ci/64dYY9H/N35wjk8R0gEaZWBcNC+zA3BiwYdH5XCQu8E4Wd
+tL5m+MkEI+wnnGh9Dc67kBZmAzNnCLb6wLINJ8zC4cAnHldYsPu498n5sEC3
+MboE+YpFR5PqjOj87Sp5VM+DunMfaT+ZpXsX6tXsG4gdoPlliQEnYNFyh7Lv
+RlR3Yesi2Nm8vLsP5vWFsD6hf8sYfps7YdkiodJ1uMaYlfCE4p/O64mHy9rt
+d1+DhdcLfjkCC6aXD5+i/e9YXU2A2fP+EQTQ+mu7fi2GKy6m/caj9dqOL/vg
+HM3s3Yspv1Mt/asRP0r+D9U5FP/2p/pCOh/XxKkqsGdB05A+6jEPb/qqQPv7
+uqzOhxvvs98q0Xrpq0lm6EeOzuGMWVTPs8Xrq2F1bm3gEvLm2J8b0O9Au3LT
+LeSJQbqNcKMs2C4W1u6VqTrgOyw0h5N9j/bfMuHyTbhM6tgkZ4z9+9/5TMR3
+WJ6xSNMO5hoOlNjAo9YbQ5LId7ubfGCbyLc322FtA2W1EDiQJU2avwD5W2U8
+oXGm1avGIPJDd0db2PzdNNcymOc1fUgZrq2MnjcIZ9V39lchPstmZ7bRQpwn
+z9LID5b9bAh2hTlrZukowt4jrcWhsCfDsDSX6nvO7EqA6+0zh7lwbUARKw0W
+mAV8e4N+ZCWk5JB5TxND42H+4PmIRFqv3ftiDdwWN9wTCYsa+lvp+fIzP5ey
+G5ZFlvh9Q79DVxzh28PiD7sv9cE2R7Yfng9rMzecn4D5yedeaU2GmTFWmzlw
+nLnoWBfqkfkPvg+CK47nvq+HRXvy1z6l8dFlKytgTtWLbAvkq102z+sajAfb
+vkSTnts9ZVdpXHLlsxXq1a6WbroB189c9KwG5tkOva6ifjXFf3Ch/s0XRUpg
+8YZy3Tcwp7X1y0TK92JVmhe+k6XTeyMtqD9lrKpmOLn/zY8gOKawv04T3218
+S0dpCfVnTNK/Cv4+dt/3B+z20zTVA9Z0nLvf7lf6flgxIQBum/jg72SYvTbt
+517Y2fTdMgksadnVwIfjBvjWLA7yu2LOc4ZfZjyvWAIzLQ/dXgK7l1df2Qhz
+dT4+nAK7ZW2x2kPzle4N30d+fmGzmg9z6PdvwhZPuLZ077REmLHg5oVh1Of9
+6fODNDjw039fn4WjRheOZMKeKXrTLOHyM7YjGRz6f2DxVyn6ldR1f3UqLNF8
+UXYZ5k/cGpdA60OKew/AU4dPXKV4gkvL3bxm03u9++I+ys8s6gFZMlH5qBfM
+ExRNDqf3I0JtrxPFk9j0F8J/OWacXEXzvbdzv8Ev860+mNH+a5vvbkI+Z88n
+hy+g+T7XNz+ES+VeGbKpnq1zzVajvvtDD88YUn7Tg94/hdvWbllhDJfdTHu0
+AP0pGBTvof3MVYeTgmGlu1F6tnDe4og6utfU7jfhbIXFndNVvsMnDPzZ+6me
+7ttzOPjOtq4I9jsNs1fKszzgfcKyhSWUn0b0rqN07/geHP6C6htQHzsPV8fU
+rBmDhSsSV+Xp0P2sb5++Cc5PNGN23r/7mbTZw+alekM0P/+sxMcf5k/vro6C
+1bx01E7R+M9jb3fABXaPh67CgVq6WlZws804l2rYbrXsjBLsFG+S3gKLP6Zk
+v6R7y/3eoPcw13ZazWWY3SSq7IFjJMrxIXB6/qRzMpit+8p3LbxILXLzZ1i0
+zqBIF3482BX3keJ9CPKYANc158jayE39WyTo72hIiu8zite0o7QO/soqH7tL
+8fht3k3wSw7nf9dg3pSOwa9w9cZU6QVYavzhgBr287cfC0uE3dqDen+DS9WG
+EqPhsjUp2fR+ZDlvm3PIhO7DBTK6l61XMJCFUr1L/2z6h+5dE2ryDsCy+IjJ
+dD5Kz46WRMKpHU4af8KpTxrsT8LqgXfD7sDyv//mlQ4L+XUFDNx7JF+Ty2/A
+rdaCddbwlsfFL59S/ndmWgTDgT3H1KhfwoHh9Cy4OPDXsyqLkG+OotJ9ujc9
+VvBYDPPe9sS3wDUq07ZtgRWmbroioXtW9q4gAVyWN9XnNdxuxYnIhbOmZG+t
+g3OCS/k1MMd6eXwx7HJLaiqFv++/EZ4IH/tjVG6CKfJU/I/ibth55JLWLJjv
+GOizFOZlnlZcADMspv2cADcWVYVZwHbWTuuf0/PC+8uTC6fGynVehFtzrrxf
+AYvdmth0j4yYfzrAmtyxx9MR9sowSDWDzRUPhNO902akwdAIzrORqs6l9bXu
+yrPhsmMzbOfAvn7vNyrDoYrn7tP4/YGWGT+Qf0yAYdFSuEJTJawHrtk46aoL
+vKjpYWoHzM749lJA+xk3HGiE7erdpcV0fq1pk57CnjonWX0U/4290mPq96ij
+vSnqC+69qlYLh1osWHwAtlwtO94Aa7fobBLD/2RVREuof4eX68nTPcv77HD/
+IvoOKtC1g9vbHp2djHyZFZqMKNj99+sNBuRtKVduwWzHHUO2MNvouPcbOJW1
+xsCX+m9sIBmDk/9zxO0UjYuPrJqKe5dz+83QEupX7nEzdfjdj9M7X5GbL71X
+hX/S33dgBfr7zlzu/wFLi3W0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.041851370299756, 4.042946021129489}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1As41OkeB/B/ZbdxpyyTW6NUyj0Suew/93bRpEjiVG4rpxinVsqlOeSu
+TC3tpJJirUsubURFlHLpYqZNs0QZuaZIK8xK2/m+55x5nnnm+Tzzvr/3+/u9
+/xmdgAjP4IUURZXhTT7/99KnKQb51KGp2L+10zxhTjrf9QuLprjV/MkCeLRW
+S/s9zAm69mAS7mpQOC2A955+KdpgQFP8qYLky3B+3lt/DjxYf+BqCKyXtm91
+Hvm+RH2fDix35VNZA1ylF7WmZDnqqxcZd8DFY1ssFsO60oK7Apgp4CsGadPU
+Dr2Ezc0wK2x6sEUL9ft82aUw45NejgXMuDtlnQLTgk3uNzVp6rGq3Cs/sl93
+qdkO2Oak5o9GsGvFDm1ZWBITe+QL8rNsHALFGjRlsvFE4DPiwOzfOmHWavus
+cpjpOaw4Avf+6T/Hgy1t9/apYL9BW5EuF2YbNkn7wqlvUt/GEh8aNL9G6ie7
+cFJhyvS+vAryaRb+g0Hmx07pvhQDh7YMWj6GhfNONWJYstugYSHyCSu5m2xI
+vzlb+I7E0Qb5KfBhmQyTLJhSerKhAa5TDDvUR+bhfzi6C3aLX0itN0S+b9Zs
+E8Fdtq1eiTD/Ff/bGjjoy7iUEE5lTYb/COvyPr5UMULfgsjrTJj2qtDaCke7
+b4i8gjyTTtE/xcKW5+0OqsGWGQmN52ElZmpGHPozicocKYMls5lxPZhPUNsU
+q5zUa7sdbAlX6WduzYd9Ep4ePq9OU9maW5elwJORkcmycOqiLEEgXGzgc+/U
+Mqzzf+NhRdb/4uKyDla5f/0PGVh8ymGwn4l+4xf39yB/qN77gVrYJ6B7tBKm
+/nr97ios3lrtkA4rBVVKGuFQ72sTB+FRKUbABMxxWxviD7dp7JA2R/0qe99E
+XzIfh7KTGXCdZk9ACFxVrP/zBEzJ2nn9G3a1/9XIG3lttG68KIW7qHGt23Dv
+xvmSfpiTFLNdFf1OclXurURelpO14z5YaPwlKRzWK5M4nYV1z4vEd2DeyVsv
+q2BK+ANH2Rj12+s+l8O01V/XA+C9BueMM2HGwzqbSpiqKyn+HpZ7b/ZyClaS
+fHGewPm/uRSOqZrAq385cgT2iFOLNYR9CswXv0P+GabLkA0svh/btw12U4x7
+5AhL6upqKjGPDimxtRPMtBOUy8HOI/WldjD/8LnZCDWaKu2zHTeF23RS/ilW
+Rf7mIUMWTEs+6wfBodkRvTJwdFIWm4JTG16bjSCf5Rz/Ut03uNfzpY51cH4a
+0zcL/rjubmgmzItI1UyCM/XWTIXATbsOiviwj9q+V9/Bxdly3a3wgWS3gk2w
+T0f8vDzqUwXTqpYw98Ly7mBYr91xmyOZTwe9pB02r+y/uAdmLlCvMEH+q0Oa
+0Wkwo2dDVA5c7M4800TyHdfbPQl7fAo+tAD56z4YiDaReXBmx1bDrMRAhwg4
+j9bR3UrmKxAap8FNQ6sORsOjPUNnk8h6Yc5Xl+HiaFu5QHhFUopFK5lnu5tA
+h+y/5hb2Bg41mWltxnlVLn72X5ti/4jhATe4yNm+VBMW62rxmpC/QzVrWB+e
+5PiuXA17VM3mmcFdBc9eJWIeuUHqA8SMpO4RsQpNvfAuWmsIs7W3H3SEuVEf
+trBg4YoIx5qlNNX51oujAKduNkm3gkWrJPJ/IY8wZ9xDtAT3aia63w9z9niz
+s2D1XebbHpK8uxsfhMC05qXIatjEM3GzP9wU29FB+q0K0iqJhFuO1w7+ROYx
+vt/xMqz6jDGRAbPZ1gMjsF+r4bN08jy9sFajcT5ldE/rNOx66XN8ARzlrfsh
+D86/qa8ti/zR7RkMch5LoH4nAn5o23hLQO6Hm7DtIZxfbrHoA8n3/WcvFcxj
++Kw+TxX91aXLGLnCK9jPO+3gvT/UhO+Dowqfa4fCoVSFpj987GZ5OQ/2eZv8
+3Iqsl5p9eIOsH+h5PYv6YZ7Kr7tg2sPH4hw5z/3vnGky37hODx1Y/aN1p+x6
+3E/v58U5yD8vd25AHRbuWbNzDv1ecLYIXwFLjAYlO+GOxLXJxJbvxUtrlGmq
+2jyxUAOmd0mJmHBvSPMVBbI/xUg5XQm/V4dllfM4z1J5qlcBbnmsaDMC53/b
+fsJHEc93V9o7AXk+tsy9e6SAe2OviKuDKZ1W91jYl7/26hW4ybmwNgwuksrU
+If3y/I/2Z8P3wyZ2JsAcNUvXaVjy1ib1GOmfLR2TiPqUQwv/KMzaOeeijvO9
+hY+VuGT/Mr+XcbCCgpXyKfI8BYjih2D77373LID5K89Ob0E/dh6q6xph5r9O
+WBTCxYwYnpjUW1XcPA6H83LXf41+2fVjX+lgPjNjSQlGcFNhSK4VHMXb/GQn
++X5KKcsc5jy39+TCPjVRGUqwUUrJ7iKYmbdr4AnqHasd9moj+43WnQmHfePT
+hgbJetHF5TPI1za/aG6OzP9kb/h+OP1RUK+0GZ7nymfTF9DvxLyllTLcdLl/
+sQ/mkT8ov4qYzv0jcIk8TdV77tCQgZVmggNfyOL/pqV6dh71qPrsggYZmrqj
+Yjo2Blc9zXZtk8b/2VRtyHOY0z7hJQVrN8sr3yH3y9bSPcrAuiusIpJ/cpXM
+p3Vw9e4Fgzyy/9awSB2ecX8SGQ/vreb5OsMWRqI2Dqz0wHbyV3hex4G1H86v
+KFPdiPp+CY5+oaS+sFQ0CusZ31sQAfMir/pWIZ93qpFxHCweXpN/HPmV9Ptz
+z5B8Do5WrnL4vToq/VwBc7meKvOwT72phpDkqfK0O4X+u17b/z5N5mu28OwU
+nHvc1FAb88i//SB4JeZlqRoa7ULmOaXZqwYvKdw+FQFTLE2/DqwvrL44mgOL
+TU9fdoHfNT56UEvmeaDvRgrO41GfTTphzlOthhzke9V9TmMMnpyOS4tB/gu6
+fwolMJdmazmhv/++zP//yaD/A2Slx6s=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25695895996216, 5.4856114964743385}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMk1cUB/BPoqVCkVKcFlAEdNMG0OKgA3XwARVfzFWYZHYbqygGpJGm
+VEU2tTAeBbaEDSRaBaoyHZLwqEoUSm2ngBLQ4iBDXimCik6wWAaKgvvfaZPm
+5Nd7vtNz7r35POOSo+JtKIr6Bl8S339c6ffRk6ZqIp1jD8LPLo4G3PGgKfYW
+6/edsFbQ662CLZd4wVw3mpq2PyAIgfnWFs3n8Aq5l/fDZTQlEda2hcEXiqSl
+obCykdWwEj5Zb2Sdd8d62jmXMdTb3yg6y4KVtLv/KVgWbeZmLqUpM1Pa4gvv
+m+IqFsCShHxjrQtNjZU1Xa5egvzckHFvmHNXc24/bHjTW3GeS1OB2/OraVh0
+yFHiAUet9u7xI/k7nwsrFtPUV51T2g2wxT17WAi3zq89EPt/va3trxbRVI93
+IKsQrrFtFt6BU7e15nURT7Y7XIfrXuh8PdCPyGZZOFmPeLKqVQoXKBI3v4Yv
+XUhwvQobqk/cj0B9seMcZyusfGZiVMHXwlL9PTGvjK2v4qG/THFL1zq4oJB5
+/DL8OOnwng1kP1aUSoWYL2ySU7Cc7NdfDqwuuLVfnPKC1MueM/kd9idhprhY
+A1Mx6d7dcNrbXaOBsOypVkHOI8HCbWhA/2ax01UVvEryZp8vTOX+wa+DSy8G
+0YWIdFmF/iYit8hPYEUdQ2jl4xrYxotSRZN70cV8coyc988Pk+vRR43CrpwP
+SwN67vrCpoHrylbkFfPs+7WYw+B3eHkUzCljDX0Bm5vkvLvIUwyMvJsDm1xc
+2jfC/PP9sybsi/KH1ZkG/L7XhhvSAEtSbqs3wnbvtFU3YJnnUVMvYh1j/QMS
+DYdsZlSIosMWJgt5SiHHuIM8Z513ZBssaTJuCoLTXvsVF5H1Y2fcQuG9T3lb
+B4nbmp0SyXmkzN9O7hEtDoushhm2kcelsKElIJqNvGzb3rVlZF75YHgOPCFq
+T9eTeec2cxYg+kvu5DeTdc3R/hJEi09O5RXEghfWTWswf/fLCnUOrPnU0VwP
+3/a1/ymE5DGyMoKwf2ud8t/2oy4/IquhHE79LWMqHqb1S92n4Dzj6yIyb82Z
+ul98cG7ySt1YOGy+d/NgGPwtT3i/HPdOqbz2/DM4z8FNPhdm98QZHOALaU+d
+Ej9CP78yk5pRTzx8srZ7IXzl7/F4OC3WUfc1TJ2WV42jP68H9xpHneG3qQwZ
+XBW3e+VpZ3IfhxeOoG9B9A33PXCNoG3LbrjOZnNcBMxnVM0bQt9tW7TBQtjU
+khWggO8LCk6KYU2g7b+u8DNjHzMbNreOrO/DHKt72PZ/wqLgs2py7sqkL9fN
+Rz8e7R/bEe8VS9U7YVlnQEcPHJz7ckQDi4JKlC6oJ18yOD4MmxdrGOT/xmZ/
+H3LDvPSEqvsRzDY+KqFh6pOV/ET0+6rj8eR2mB83s2sKvrRmwhoOG0SzjrmY
+t1zRML6UPD9t17cI+3MtLaO+D/UtJ2Z+PAWfiWLkpsPs5JHNdtjf0uW9Uwtg
+k09Mzh5Y0OEzoMI8dMstvQbum9a5TXBQXxg6roc5RQMxMbCsY+yWDp7WjVZf
+dUL9ruhiNaw+suMAl/gfRYoYPlQnrcxkf3gvL/kQ2fR/EnMCOw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.118561596984358, 6.001529066331595}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{10.6, 15.5}, {9.4, 15.1}, {9.4, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.5, 15.500000000002307`}, {6.5, 8.499999999998607}}], 
+        PolygonBox[{{6.5, 12.6}, {6.1, 11.4}, {6.9, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 12.}, {1, 0}], 
+        LineBox[{{13.5, 15.500000000002307`}, {13.5, 8.499999999998607}}], 
+        PolygonBox[{{13.5, 11.4}, {13.1, 12.6}, {13.9, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 8.5}, {6.500000000002592, 8.5}}], 
+        PolygonBox[{{9.4, 8.5}, {10.6, 8.9}, {10.6, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{7., 4.}], 
+         PointBox[{13.5, 15.5}], PointBox[{13.5, 8.5}], PointBox[{6.5, 8.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1Qk01GsfB/C/9Ga4dspwlGnRptzp0iUNM2ncpqgGqVeRaZEWarpkSzWh
+mm6WUZOmUOO2TUopKqLShhbdIWsh2iwZezV45f0+d85x5nzO8/x/z+/7+z9z
+TN64yytwDEVRV/FHvqnmUXzMOZQpwVQOpR7zWLUWlu8Juktcl/p6Uj6dQzF5
+H1oMyfrvGWGTYI5r704mzGjkeknNOFSMrl/Uelj0eCbXCuYtPuF9GpaoWLlP
+JnCoyNWfzzbB+YU0RTxc9pUbbDMN9V/kyjfBxTrvNsfAkaoNMQJYKrNTl8Mz
+bwzHRMG67ocSLa1Rn7Ms4Cosj91xezOs2EcX98Ii2Ubf8zC/snXxHziftjP8
+SzUs+Fwy/jzco6gWDsF1WlpGGuiftnH9a4PpHEqY8sPRFxa/vn1pPJyfu7fl
+AkzV6kbqwjQL7i9NcHzLSsk3PC/edevOKCxstxquhMvmdM0ch3kJSxIDL8Pq
+XqFVN9YlrRMH98Cyu67dBWQ/y4TpCjNDf08Kgi9o+F80gJuXXD40hP6Yiocf
+Wkje6uB/wuH8J+2/FsHqjvazLchnGmkemAkLmm3MF8GSimdPTsB8zeHRtPEc
+KmxPcK0UZsTvXjVoyqGqJHaCi+R5atr3ALi5+wjvGSx+P4FbY4I89CWX+mGh
+z/mnG2C+b2CpLckTalA/DpbcEiwNsyY5h0RlxhzKcGCh0yOS36SVqYBN4xcs
+MsZ8enbSH1yEdS2nlG+CtypaBQ/hAZdTbrdgZcmG8l6yf0kpawhWqFsEjqiv
+bH9z1nEG+nWbuzERFs71a9gO10XI+B1wumOTXjKsGNPrzEP/yh00/Qtk/8Ll
+tnI4PS7p6BWYKTgV+RWmrVBoymG6d8aUaZhH+sjwazGs3pJt5wbb9/kMB8KS
+aPfBZTB3/ewFTsQlS53s4Byb7Xk0uKw9zmcE9aiAa21VJM+zE8uyYMUB7d1/
+wzyJ1jUWzHd2rQmD60Zq9uajX5n/B/+VsKNcY2AKLM7SbLSHxc+9XGKRf1XB
+lJQZcFkA06rRCL+XtKkas2B+op7MCe7cZte2AG7ekXQ40xDznHbVZi2cM1nm
+Roctx4oaxDD1uDGLZ4CcIXO5T2HGeK6VVB/v/3rg/7TRv9KhtJoO52UsMlwD
+cw6ZXajXwzzOT7VWkHnVjzJqYMMN9CuDxM/oWTrY3+BmN5Y3E/2MMUoVwo67
+WC+SYeWXCslPuFNTo6Mc5vjFWV7B+Vud82tH4fx4J9k89Dc2zi5n6iz8fsuy
+wpNhfmG/lyPMyNpn2wqzygp3O8OS6zfNf0NeD+/nUjuYWeG8eDv89HaUiSVM
+9W8p+AvukRVrDKJ+cYFpZTLcNk9oQs6PDAn3j4AZp9+Hp8GKTNZTDhw22qcI
+ggX2JQYqnCc3/sydD4s3//NuPxxTvKNSCxZZKzcPoH/mkXbpB+SnoriKMuST
+uaxYX0Y8/K3pMOYTLzPbWkhcqUxl6eL+Gifa3/93v+ebHzp474tbol7Dwpon
+7iXayJXmS++Ge/48k51Hwzxbx1pOIvN8PFFVrsWhpum2P/eFJS9U2RbwtZDe
+u+fIPJceeSkfh35Lvbo64Z4YV9ommGubauiCefS8ndMqgCXOJgnJxLzyW6lw
+p3D180ZY6B6WMwIX7Szzt56Nepn8fQmoz3/f6rQJVipdJA7ohzX/aJ2UeMOK
++l7YQ1m1Jh82dPAPz0b/Ai9Gxiu4Z6JWqB/yDax2CaiAm80TjvbCect325TC
+cg3uW8EvmL/2S/8bZH1LQbIcVq/ZqJ8A85+lbLkC5xlvHAgg+5O7jCLgSOZB
+ji1MeTSG02De1A7hEMmTm1kYgPpiWR+jDOYbjZsdi36KHrrUnoGbjy/7EoF+
+BWs1qvf8m//8fncyv3tDbetg0X4fX23kD/O4yFsJGzZ4aT8ci/mPKnZ7kvtl
+f/x4tCZ+f3+xxm+Cc5qWKJaO4VDB+sf142FB8J5uRw30X/dmcy5cfFyP701h
+ro9O/reb1L/PKXIdZVMKI42Y+ehf9OuuEs+fbMqeH1wVCwtS0yzrR9hUQlui
+ZhXMeByUUQuLxQbh1jZ4H3mv7rphf9ibEWkoLE95/mY86jGLtv64Byvfzz9i
+gfMSIg6nqGHR6YNWJTAzp7xp1hzUc7mZJkJ/F0IejV0OC2JUE1jo/5VDUqcA
+zmHlnu2AI7smeAUSvz3Xvx95FYrM0rWw/EoCRwU7DvVmu8LKc/QHNpiP7jXn
+yVZzyP+p8gV2sLhqTEOfDbl/p6NGybz6PY0ewcxkh/BkuOG1lJNI+s8O2fYZ
+53l02f9nHVycuPzGOJhWev/TXFh4b0bMMMmjspmkTfarV9ekI29nps6+bnI/
++Zm1ZphPTvar3z6S+f34YhM3xKZEhyPyP8PFisp3Qz/YlOAi994Pcn8SgtzO
+fGNTuvO89c1JvSPSzOh+NlXc1nGHR84333r5Zi+bGjCd1xNP5mdXHMDvYVPB
+BSm8lzCVsCX0aRfqmR57TEdekaC5rk7FpvJOaf3cBlPBi9e/gyPNdYIK4eJL
+e04WYb88dnqQ9lycl54bz0Q9ywqLU3xYkNvl54nzcl6+VSUSl4ikV/rQz/L4
+jgcwVT61e9IA+rmqvtMCF1d9yziJ/qXhzou+kXrcjoe939GP5x/LBsl+hs1H
+uppNUW/WbeuCGZYZf/bDyqQezRqY01w+HDLIpvxMfZxuwaL6uwuj4U/uPi8O
+kfP1Gj8awIqPq9q9yXq0md5cPO837rsZg6yvUHnW4DxW9/VeFfI13x9OmoB+
+1AFfh4pJXqdPHj/Rf4P3DmE6Wa+oePc38s4JPWARR9Z1lL5OnXg+JWl6BMxZ
+MNJn2Ao/UdOiyfz2Hjup8QH3Wa3emkBcfbzu0Fs2JctNM7tO5q1pmKhfyaZo
+1jzjJrKee+Bg6zM29fRYvsSC5DedvuXTbTZ1IVY+cQOxKMShKB3z676af52Y
+fHLuUwzybcv5P/BL/e8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.558531590841939, 14.870172348677091}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtQVFUYB/CjxCs0XgstCQQFMYMM7BCFuNk94IJsCK6LpCAgEAKNIkRB
+SMQQbxNymwgZQdxgNXXAthIkQHkaODnbEkQbIW2Asi7IW95h/6vtzO6d35x7
+vvN9/71z7WOSxEc3E0L248ten/2YUPL0Y0mJtUX1OUtjmOeVl2lBiWZSNbGy
+lZKZivJfLOCuv5IKb2yhRMkXRPzGoeQjrqbgiBHWb/FjG2ADl+5UnecpEZmu
+xnfCykF7x3oDSto+8XVfhtcXPsvI16eEek6PilDPQ14alKtHidrwZc9u2OTK
+xokmXew3b9aK0Q+vP6TfHW77oXmfFr68q91q5jlKJFWLUzkvUlKpOsjMwiYd
+wrfMuHDiu8083M+zdg74Au7Pf6KSwdKB3PQpdl3WE0lx3sx7ko3tVpQc6GlI
+noej+O0JPvDYsTsXatGfXQhRu8FDk2JOGPqPErq+8xj7wxX7W7XsPF937iyD
+o5zjsvYZop5OZT0XbtH+Y5vJ2kqnJw/9ZQZWuybAUVUjG6Pof4H/U7ExTNb8
+Oykce89DnmLA5udx+SLmPzTgIy3D+dmCM/XWsMjFrSoP/dG0D1qusfn5rRYI
+2Xni3NpiYFGo9dKCDnLeI8jaBY9FuDPlmymRa5xsvFm/kMH33YQ8sjL1E+H+
+q0v2WwnO7zFavAmrI7NvbPzLEEm+xskV56niBKuidYYkn57rqod3NH479Moa
+Q3jVjrEB6Jcr41z6dJUh0pSG2jG4/G5gWjQssnhT/2PMq9ybs/s2a86oeBnW
+LLqmnsV+6UP9r44gH4Nt8aatqE9//7XoIswzOpxgs8GuC91uw8uniuwlTxgi
+V4tMW+CiqdbOk+hXmXzuw8/h8rCsVDPMIxm3Fb0Ob5F5Z+Sw87U7vdqC86j2
++HALbFd5vMQF7qrwFjQ+nT+vtwT9aqb35CWxHo99Q4v58jZqdEdQX9JRIN4L
+N9Yl9JjDPFVK1C3k01YX7fMS+pNr/8gXwrSYG3KdzaPwHv+xOfr7vmTCfIUh
+ymlXxc+w6upd08OLyNMpiLTDh4r80+rmGdLWTYdHYTLcq+c6yxByqb3ZBfXs
+JHMeK4+QF183poz9PxN6pfFahqhryftW6GfGP0yiGEc+I14NtbByTVkjeIDz
+GRnXD/O0LV0LVdyHI6yXBuGZt207IrCunh3QjWbzCL6f2If96u+kiwqYl/Rj
+EUF9k+LXuDbIj97pWL0yiX4GpX/6wtKgHeHF07i/iePsB2uaDvJ56NekUlHL
+3p/9aF4neQ7zHChtZeupxrk7j7LzGTmKI+HsSIfiBVhe1/xlH/rpmQhNN1xA
+PQevE55wuti49izWo2q2bypln+8l5UAF6kn8JtXz7PN4IXh0G86buR59LBqW
+69U5BE5hPrMCzgPkZ+cZti57iP36Z7pOwXJa7nZyDM9r1WmRGFbnaoe4wwyx
+My+03M3a2T8noA/r5//uDGfz/0Zg69aBvIPrhOfN/3/vpd98duXQ/wAMmub2
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.1922538386132735, 4.316769291093815}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 17.}, {13.500000000004775`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 17.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2HlcjNsfB/DRJqLGlEqLpn1KZVq0WKckoTItFDeptCpJQsrSYinaEIVk
+MLIVI6m46U5UUmG4YoT20iYjUSr5fc59/f5xXu/O85zz/X6fc87zDE3/7W6B
+YhQKxXkKhUJaCoP8Q2VRqKRVZFFEhVu/bCTO2mt8EPZSCM2rg1t//Dw3CJct
+XqLhNAv9+9JfrFJiUYQXnQs+wCJ714VpMPsBrTmaxqL4qtcElsAx3AMfafIs
+ClNYMb0K7rQ8ks0jdrbSIf3xNCuxVQosCmtp5iC5fyDquvM7uDVQ+70zrLxF
+UdNzNq6jvg/9hfnDg3IaqmC2kozCaZj1QztaHa3A/bSEHtp9wV3MzWg533Z0
+3cV1vOGt+ikw9cLl80thvhTnxHmY+SVU7DXm2cfWLc8m12eN5O+AR/11R0je
+8bHco1pwjqlnnCdMVy1634O4BUmh9lpkvF0WwqfEB9LaOzEule+fVwl73V2y
+gkvmMZKSe0dcWZgQCIuGdeqmYjz69oRsY5ip4m/qBksL9ltOIfc/bY69Byvv
++3i0Ey1lWeUrffx92LvidxO5z6w78SbJ5/Gw4WdYsOeeuSXiKN/5kzud1ONP
+Kr0aVpP0/baCjH9D3tcV9RNYCw/mkHhK1BmNcPkBDo88ZzbTftYaZbS3D3+O
+g3kTonW3YWs3j5tS5LncmTl9HKaabHuWC3Mmah1N5uD5qXMybfD3eHfv9Q4w
+JYc2+Q6mm68stoPZQbyJKLT0D/L6OmhZTXEXJVXQDvgVDuC6xfel/zoOi45d
+DLkIN9xKXEhRxXp5Gx/DggP4b2b6wSLX1ro3mDdy+bv0W6qkngvb/eBDa/6N
+a4Y5fX6nvyDuXIZ+/i84s9m3fj9xh9/wb1iQkWOpTOohVeH5BWYmOtEeow7C
+8d3360h/3rmugzCnYkr1WTL+9xsu60j/P0WdPjAva4/QHo7xquueS3zI+NNa
++M12m/fNiD/SbdPu3fC+pMK6KzDV4G1cKawsdSojCuY3ap+gYv6eG49S1pLr
+w+bYHoBDzq3ctZTkv1dPbwIeZk4stoMpPI76YeTnJL1G6A3Hj91Kkkc9ikNd
+LTJgeq7UrktwZIuUwXtY0PxA3oDUV3NGnA3ii1ROr+fC3CnSfYUkv9Xap+Rw
+ncTy/tXmahgvv0QvEOb+6SmohgVN3TaX4WTJ6KO+6ohf3SyvCg4Y0f86CbO8
+w73ryXObbvHy/FzsRwsJfgnJM/O6jpkGxhs56Z4MO2UNWT+CI9+2vCB5NLC3
+havR0b+SMdKLeC4HPn7MhunjGjsT4ceW511iYY7FzaxZcK21+JIcOHNBjcoF
+5BcRnGJ3E+YFJA0awsrTbufx4NbbMs181IfROa5cAPs+7fEKgNuVvo5cgCP9
+zzFV4KJB+aGj5PpRX99u1FfRXkYlHKbubWiuhy13bKpxIuOvNoprgIf2Ltht
+ROKJ2VnbA7uZ2hXPhEW/jijSMd4bB82hLuRHlbOPjST7IitKjeRL1WjreAuH
+mPp+5sICG67dWsQrse5TJgduFbkUvyHPa3TW9iJYVKpY4Yd8w0PlGz/AvNQT
+qSK4+/j9BFlSr8hCqzjUb+xo5smFJJ7Bs1Mn4JpHJUY7SDx3DpZuw3ONdhd0
+knpQU8aL6uEqVc2uEViwOWMNjTzXA0Ni9pqo90hOx1I4/PyndydhUbdwBhuW
+mP/iUxvMN9U9uwIem9ydaqKF8fwO5dLh5IKW3bthVmKObwfGP/SsKLgU9u0b
+WHUCduFPifsKRyb48Ezg6d9cLdS10T8QXsBHvPmD3zKWwZGbqj44wbGjDbLr
+YZFVicZ75HtT17zcl1zvf8ErDDaydTcmFrS7aE6DTRrDY9eR+7klaaWoX/v0
+6WZ2ME/2/NdYcs7EvHVgwPEmC7nr4dqL3aPTyPgfZb44wZ1fY/7uRXx0x6hG
+H1hnhr9yHZwZe1wvFab9teNkIcyuvxv6L0z5oJd8huRDSf9livmPFcgpHyX5
+ag3TyX6quiYjnQBzbLUddJEPMz2Xd5iMJxZJ58HD+5lfTsM8u54fS1GPXLYG
+rYj0K2g2k+ejoiXoeQ/z+7WnuqK+/CCLohkkv7b1v2rhwZ9x81fB7Dsr35lg
+370tyeWlkXq8jDxzAHZZL8EQwixxf5P78GqzdDs9HeR3UrdcAAfsvJq4C/bt
+ss8hzgtev+kJ3MoK8yHXlxwc95ypS9aHc3c8zGPP03WFedUME0sy38vT/6QS
+NzVavUc8k47ZCRUw84FEUwT8gh5h3QVn3qs5OoF8XqeZm1H0MF7tCDUZzi8c
+XiFH7Bjho0TOYVFaIw1myUsbk/pY55o/k4GZvQ/qPGFDwYdD4xiPfa1QSIP7
+7kkKO+DI2bazu1Dv1+Lne2pI//eNzFfk/cJon3MN5q+ULxDCetVc0RGYtVit
+fhwOsHv5I4Q4pizNBuN5nGzJWQtT1vs/Iudm66c4+SXkflqu1Djs7bVvrTlM
+VSzX2IN4h+nZAmKRzLexSfhhW9HlZWS8csspaWrkvX7b2ZPUZ36quyrq1XTB
+5GUs8aUoOS7sEFd87gbxsjOnNHFOCiykOO1kfM7BynT48aLTnjrI33f5WpvP
+cNklzzfhpF5Nz1L1cQ7Q1e2aHsD0NX7BznBJvPeotD76W4JueMJ2w8uuesJ8
+MYNdDuTclSnyvqJP9tMWY1XYv0PsUS+cmUYLFGJ8Rbd3lxkM5O8WVpkADzxT
+sfOB2R9cXqrCbt9+LExhkPeG2YtbiL8mq/HGdVhAb4uyghPXPTUth+N7e7lV
+5Dzg3KNUwcywMpsNMHOW/XM+zP98hDeGeimoZLy4B9PFlgyR906uV19hHoPs
+fwNlUt+lkik7k4gvmy7eQN7bO2sjAmCOU77Hevjj26Wq9iSej5vVt5P1ZFYj
+rgtnqjDlrsAWrW+400g+GjJBIvKeW7J/7TDJfxFngQfiEXGCZD/DvNKo43Vw
+weuxtA6Y0tqZ64J8BLObpfuJS9T+NMER/adtJmFWsmV3KOqxz0fKTZ3kn9gZ
+8gNWyDH4tZLMtyeoeg/qa1ivtnY/zFt0n9sPex1xH/n7v/qEGOnh3O1Jj2WI
+GSDew7xpa+DcNnalM+w1VWbaFrjbP8kvF+blRm3eBjcLQw73w4z05W2hMI2x
+8Yq1IfIqs5HYADdQ2KsS4OvFtKZFcKxyuM0TuMxLXkIBlqilH5qABWkSrKeI
+R6etOm/ePKw3r36fjbBRxKlda2E2zeBHN/Kp6GPGBMOUPtuWKNiiyYGzE46M
+SJ0iAQek1uyIhltP7BTnoD7HTLuGt8LMvfEzneCH5dSbXrBvnHHaDHLeMMNi
+lhHPYE3pQr0ZF3OyNWH+A/FX72C7zPZdU8j8O22Z3TBHvfl8G+KlvLaZRcX9
+bnNb0quIH63Q9YCDSjLvFcC8mYoDd+B4nPe5sCiiVaCB+DwKuB+zYKq/rsdF
++LX3Q5UcmB3NYBkgX+UAO2E+6R8s6Sol72Fp2bhKmKO3+I4W6mVhotX8GR7N
+bOsJhCfqAtznkPgLQj9ehnPEj9/ymEfO1yty78h3xdn+5TmwtOyuCArek+VR
+WXPa4ZwUzS3qcOfWqtb5RtgXJ5/0GMHnmKUaB+GegxbZJvCw5rE1z2GvtPpr
+WvDDrJ4uJWPsj7f8oWnwwFedc96wsoZbVxfmW/16q9dZY/I+V9tRBvc1N2xr
+gEezt/1IIuvhyuycYZi3PUubrK+igmiFWSY4V/fubqHCMwa9r2vC9LCCRTzy
+3ZFgzNWDmZduJa2EZTWOtNCJqzN+DqB++duj7pD7RRdvu1yFxzRb3o5hfGb+
+59BoWEpKNqoZZkekqG2Cf5aOfqqAKWxXqh9Mu8XPzYMFDZJ348n6Kd1mHU+u
+r07T/xuOn8nWDSL93EdbZDH/4D8+V91I/tYhFmQ/6RW3Fq6EMwvOhX+DpexO
+CRzI+I2M6YvJ/lm2wcAVTv5o9SoRtt/v6BoMl2Vcn1sHZxkXeqbAkTOP/JFF
+Pd3M1lWWkHrdpl9wIc9DNC99kMQzYuRzBC5I6rKfj3xrCxQli8nztDeV2EPq
+p61X1wgL+m7mPIEZUQ6RfbD/ZMoZ2nzye2ev+zf4SFrHLj84JMrjv/6+SXNe
+IcwXaQW8hXu+v/s0DMcH8gNL4M0SsqEqTMTzJdQqFX4ucm5aAMcXWNM2wjrL
+A2ScYFYFM5Wsj28ZzonecI+lQmwP8jMXCKcGw7XBG1/chjuohjfDYKr4890x
+8KdwhfKtsJe390JHeM8s91cBsDDsQQ6dXL//eelGJtkf8wvF4eUnF0Q4Ewdr
+GXWj3vX/hisvhVuZvCctcKiW9ZAxzJe5IvkDbhZ8ZM2FKZW9z2i4f3+Fiz0V
+lma+6rGC2fq5DEnYt8M/LgR2W5woGkf+tf82Z5P9dG6DBH0EVi5Y2NUBRxSX
+GvyGy8YPlRgg3z3cfeFTcX9ygqrhDnhbyCVrRVj5rOOaUvhW5rFGQ5JP2T8W
+v+BNtrkf7El8hUFmFviO6rynyN1C6unR1hoIH665wz4CR17YvioVtqfdb7wF
+lyUJR6/CA2YsqX9J/8b1VPJdZs8bvDRG6lFbsZYHu9nu36JpyqI4NmxXvkRc
+fV7OAaZkt4T8951X6ZQUDCtLi7/ygZuyGJWHYMFymu98WPtC70QuHL8qPpXE
+q3LtIfcOzDJYqsSHbRd9CC6HGX+d7T8MFx90WvgEbl1h9NsZtpD2XlcFX4+K
+0FUl6zdaagGfzGe1W0yE+ukeZp8sJfPlbBe+gOWvCjfegq0PGe15ACvZiueT
++a9niOnehaVUWddTYeaVgYwS+OjABHcfye/5hepn8DNab8s2OCavzawPnjq6
+IN0Ppq5yvamI+dW142u9TMnvW7koEt+QteQBD1jE7/Uk6zlIvzx0HYlPYbRO
+AKcIXkzzhr18j/1SQj0shcKzITDn8IwhUi++yIQaR/Id2lR9WYt8T7jMPUXm
+3zDzRit8P2eHBY+M196jpIjv3E0SqsmvSP2FQV9ZsF2gm/pPkv++jOTN8MBi
++ms1M9w/d0V9JByzribMHu6xnbYomthqztUwOPP+jYlQeFLPfckJmG1z6o0b
+HHDgnlQxPLr6kzoTnpq/bPg1XMvd81AcfqQpqfcFjjc3+/0S8ZWXOn+fYo78
+ZDjp2bBztcsQFZb+MstlE8nPcWxiDmwdR2PqwOuuPzBTNye/P/pVv5LzgDX5
+UwWOkat+RtZD1+WyAXly/4rBy+fhecn9g9Jw7c8HVxNgZfm7UuOYv2xyqUs0
+nMbX29xP8jsjdZhYrbLB6gOJXz86KxGuSxpprIfp1X66eXC17O9dFaT/ufLy
+GvhiV91ikq9jYEwQWZ8Zx1MNb8P8qqdHFyDeLRsnZQth1u0Ayxj4+6/hg3dh
+Ya/N/Qr4h3ry679hxve7KlKoz8oYplIDHOlwN2oN/DJYak47LBqTaTsO24QY
++v4m9bvU+bgKzmQvsiL1cByLeP4dDi89d48FC3beYSjhd0rhn7n8IGL9P4eM
+4em6JQbpMFtxg6ElXHojsPA+nNnxiGIKz58tMfUjHD/b6cRcWJr8v6XF/1sd
+1v8AcRBasw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.806386448142824, 5.191782494132622}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1gs0lFsbB/D3MJ0o5RqjC0OukcYlpHKmEopKfcotliRS49bnaFzSVJRQ
+CWmSOqWEwjdN1DDq4FDTRalUCE26iSEiuR7ff2ctZv3Ws9+9n//z7jWLTkD4
+ll0yFEUJ8Us+KRr5Y8Kifv0sZFG8yD9EG+C62gDdEV0WVdg1/dw5mN58SvED
+LF0T+0oCP7nlPlkNG70c+8AwxadraVUG7Gacd8IDbguR53vBE2OlM4/AcmMV
+lRowbaBqfh6spBC+6JkOi/JvqlUtg9Nkb54/DGe91pMI4d3/CFqt4KFDsbNv
+wozQ7pouBouyMpyquUDWCyj6ZdjBffwaF6ZiSsL84QnJww4fYrdZNGPi2ODP
+5rDtItGmUW2cW1PFmQbzJFUuFbDrp2lhLcjjXypkZ8JD9PZzfFiYb9FzDG7T
+O1B0Ana7MFJ3BrYSP5X9L5w8w/RhJew5eLc4gNTjggWDMP+O6WI/OH38g4EW
+zpe7kccNIuujEl87wZ5qmfLxZL6nS5lRcBS/Pu0inJaz0O8SzH5Dt2qAm2rK
+jz+E2+zieb+jX/5eTZleeP7OkhfOcNnADG85zIeZ0Hf6NJz13TlJEzaqLLTp
+gP375Qa0YGEOf9hkMYuK6KrJ1oDbVt4Z2g+LzdhysnBjgBf7b5gzdeXP96Q/
+7tKnU7CtU2TRLZhTcuCdtRnWaT6j4khdkdcUAJvKB3ovI/2knAo6DPf/9KE6
+kZ8T6N6ZBV/66ElfB1cfUzfPgZvb/8oo0WJRailbWzJgSegavTkwr/PcyEG4
+ix3om7SARX1k61rvJOsLHgbJwkbn9f9nDzMpl7rM+ehrX0a7GswS9GnZwZ4q
+B2O70G+6z3LN0XksKlf5mm8VLNnzYMkLWK072icTprLjC+rhJ2c3LoyAdx8P
+SCH19Ji92ltJ/b36rWF4vmiupwNcfSbksxn2L5yM9vkDHjkuHY2Gm9kti5xg
+/qHr0x7B/fGtZtthuYayi7ro12p7pEUC3OXfoBEHR6xj7yomHjeub4DpHL2g
+T7Cz0JBF8rsOjW42RB6q8X6BKyyd9/JtOMkfLm0Nh/vjMoOrSN5jgqI4mH58
+tfGMJbA+ZzwUnkgJc9wGFy7t+bIWZtitHLkAi5UlNbIw5ZpZ3AFHKP+pWoTz
+70fsVJnJRJ4F/FRbuFjWxlkHZsns6yhHnqjwxM3msO1Fe54+vGhZ7XM7sj67
++0sa5pMQEFa5EuY/uuM/MBeOEbmQutHsujue8Nz808rk+QifTwfFmug/bXq7
+Luw/R+fLWljB6nKlEtwV18x5RUfeVxmPf6I/+kDql1g4S8cm6jEs91YksYUZ
+L70d/4IZqj+kSvDuDUs1oolzknxl6STXMt4WuHHPLWdFeOROn7UNfMk7L8sC
+dlUdn9KHmbRgpT2wUOb6UQbMEc/LuQkrpOu8MCTnSc3daOiva/+CzSuImwSP
+t8Ni3/omXzJffqV/Oezm/DYjlcyTbRIgh7y8eKMldbCQFrHLDT68su2TDPJV
+exgeSYb7fNIVDWGJuuB0Mfyi6pPTBljI6tpWAZcyucZRZP4/rpSSuu2S+U45
+MKPW/WoSbHr57Ip7sDg0JMEBlqqc/LsD3s2bLupGP/TPNaVjZD8X239j4X0+
+OdrK5ng/iX7fR5AvmTknRAeWVEXMD4HdJgtNTEi9lrrWqIH9lSq3msFug9na
+S2FhEluP1IXhq+xz1VnU91cPGbowNRxxdibM/G27phpsO+rmlzyHRWm9TaHL
+wLz02/oasFGxmWcv+kkXpRSJ1PBcudTiDen/m10eB6bFKajVwHTGmqubYK3v
+R4OKyX2Z5j5rFaxQo5lI8vMMhqdc4MJso/w0Mr/w9tAwuKzV9MURuFl3HzMf
+Phq04w2XOGePmRQWO6xcnkju77XyNHv0UztsZnsSZq4J68qGHSY6Ky6S9Tf0
+z36Dh7Ws/crJ+sbE7tXI571WHPOcvD9LrahUuG3bqPZ3cn+zHB3r4BTZgcXq
+ZB6fe82+wqXfF3uuMCffDxVfh+HK/LFlO8l8P8o59cDpBYpBx+Hmu8qO9fBJ
+bu7+EjLf2W2MJJg7Xar7FFb658Q6U9jPod2hG5bjGXjdRX/7aJx+ygL3Iyq2
+fzm8p2EsRhkemdOeVoy8W+Q7EubBRipJW9Tgxsvsbi24+afBM44q8s0TDZN6
+s821O+9U0HfZgLEqnN41eGUjrNIn7zaNPN/v/OSRMosaS1gfOUjuS0bzI0/Y
+znOwvgPeLewMnFDC/CxLCsSkPlrmK4TZl/YcEsCFLYKtJ+FY3bh7F2DP8d7b
+CXDYrpyKVHJfopfyk2F7YX3xAZgx+Nr+OuyZx8uLIvdnyQVHCZyg/y4kEjZq
+6r1tgPMrWwdSSZ210FXEgT+/3uiYQOan9+9QI5xeLDp2EuZ81BMZI49CtcrA
+VXK+tYvfAXgkRNBSDYtbHNj3Ybt5Xh7vyf71lgNTcPRbpXW/8qvdEOhjXlE/
+CwJN4GTFxQFWsMEydcctcL+4sM4YHptU53Jgppp2Aw3OplmU5MKXtJhF9dhP
+mhbMvQt3eY/fC4VzrwibWmA+tTd3Cv1WTT2v7Id59YLmBDhQwzrxN0vkiQv7
++g35bYf8H8+Edy/d0esBW3ASOYqW5H3ldXAU8X0Wc7VWAeaPVDg5zmZRrZxp
+i2kwN618/cJZeM/lCoeGsT+3p3/HXAX0I2mt+whX++5stJrJohwblJc0wpIa
+dcvYGSyq09mDXglHbHY16JdH3W51zxWSrzhFJgeum4xUPQU3dgjKOHBTxzlp
+PFnf8FOQAl+VcRGEkf0YyxWfwO6G9pG7SD1zKN8a+7OLnoztIPWdUcG1cLaJ
+2dtAcp/PaAh3oR8D229byPNM2mDnHPSb9qjvPwlk3j0Xzj2AqcLfD2fBVKJh
+XDjycau22fBhxube8zLIv96LSiN5qnMnpu+HM6x/+A+Rfqd3L6uDy3Z4hc7F
+fNy8M7kfYPGh5g2rLEnemZsaYbmjNmeCYaW6wX3JMG1ye3sqLOkRmSnA/WW0
+5mKYmZ9s7Yfz6QYefg/J+3DtOXUE/X30up4ggasVv249gjwK0gfHBsj7ydMO
+DELegB3myhPk/PuTUmvM59c/3VY4j3zKsf4PMygizw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.683437538255017, 4.183048595699216}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1ws0VGsbB/ChQtE0IuXaiCSFSXLc7RBSLhWiVAjlVhJSuQwJfR1CHYnS
+FIlyS0glTSVHkkuHcklNfMe9zhRphM/3f09rtWb91vvu93mevz3bpux1dKeP
+MI1G68N/8knjz+GfLEX7io8YFkXzmHA5uFmOoilW/ma1H+Ya7HYMgifV9BmG
+cOqA0dlYeO7thJc0zArpfhwJu1/8dOuDNkUrE1vzYD8czUj6lgYzph9vUYfX
+W4q9toV5UVsNelBPP7ZNayHMumOz6xSc457ysVmLorVW165ZCI9UxNhfg8s+
+W/08vwL7UpZkhMGszh+xovCpSBNvVzi48Ec7ezlFsz14QLCFXF/Cl56VoWgT
+RmdWmsKOtHjrWJhzOFmPIufNTSsuhT/Uz7C2wVTjhRf3l1G0pCCJvH0wU2vd
+PT9Yo6qmg9QLfp2dpAe7jqm0pJHzc28L5OHwrZbHSsn+Ed27cvAqx/+cb4K5
+mpSpDtzNXDA+ANOiRq09YYUXXldmSL3E0z63YLGRmpvi2iTvXKdpcr2tw8ml
+MK1PRuYA+rO5Y/VxCTE1vLwJzvp9clKY5FmxyNcE84bsHnYexXkMlZaPxbDl
+M/+5BjLvU3e/FcjHQ87d7yqpZ/NkXQRcLdgV7gvzepxqG2DjAuNAdZhvcXWP
+CPLOv9g+0K9J0divteZpwa6Z1+uz4NTwuFwTeJHM/xQcYE7v1GpdeGbUWGYe
+zDjoEyMJmxsl9lWvR76ck6XvcP5ATUlOCMxm6VWdhXPMnpnowCyP4mhl2Pew
+W+jUOqyr0bmk/0veCfmvYBrd4J0W7F22qCsX5sTGXSzE/CmJKflJcJl+8mIV
+2DdR3yCCrIfsPcRBfqbmfJsQmGL+laUGD/HdlcLh1reTFo+kcf9qsLPiYBZ9
+XvABeGdRtnkGWTcPD5GFFUr6HUphxufGZyNSyGn97uevyfkH3HrbYT3NybBh
+mD8dbtIJy8iGGYhgHk70SfsJmM+J/HslzO9rD1+D80TaY47rkvlll6ofhWsT
+9KTMYcaG0ak/4YjEThNrkkdOULMm+rX9bFdP1jnFubPZcMnlgr83Em+fTFiM
+ed8lHLSQgx3Tjayi4KEW+tQP9MP0MNMYgJOumaf9Sfq/dcbfAvndke4XSiXz
+zs4+TIVNf3674UjyNqgObYRLct3kxYlTjtZ/If5u7fZMAz6S2SAg1wu1Hw+D
+GUeSMkbgwPf1V9bCrUy+yws4ujxk6tNarO+lDONhaiylMAsOHhU/og03G9Av
+7oU5LaMLGtAfv6zbXRUu29LTvQPe32q/Z1Id65SvVxvmZV9fHfUWbo3bG7MN
+Zimc2PaQrHsJ7F4ir5vy67rvwB5KFV8sYK1tik35MLN22LYJ+WeoTjsXwakv
+OSNeMDe63OoRzHXLeSQOuwhkpFvIebTHg6+WUjSl7t9Gh2D+Fb2a67CE6MMX
+C9Cfx9GjiSlw8BPPMBWYWzV7IQOuy5lpNiPz1tczHsBDf2QUu5L5ZtU2f4XL
+3dSkAmH+955DBuR+SS8yiiDXhw/8vAQzesdKT8Nsb52qGZhpP+UURuqphA0E
+YJ7f80dPeBPrHIrqhUf6HTpsYN4mS5ft5P5w+Ja96t/9e/zI8ypUbsz/O5mn
+0VuIjjzr7i3/Ny/etZgvu2E9myV5EcT3souTYav87Zo6ZL/UzctF5H6RGO8Z
+XIN+zarHy2G6nnhzNszMP0XnwE3NErqOMKsigAqFGztyDUSJ421GWHBkesHX
+52roZ52/byd5HnJNN5yF+fzmf4Jg+x3zsxxgWmR7zA/Mk26yKkAFTm2j5x2H
+n68djxOCeZxpuy/I42Psm50jq9GfX3rOIVj9xs7uXpjf2ls6SPJNCb3dAzNY
+n/aHwP4NG3r64FadX8sl4Jnkdp3vMHVYvKBakqLV2+5aJobzyyTlpU/DglmL
+vFWw497dJ51h1eqSFjOY4V44aQNLj40F7CP7Q99yyHrT42Kbk6R/4dTYU7Dc
+nnU2aXDr+eYblbBpXnZYLszyZSvNR33K6qtsCZn/l6G1F5xeNPOmlJxn7/Ly
+NdwpHnDuNkyt4L8ywnxyL68WXyL1r49QxXBgv7XECXJ9QaOIPPJpqvcctlcj
+z0eDlWxYbpujQIGc5zcw/J64L9KJzM95fG2XEvLWXZIZxoGZsWwhR1gtaiHT
+DU6VzAn1h49kbNhJJ3kdOqIaCAs8LLSfq6LeRZkLTrDl4stD4TDDsNFUFRae
+9MnXglmiknUfUM9LdTB4VAX5CdbfIv0khD6VK4WDuTsspGAxzzuap8l68auq
+TMzDea/e7QjzSuJzl8H+dv0jLBVS76PoBfLzGrGskSfuyBddBGuUF+hLkv3D
+2ZXnkW/jBNXFgD1cr/augI9sLL0rC3MMGtoqGaj3hOGuATN8S4x9YZm1yyw2
+w60rA36th23Ez51wJ+s2Tr/EYd79rL6TcOq5UI35sL6YsMtlsv9LSdAyOJzD
+zC0n9feNXzWFkxRWl78i+11PXIyC47KNM7vJeV7HtrTAFSaDd/thtrMvTxv9
+iThnZhBzLcrHs+CKqEGvLpKH0fXr4pjvsGpNQh1Zfy7zKhLOTBIdzoOpD68c
+hmF769a+U6SedprlduQVJxVvZE3Oj65TvAGH2FUxxYnn7R/sh/Nrbso2rML9
++W4kUBL5O+UJJmNglvb5veT3j9b3K091ibOu7FGF7zyRyx5Sxs9rz7isGMzd
+8vejazDTx9b5L/K8Yv4wdyF+tK8pEWY9ZG6Uhnm1/ix18jz16tvRxYSLropW
+o988qzjZ2zDHvTDRCF5v7lcQTWyn7vcA80fQLSo94LLhqEoW+b6lBiXawY4B
+R9KKkF/3wQUTlnAw64IIC/Z/UHLACmYblmfHLMH3cb3oS0eYa7baiEvH+4R0
+5FMvmFZoM6UOG3dIZp0i9S4eNHy6GM9PvxjPDLK/cAE7ATYU9Aruk/X3nRZs
+2HSJJKuNWG5m8C6cJ/mre5TMY5b8RATn0efHDglhXq6HgvLv8PPq6AhJmHO/
+5+4m9LPUgPPPCuKzcSemYcbjYLHlMPVjoYE/uZ/SO3iLYMYFsQM9ZB65oHkT
+ZP7u5MXbMX+fUlDgW5gl5raW5FPd13QuH251M3+7HPllPKnWO0byyRnP8IOF
+DWLKNxLnL8wrgJP0S9U+rUResXfG2uCIfvkAO7js3mfbfjiwLtmhSgnrb/wz
+emBBlJuGEkxlCcoewazSbvdziti/LTwxFm7vmFKdUUD9q5vEdOCxmbXBp2CG
+VAi9Bf2tcKy5J0rWJ4Ut3WFvTcvafHl8X59H/erFfPzjqcVuMPOyz6wr3FQV
+UacMU23ZtXnIJ77C79Ac3vu5ViuScpBnqI+ZzHeYttjXqRD5KyhkHhPATN7G
+wGYJzJN+aCsD1/MuWQjJwJkFWhV6MGfxmfcJ4ngfXfBZ8zDMDrKbXQ1HxrOe
+cGDuRNMfk4vQ58tyxQ+kflXlgyl46Kfyl2Xon9f40FML+73turq2wh6eG86m
+wcYZnNbjMNVzVk0J9QTDn9ekwjS2WPobuK44pj6bXP/f+bmX0a9HQqnlJbL/
+jaLccczTMBW1IALmiHvOOWNe3toxayuSl4WQiDzyUG//pjWHfmiXSs7HwxEb
+6dxcklflnmd9sIJreOcmMq92rsMG5Ou6ZJdsNfJgS2mfDSR2/vRaEw5W/hCV
+BhflpNRm4T07WDxgcw4s4V+kMA/mrvHpJOuB4crmAeTvpKf7XMj1DCnd5Pd4
+D2PLr+rSIt/HbC3W9uXk/edzJLk/XYM657/B73HugT+3hMGRVlkH98E88vcg
+5mkln8uo/wNkrgaE
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8279221571592412, 8.41091634100807}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 9.5}, {13.49999999999251, 9.5}}], 
+        PolygonBox[{{9.4, 9.5}, {10.6, 9.1}, {10.6, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.099654057937274, 10.345676968901149}, \
+{0, -1}], LineBox[{{6.5, 9.499999999997693}, {6.5, 16.49999999999251}}], 
+        PolygonBox[{{6.5, 13.6}, {6.9, 12.4}, {6.1, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 13.}, {-1, 0}], 
+        LineBox[{{13.5, 16.50000000000231}, {13.5, 9.499999999998607}}], 
+        PolygonBox[{{13.5, 12.4}, {13.1, 13.6}, {13.9, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 13.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 16.5}, {6.500000000002592, 16.5}}], 
+        PolygonBox[{{10.6, 16.5}, {9.4, 16.9}, {9.4, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{6.5, 9.5}], PointBox[{4., 5.5}], 
+         PointBox[{13.5, 16.5}], PointBox[{13.5, 9.5}], 
+         PointBox[{6.5, 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P1", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1Qk01GsfB/C/9Ga4dspwlGnRptzp0iUNM2ncpqgGqVeRaZEWarpkSzWh
+mm6WUZOmUOO2TUopKqLShhbdIWsh2iwZezV45f0+d85x5nzO8/x/z+/7+z9z
+TN64yytwDEVRV/FHvqnmUXzMOZQpwVQOpR7zWLUWlu8Juktcl/p6Uj6dQzF5
+H1oMyfrvGWGTYI5r704mzGjkeknNOFSMrl/Uelj0eCbXCuYtPuF9GpaoWLlP
+JnCoyNWfzzbB+YU0RTxc9pUbbDMN9V/kyjfBxTrvNsfAkaoNMQJYKrNTl8Mz
+bwzHRMG67ocSLa1Rn7Ms4Cosj91xezOs2EcX98Ii2Ubf8zC/snXxHziftjP8
+SzUs+Fwy/jzco6gWDsF1WlpGGuiftnH9a4PpHEqY8sPRFxa/vn1pPJyfu7fl
+AkzV6kbqwjQL7i9NcHzLSsk3PC/edevOKCxstxquhMvmdM0ch3kJSxIDL8Pq
+XqFVN9YlrRMH98Cyu67dBWQ/y4TpCjNDf08Kgi9o+F80gJuXXD40hP6Yiocf
+Wkje6uB/wuH8J+2/FsHqjvazLchnGmkemAkLmm3MF8GSimdPTsB8zeHRtPEc
+KmxPcK0UZsTvXjVoyqGqJHaCi+R5atr3ALi5+wjvGSx+P4FbY4I89CWX+mGh
+z/mnG2C+b2CpLckTalA/DpbcEiwNsyY5h0RlxhzKcGCh0yOS36SVqYBN4xcs
+MsZ8enbSH1yEdS2nlG+CtypaBQ/hAZdTbrdgZcmG8l6yf0kpawhWqFsEjqiv
+bH9z1nEG+nWbuzERFs71a9gO10XI+B1wumOTXjKsGNPrzEP/yh00/Qtk/8Ll
+tnI4PS7p6BWYKTgV+RWmrVBoymG6d8aUaZhH+sjwazGs3pJt5wbb9/kMB8KS
+aPfBZTB3/ewFTsQlS53s4Byb7Xk0uKw9zmcE9aiAa21VJM+zE8uyYMUB7d1/
+wzyJ1jUWzHd2rQmD60Zq9uajX5n/B/+VsKNcY2AKLM7SbLSHxc+9XGKRf1XB
+lJQZcFkA06rRCL+XtKkas2B+op7MCe7cZte2AG7ekXQ40xDznHbVZi2cM1nm
+Roctx4oaxDD1uDGLZ4CcIXO5T2HGeK6VVB/v/3rg/7TRv9KhtJoO52UsMlwD
+cw6ZXajXwzzOT7VWkHnVjzJqYMMN9CuDxM/oWTrY3+BmN5Y3E/2MMUoVwo67
+WC+SYeWXCslPuFNTo6Mc5vjFWV7B+Vud82tH4fx4J9k89Dc2zi5n6iz8fsuy
+wpNhfmG/lyPMyNpn2wqzygp3O8OS6zfNf0NeD+/nUjuYWeG8eDv89HaUiSVM
+9W8p+AvukRVrDKJ+cYFpZTLcNk9oQs6PDAn3j4AZp9+Hp8GKTNZTDhw22qcI
+ggX2JQYqnCc3/sydD4s3//NuPxxTvKNSCxZZKzcPoH/mkXbpB+SnoriKMuST
+uaxYX0Y8/K3pMOYTLzPbWkhcqUxl6eL+Gifa3/93v+ebHzp474tbol7Dwpon
+7iXayJXmS++Ge/48k51Hwzxbx1pOIvN8PFFVrsWhpum2P/eFJS9U2RbwtZDe
+u+fIPJceeSkfh35Lvbo64Z4YV9ommGubauiCefS8ndMqgCXOJgnJxLzyW6lw
+p3D180ZY6B6WMwIX7Szzt56Nepn8fQmoz3/f6rQJVipdJA7ohzX/aJ2UeMOK
++l7YQ1m1Jh82dPAPz0b/Ai9Gxiu4Z6JWqB/yDax2CaiAm80TjvbCect325TC
+cg3uW8EvmL/2S/8bZH1LQbIcVq/ZqJ8A85+lbLkC5xlvHAgg+5O7jCLgSOZB
+ji1MeTSG02De1A7hEMmTm1kYgPpiWR+jDOYbjZsdi36KHrrUnoGbjy/7EoF+
+BWs1qvf8m//8fncyv3tDbetg0X4fX23kD/O4yFsJGzZ4aT8ci/mPKnZ7kvtl
+f/x4tCZ+f3+xxm+Cc5qWKJaO4VDB+sf142FB8J5uRw30X/dmcy5cfFyP701h
+ro9O/reb1L/PKXIdZVMKI42Y+ehf9OuuEs+fbMqeH1wVCwtS0yzrR9hUQlui
+ZhXMeByUUQuLxQbh1jZ4H3mv7rphf9ibEWkoLE95/mY86jGLtv64Byvfzz9i
+gfMSIg6nqGHR6YNWJTAzp7xp1hzUc7mZJkJ/F0IejV0OC2JUE1jo/5VDUqcA
+zmHlnu2AI7smeAUSvz3Xvx95FYrM0rWw/EoCRwU7DvVmu8LKc/QHNpiP7jXn
+yVZzyP+p8gV2sLhqTEOfDbl/p6NGybz6PY0ewcxkh/BkuOG1lJNI+s8O2fYZ
+53l02f9nHVycuPzGOJhWev/TXFh4b0bMMMmjspmkTfarV9ekI29nps6+bnI/
++Zm1ZphPTvar3z6S+f34YhM3xKZEhyPyP8PFisp3Qz/YlOAi994Pcn8SgtzO
+fGNTuvO89c1JvSPSzOh+NlXc1nGHR84333r5Zi+bGjCd1xNP5mdXHMDvYVPB
+BSm8lzCVsCX0aRfqmR57TEdekaC5rk7FpvJOaf3cBlPBi9e/gyPNdYIK4eJL
+e04WYb88dnqQ9lycl54bz0Q9ywqLU3xYkNvl54nzcl6+VSUSl4ikV/rQz/L4
+jgcwVT61e9IA+rmqvtMCF1d9yziJ/qXhzou+kXrcjoe939GP5x/LBsl+hs1H
+uppNUW/WbeuCGZYZf/bDyqQezRqY01w+HDLIpvxMfZxuwaL6uwuj4U/uPi8O
+kfP1Gj8awIqPq9q9yXq0md5cPO837rsZg6yvUHnW4DxW9/VeFfI13x9OmoB+
+1AFfh4pJXqdPHj/Rf4P3DmE6Wa+oePc38s4JPWARR9Z1lL5OnXg+JWl6BMxZ
+MNJn2Ao/UdOiyfz2Hjup8QH3Wa3emkBcfbzu0Fs2JctNM7tO5q1pmKhfyaZo
+1jzjJrKee+Bg6zM29fRYvsSC5DedvuXTbTZ1IVY+cQOxKMShKB3z676af52Y
+fHLuUwzybcv5P/BL/e8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.558531590841939, 14.870172348677091}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtQVFUYB/CjxCs0XgstCQQFMYMM7BCFuNk94IJsCK6LpCAgEAKNIkRB
+SMQQbxNymwgZQdxgNXXAthIkQHkaODnbEkQbIW2Asi7IW95h/6vtzO6d35x7
+vvN9/71z7WOSxEc3E0L248ten/2YUPL0Y0mJtUX1OUtjmOeVl2lBiWZSNbGy
+lZKZivJfLOCuv5IKb2yhRMkXRPzGoeQjrqbgiBHWb/FjG2ADl+5UnecpEZmu
+xnfCykF7x3oDSto+8XVfhtcXPsvI16eEek6PilDPQ14alKtHidrwZc9u2OTK
+xokmXew3b9aK0Q+vP6TfHW77oXmfFr68q91q5jlKJFWLUzkvUlKpOsjMwiYd
+wrfMuHDiu8083M+zdg74Au7Pf6KSwdKB3PQpdl3WE0lx3sx7ko3tVpQc6GlI
+noej+O0JPvDYsTsXatGfXQhRu8FDk2JOGPqPErq+8xj7wxX7W7XsPF937iyD
+o5zjsvYZop5OZT0XbtH+Y5vJ2kqnJw/9ZQZWuybAUVUjG6Pof4H/U7ExTNb8
+Oykce89DnmLA5udx+SLmPzTgIy3D+dmCM/XWsMjFrSoP/dG0D1qusfn5rRYI
+2Xni3NpiYFGo9dKCDnLeI8jaBY9FuDPlmymRa5xsvFm/kMH33YQ8sjL1E+H+
+q0v2WwnO7zFavAmrI7NvbPzLEEm+xskV56niBKuidYYkn57rqod3NH479Moa
+Q3jVjrEB6Jcr41z6dJUh0pSG2jG4/G5gWjQssnhT/2PMq9ybs/s2a86oeBnW
+LLqmnsV+6UP9r44gH4Nt8aatqE9//7XoIswzOpxgs8GuC91uw8uniuwlTxgi
+V4tMW+CiqdbOk+hXmXzuw8/h8rCsVDPMIxm3Fb0Ob5F5Z+Sw87U7vdqC86j2
++HALbFd5vMQF7qrwFjQ+nT+vtwT9aqb35CWxHo99Q4v58jZqdEdQX9JRIN4L
+N9Yl9JjDPFVK1C3k01YX7fMS+pNr/8gXwrSYG3KdzaPwHv+xOfr7vmTCfIUh
+ymlXxc+w6upd08OLyNMpiLTDh4r80+rmGdLWTYdHYTLcq+c6yxByqb3ZBfXs
+JHMeK4+QF183poz9PxN6pfFahqhryftW6GfGP0yiGEc+I14NtbByTVkjeIDz
+GRnXD/O0LV0LVdyHI6yXBuGZt207IrCunh3QjWbzCL6f2If96u+kiwqYl/Rj
+EUF9k+LXuDbIj97pWL0yiX4GpX/6wtKgHeHF07i/iePsB2uaDvJ56NekUlHL
+3p/9aF4neQ7zHChtZeupxrk7j7LzGTmKI+HsSIfiBVhe1/xlH/rpmQhNN1xA
+PQevE55wuti49izWo2q2bypln+8l5UAF6kn8JtXz7PN4IXh0G86buR59LBqW
+69U5BE5hPrMCzgPkZ+cZti57iP36Z7pOwXJa7nZyDM9r1WmRGFbnaoe4wwyx
+My+03M3a2T8noA/r5//uDGfz/0Zg69aBvIPrhOfN/3/vpd98duXQ/wAMmub2
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.1922538386132735, 4.316769291093815}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 17.}, {13.500000000004775`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 17.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2HlcjNsfB/DRJqLGlEqLpn1KZVq0WKckoTItFDeptCpJQsrSYinaEIVk
+MLIVI6m46U5UUmG4YoT20iYjUSr5fc59/f5xXu/O85zz/X6fc87zDE3/7W6B
+YhQKxXkKhUJaCoP8Q2VRqKRVZFFEhVu/bCTO2mt8EPZSCM2rg1t//Dw3CJct
+XqLhNAv9+9JfrFJiUYQXnQs+wCJ714VpMPsBrTmaxqL4qtcElsAx3AMfafIs
+ClNYMb0K7rQ8ks0jdrbSIf3xNCuxVQosCmtp5iC5fyDquvM7uDVQ+70zrLxF
+UdNzNq6jvg/9hfnDg3IaqmC2kozCaZj1QztaHa3A/bSEHtp9wV3MzWg533Z0
+3cV1vOGt+ikw9cLl80thvhTnxHmY+SVU7DXm2cfWLc8m12eN5O+AR/11R0je
+8bHco1pwjqlnnCdMVy1634O4BUmh9lpkvF0WwqfEB9LaOzEule+fVwl73V2y
+gkvmMZKSe0dcWZgQCIuGdeqmYjz69oRsY5ip4m/qBksL9ltOIfc/bY69Byvv
++3i0Ey1lWeUrffx92LvidxO5z6w78SbJ5/Gw4WdYsOeeuSXiKN/5kzud1ONP
+Kr0aVpP0/baCjH9D3tcV9RNYCw/mkHhK1BmNcPkBDo88ZzbTftYaZbS3D3+O
+g3kTonW3YWs3j5tS5LncmTl9HKaabHuWC3Mmah1N5uD5qXMybfD3eHfv9Q4w
+JYc2+Q6mm68stoPZQbyJKLT0D/L6OmhZTXEXJVXQDvgVDuC6xfel/zoOi45d
+DLkIN9xKXEhRxXp5Gx/DggP4b2b6wSLX1ro3mDdy+bv0W6qkngvb/eBDa/6N
+a4Y5fX6nvyDuXIZ+/i84s9m3fj9xh9/wb1iQkWOpTOohVeH5BWYmOtEeow7C
+8d3360h/3rmugzCnYkr1WTL+9xsu60j/P0WdPjAva4/QHo7xquueS3zI+NNa
++M12m/fNiD/SbdPu3fC+pMK6KzDV4G1cKawsdSojCuY3ap+gYv6eG49S1pLr
+w+bYHoBDzq3ctZTkv1dPbwIeZk4stoMpPI76YeTnJL1G6A3Hj91Kkkc9ikNd
+LTJgeq7UrktwZIuUwXtY0PxA3oDUV3NGnA3ii1ROr+fC3CnSfYUkv9Xap+Rw
+ncTy/tXmahgvv0QvEOb+6SmohgVN3TaX4WTJ6KO+6ohf3SyvCg4Y0f86CbO8
+w73ryXObbvHy/FzsRwsJfgnJM/O6jpkGxhs56Z4MO2UNWT+CI9+2vCB5NLC3
+havR0b+SMdKLeC4HPn7MhunjGjsT4ceW511iYY7FzaxZcK21+JIcOHNBjcoF
+5BcRnGJ3E+YFJA0awsrTbufx4NbbMs181IfROa5cAPs+7fEKgNuVvo5cgCP9
+zzFV4KJB+aGj5PpRX99u1FfRXkYlHKbubWiuhy13bKpxIuOvNoprgIf2Ltht
+ROKJ2VnbA7uZ2hXPhEW/jijSMd4bB82hLuRHlbOPjST7IitKjeRL1WjreAuH
+mPp+5sICG67dWsQrse5TJgduFbkUvyHPa3TW9iJYVKpY4Yd8w0PlGz/AvNQT
+qSK4+/j9BFlSr8hCqzjUb+xo5smFJJ7Bs1Mn4JpHJUY7SDx3DpZuw3ONdhd0
+knpQU8aL6uEqVc2uEViwOWMNjTzXA0Ni9pqo90hOx1I4/PyndydhUbdwBhuW
+mP/iUxvMN9U9uwIem9ydaqKF8fwO5dLh5IKW3bthVmKObwfGP/SsKLgU9u0b
+WHUCduFPifsKRyb48Ezg6d9cLdS10T8QXsBHvPmD3zKWwZGbqj44wbGjDbLr
+YZFVicZ75HtT17zcl1zvf8ErDDaydTcmFrS7aE6DTRrDY9eR+7klaaWoX/v0
+6WZ2ME/2/NdYcs7EvHVgwPEmC7nr4dqL3aPTyPgfZb44wZ1fY/7uRXx0x6hG
+H1hnhr9yHZwZe1wvFab9teNkIcyuvxv6L0z5oJd8huRDSf9livmPFcgpHyX5
+ag3TyX6quiYjnQBzbLUddJEPMz2Xd5iMJxZJ58HD+5lfTsM8u54fS1GPXLYG
+rYj0K2g2k+ejoiXoeQ/z+7WnuqK+/CCLohkkv7b1v2rhwZ9x81fB7Dsr35lg
+370tyeWlkXq8jDxzAHZZL8EQwixxf5P78GqzdDs9HeR3UrdcAAfsvJq4C/bt
+ss8hzgtev+kJ3MoK8yHXlxwc95ypS9aHc3c8zGPP03WFedUME0sy38vT/6QS
+NzVavUc8k47ZCRUw84FEUwT8gh5h3QVn3qs5OoF8XqeZm1H0MF7tCDUZzi8c
+XiFH7Bjho0TOYVFaIw1myUsbk/pY55o/k4GZvQ/qPGFDwYdD4xiPfa1QSIP7
+7kkKO+DI2bazu1Dv1+Lne2pI//eNzFfk/cJon3MN5q+ULxDCetVc0RGYtVit
+fhwOsHv5I4Q4pizNBuN5nGzJWQtT1vs/Iudm66c4+SXkflqu1Djs7bVvrTlM
+VSzX2IN4h+nZAmKRzLexSfhhW9HlZWS8csspaWrkvX7b2ZPUZ36quyrq1XTB
+5GUs8aUoOS7sEFd87gbxsjOnNHFOCiykOO1kfM7BynT48aLTnjrI33f5WpvP
+cNklzzfhpF5Nz1L1cQ7Q1e2aHsD0NX7BznBJvPeotD76W4JueMJ2w8uuesJ8
+MYNdDuTclSnyvqJP9tMWY1XYv0PsUS+cmUYLFGJ8Rbd3lxkM5O8WVpkADzxT
+sfOB2R9cXqrCbt9+LExhkPeG2YtbiL8mq/HGdVhAb4uyghPXPTUth+N7e7lV
+5Dzg3KNUwcywMpsNMHOW/XM+zP98hDeGeimoZLy4B9PFlgyR906uV19hHoPs
+fwNlUt+lkik7k4gvmy7eQN7bO2sjAmCOU77Hevjj26Wq9iSej5vVt5P1ZFYj
+rgtnqjDlrsAWrW+400g+GjJBIvKeW7J/7TDJfxFngQfiEXGCZD/DvNKo43Vw
+weuxtA6Y0tqZ64J8BLObpfuJS9T+NMER/adtJmFWsmV3KOqxz0fKTZ3kn9gZ
+8gNWyDH4tZLMtyeoeg/qa1ivtnY/zFt0n9sPex1xH/n7v/qEGOnh3O1Jj2WI
+GSDew7xpa+DcNnalM+w1VWbaFrjbP8kvF+blRm3eBjcLQw73w4z05W2hMI2x
+8Yq1IfIqs5HYADdQ2KsS4OvFtKZFcKxyuM0TuMxLXkIBlqilH5qABWkSrKeI
+R6etOm/ePKw3r36fjbBRxKlda2E2zeBHN/Kp6GPGBMOUPtuWKNiiyYGzE46M
+SJ0iAQek1uyIhltP7BTnoD7HTLuGt8LMvfEzneCH5dSbXrBvnHHaDHLeMMNi
+lhHPYE3pQr0ZF3OyNWH+A/FX72C7zPZdU8j8O22Z3TBHvfl8G+KlvLaZRcX9
+bnNb0quIH63Q9YCDSjLvFcC8mYoDd+B4nPe5sCiiVaCB+DwKuB+zYKq/rsdF
++LX3Q5UcmB3NYBkgX+UAO2E+6R8s6Sol72Fp2bhKmKO3+I4W6mVhotX8GR7N
+bOsJhCfqAtznkPgLQj9ehnPEj9/ymEfO1yty78h3xdn+5TmwtOyuCArek+VR
+WXPa4ZwUzS3qcOfWqtb5RtgXJ5/0GMHnmKUaB+GegxbZJvCw5rE1z2GvtPpr
+WvDDrJ4uJWPsj7f8oWnwwFedc96wsoZbVxfmW/16q9dZY/I+V9tRBvc1N2xr
+gEezt/1IIuvhyuycYZi3PUubrK+igmiFWSY4V/fubqHCMwa9r2vC9LCCRTzy
+3ZFgzNWDmZduJa2EZTWOtNCJqzN+DqB++duj7pD7RRdvu1yFxzRb3o5hfGb+
+59BoWEpKNqoZZkekqG2Cf5aOfqqAKWxXqh9Mu8XPzYMFDZJ348n6Kd1mHU+u
+r07T/xuOn8nWDSL93EdbZDH/4D8+V91I/tYhFmQ/6RW3Fq6EMwvOhX+DpexO
+CRzI+I2M6YvJ/lm2wcAVTv5o9SoRtt/v6BoMl2Vcn1sHZxkXeqbAkTOP/JFF
+Pd3M1lWWkHrdpl9wIc9DNC99kMQzYuRzBC5I6rKfj3xrCxQli8nztDeV2EPq
+p61X1wgL+m7mPIEZUQ6RfbD/ZMoZ2nzye2ev+zf4SFrHLj84JMrjv/6+SXNe
+IcwXaQW8hXu+v/s0DMcH8gNL4M0SsqEqTMTzJdQqFX4ucm5aAMcXWNM2wjrL
+A2ScYFYFM5Wsj28ZzonecI+lQmwP8jMXCKcGw7XBG1/chjuohjfDYKr4890x
+8KdwhfKtsJe390JHeM8s91cBsDDsQQ6dXL//eelGJtkf8wvF4eUnF0Q4Ewdr
+GXWj3vX/hisvhVuZvCctcKiW9ZAxzJe5IvkDbhZ8ZM2FKZW9z2i4f3+Fiz0V
+lma+6rGC2fq5DEnYt8M/LgR2W5woGkf+tf82Z5P9dG6DBH0EVi5Y2NUBRxSX
+GvyGy8YPlRgg3z3cfeFTcX9ygqrhDnhbyCVrRVj5rOOaUvhW5rFGQ5JP2T8W
+v+BNtrkf7El8hUFmFviO6rynyN1C6unR1hoIH665wz4CR17YvioVtqfdb7wF
+lyUJR6/CA2YsqX9J/8b1VPJdZs8bvDRG6lFbsZYHu9nu36JpyqI4NmxXvkRc
+fV7OAaZkt4T8951X6ZQUDCtLi7/ygZuyGJWHYMFymu98WPtC70QuHL8qPpXE
+q3LtIfcOzDJYqsSHbRd9CC6HGX+d7T8MFx90WvgEbl1h9NsZtpD2XlcFX4+K
+0FUl6zdaagGfzGe1W0yE+ukeZp8sJfPlbBe+gOWvCjfegq0PGe15ACvZiueT
++a9niOnehaVUWddTYeaVgYwS+OjABHcfye/5hepn8DNab8s2OCavzawPnjq6
+IN0Ppq5yvamI+dW142u9TMnvW7koEt+QteQBD1jE7/Uk6zlIvzx0HYlPYbRO
+AKcIXkzzhr18j/1SQj0shcKzITDn8IwhUi++yIQaR/Id2lR9WYt8T7jMPUXm
+3zDzRit8P2eHBY+M196jpIjv3E0SqsmvSP2FQV9ZsF2gm/pPkv++jOTN8MBi
++ms1M9w/d0V9JByzribMHu6xnbYomthqztUwOPP+jYlQeFLPfckJmG1z6o0b
+HHDgnlQxPLr6kzoTnpq/bPg1XMvd81AcfqQpqfcFjjc3+/0S8ZWXOn+fYo78
+ZDjp2bBztcsQFZb+MstlE8nPcWxiDmwdR2PqwOuuPzBTNye/P/pVv5LzgDX5
+UwWOkat+RtZD1+WyAXly/4rBy+fhecn9g9Jw7c8HVxNgZfm7UuOYv2xyqUs0
+nMbX29xP8jsjdZhYrbLB6gOJXz86KxGuSxpprIfp1X66eXC17O9dFaT/ufLy
+GvhiV91ikq9jYEwQWZ8Zx1MNb8P8qqdHFyDeLRsnZQth1u0Ayxj4+6/hg3dh
+Ya/N/Qr4h3ry679hxve7KlKoz8oYplIDHOlwN2oN/DJYak47LBqTaTsO24QY
++v4m9bvU+bgKzmQvsiL1cByLeP4dDi89d48FC3beYSjhd0rhn7n8IGL9P4eM
+4em6JQbpMFtxg6ElXHojsPA+nNnxiGIKz58tMfUjHD/b6cRcWJr8v6XF/1sd
+1v8AcRBasw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.806386448142824, 5.191782494132622}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1gs0lFsbB/D3MJ0o5RqjC0OukcYlpHKmEopKfcotliRS49bnaFzSVJRQ
+CWmSOqWEwjdN1DDq4FDTRalUCE26iSEiuR7ff2ctZv3Ws9+9n//z7jWLTkD4
+ll0yFEUJ8Us+KRr5Y8Kifv0sZFG8yD9EG+C62gDdEV0WVdg1/dw5mN58SvED
+LF0T+0oCP7nlPlkNG70c+8AwxadraVUG7Gacd8IDbguR53vBE2OlM4/AcmMV
+lRowbaBqfh6spBC+6JkOi/JvqlUtg9Nkb54/DGe91pMI4d3/CFqt4KFDsbNv
+wozQ7pouBouyMpyquUDWCyj6ZdjBffwaF6ZiSsL84QnJww4fYrdZNGPi2ODP
+5rDtItGmUW2cW1PFmQbzJFUuFbDrp2lhLcjjXypkZ8JD9PZzfFiYb9FzDG7T
+O1B0Ana7MFJ3BrYSP5X9L5w8w/RhJew5eLc4gNTjggWDMP+O6WI/OH38g4EW
+zpe7kccNIuujEl87wZ5qmfLxZL6nS5lRcBS/Pu0inJaz0O8SzH5Dt2qAm2rK
+jz+E2+zieb+jX/5eTZleeP7OkhfOcNnADG85zIeZ0Hf6NJz13TlJEzaqLLTp
+gP375Qa0YGEOf9hkMYuK6KrJ1oDbVt4Z2g+LzdhysnBjgBf7b5gzdeXP96Q/
+7tKnU7CtU2TRLZhTcuCdtRnWaT6j4khdkdcUAJvKB3ovI/2knAo6DPf/9KE6
+kZ8T6N6ZBV/66ElfB1cfUzfPgZvb/8oo0WJRailbWzJgSegavTkwr/PcyEG4
+ix3om7SARX1k61rvJOsLHgbJwkbn9f9nDzMpl7rM+ehrX0a7GswS9GnZwZ4q
+B2O70G+6z3LN0XksKlf5mm8VLNnzYMkLWK072icTprLjC+rhJ2c3LoyAdx8P
+SCH19Ji92ltJ/b36rWF4vmiupwNcfSbksxn2L5yM9vkDHjkuHY2Gm9kti5xg
+/qHr0x7B/fGtZtthuYayi7ro12p7pEUC3OXfoBEHR6xj7yomHjeub4DpHL2g
+T7Cz0JBF8rsOjW42RB6q8X6BKyyd9/JtOMkfLm0Nh/vjMoOrSN5jgqI4mH58
+tfGMJbA+ZzwUnkgJc9wGFy7t+bIWZtitHLkAi5UlNbIw5ZpZ3AFHKP+pWoTz
+70fsVJnJRJ4F/FRbuFjWxlkHZsns6yhHnqjwxM3msO1Fe54+vGhZ7XM7sj67
++0sa5pMQEFa5EuY/uuM/MBeOEbmQutHsujue8Nz808rk+QifTwfFmug/bXq7
+Luw/R+fLWljB6nKlEtwV18x5RUfeVxmPf6I/+kDql1g4S8cm6jEs91YksYUZ
+L70d/4IZqj+kSvDuDUs1oolzknxl6STXMt4WuHHPLWdFeOROn7UNfMk7L8sC
+dlUdn9KHmbRgpT2wUOb6UQbMEc/LuQkrpOu8MCTnSc3daOiva/+CzSuImwSP
+t8Ni3/omXzJffqV/Oezm/DYjlcyTbRIgh7y8eKMldbCQFrHLDT68su2TDPJV
+exgeSYb7fNIVDWGJuuB0Mfyi6pPTBljI6tpWAZcyucZRZP4/rpSSuu2S+U45
+MKPW/WoSbHr57Ip7sDg0JMEBlqqc/LsD3s2bLupGP/TPNaVjZD8X239j4X0+
+OdrK5ng/iX7fR5AvmTknRAeWVEXMD4HdJgtNTEi9lrrWqIH9lSq3msFug9na
+S2FhEluP1IXhq+xz1VnU91cPGbowNRxxdibM/G27phpsO+rmlzyHRWm9TaHL
+wLz02/oasFGxmWcv+kkXpRSJ1PBcudTiDen/m10eB6bFKajVwHTGmqubYK3v
+R4OKyX2Z5j5rFaxQo5lI8vMMhqdc4MJso/w0Mr/w9tAwuKzV9MURuFl3HzMf
+Phq04w2XOGePmRQWO6xcnkju77XyNHv0UztsZnsSZq4J68qGHSY6Ky6S9Tf0
+z36Dh7Ws/crJ+sbE7tXI571WHPOcvD9LrahUuG3bqPZ3cn+zHB3r4BTZgcXq
+ZB6fe82+wqXfF3uuMCffDxVfh+HK/LFlO8l8P8o59cDpBYpBx+Hmu8qO9fBJ
+bu7+EjLf2W2MJJg7Xar7FFb658Q6U9jPod2hG5bjGXjdRX/7aJx+ygL3Iyq2
+fzm8p2EsRhkemdOeVoy8W+Q7EubBRipJW9Tgxsvsbi24+afBM44q8s0TDZN6
+s821O+9U0HfZgLEqnN41eGUjrNIn7zaNPN/v/OSRMosaS1gfOUjuS0bzI0/Y
+znOwvgPeLewMnFDC/CxLCsSkPlrmK4TZl/YcEsCFLYKtJ+FY3bh7F2DP8d7b
+CXDYrpyKVHJfopfyk2F7YX3xAZgx+Nr+OuyZx8uLIvdnyQVHCZyg/y4kEjZq
+6r1tgPMrWwdSSZ210FXEgT+/3uiYQOan9+9QI5xeLDp2EuZ81BMZI49CtcrA
+VXK+tYvfAXgkRNBSDYtbHNj3Ybt5Xh7vyf71lgNTcPRbpXW/8qvdEOhjXlE/
+CwJN4GTFxQFWsMEydcctcL+4sM4YHptU53Jgppp2Aw3OplmU5MKXtJhF9dhP
+mhbMvQt3eY/fC4VzrwibWmA+tTd3Cv1WTT2v7Id59YLmBDhQwzrxN0vkiQv7
++g35bYf8H8+Edy/d0esBW3ASOYqW5H3ldXAU8X0Wc7VWAeaPVDg5zmZRrZxp
+i2kwN618/cJZeM/lCoeGsT+3p3/HXAX0I2mt+whX++5stJrJohwblJc0wpIa
+dcvYGSyq09mDXglHbHY16JdH3W51zxWSrzhFJgeum4xUPQU3dgjKOHBTxzlp
+PFnf8FOQAl+VcRGEkf0YyxWfwO6G9pG7SD1zKN8a+7OLnoztIPWdUcG1cLaJ
+2dtAcp/PaAh3oR8D229byPNM2mDnHPSb9qjvPwlk3j0Xzj2AqcLfD2fBVKJh
+XDjycau22fBhxube8zLIv96LSiN5qnMnpu+HM6x/+A+Rfqd3L6uDy3Z4hc7F
+fNy8M7kfYPGh5g2rLEnemZsaYbmjNmeCYaW6wX3JMG1ye3sqLOkRmSnA/WW0
+5mKYmZ9s7Yfz6QYefg/J+3DtOXUE/X30up4ggasVv249gjwK0gfHBsj7ydMO
+DELegB3myhPk/PuTUmvM59c/3VY4j3zKsf4PMygizw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.683437538255017, 4.183048595699216}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1ws0VGsbB/ChQtE0IuXaiCSFSXLc7RBSLhWiVAjlVhJSuQwJfR1CHYnS
+FIlyS0glTSVHkkuHcklNfMe9zhRphM/3f09rtWb91vvu93mevz3bpux1dKeP
+MI1G68N/8knjz+GfLEX7io8YFkXzmHA5uFmOoilW/ma1H+Ya7HYMgifV9BmG
+cOqA0dlYeO7thJc0zArpfhwJu1/8dOuDNkUrE1vzYD8czUj6lgYzph9vUYfX
+W4q9toV5UVsNelBPP7ZNayHMumOz6xSc457ysVmLorVW165ZCI9UxNhfg8s+
+W/08vwL7UpZkhMGszh+xovCpSBNvVzi48Ec7ezlFsz14QLCFXF/Cl56VoWgT
+RmdWmsKOtHjrWJhzOFmPIufNTSsuhT/Uz7C2wVTjhRf3l1G0pCCJvH0wU2vd
+PT9Yo6qmg9QLfp2dpAe7jqm0pJHzc28L5OHwrZbHSsn+Ed27cvAqx/+cb4K5
+mpSpDtzNXDA+ANOiRq09YYUXXldmSL3E0z63YLGRmpvi2iTvXKdpcr2tw8ml
+MK1PRuYA+rO5Y/VxCTE1vLwJzvp9clKY5FmxyNcE84bsHnYexXkMlZaPxbDl
+M/+5BjLvU3e/FcjHQ87d7yqpZ/NkXQRcLdgV7gvzepxqG2DjAuNAdZhvcXWP
+CPLOv9g+0K9J0divteZpwa6Z1+uz4NTwuFwTeJHM/xQcYE7v1GpdeGbUWGYe
+zDjoEyMJmxsl9lWvR76ck6XvcP5ATUlOCMxm6VWdhXPMnpnowCyP4mhl2Pew
+W+jUOqyr0bmk/0veCfmvYBrd4J0W7F22qCsX5sTGXSzE/CmJKflJcJl+8mIV
+2DdR3yCCrIfsPcRBfqbmfJsQmGL+laUGD/HdlcLh1reTFo+kcf9qsLPiYBZ9
+XvABeGdRtnkGWTcPD5GFFUr6HUphxufGZyNSyGn97uevyfkH3HrbYT3NybBh
+mD8dbtIJy8iGGYhgHk70SfsJmM+J/HslzO9rD1+D80TaY47rkvlll6ofhWsT
+9KTMYcaG0ak/4YjEThNrkkdOULMm+rX9bFdP1jnFubPZcMnlgr83Em+fTFiM
+ed8lHLSQgx3Tjayi4KEW+tQP9MP0MNMYgJOumaf9Sfq/dcbfAvndke4XSiXz
+zs4+TIVNf3674UjyNqgObYRLct3kxYlTjtZ/If5u7fZMAz6S2SAg1wu1Hw+D
+GUeSMkbgwPf1V9bCrUy+yws4ujxk6tNarO+lDONhaiylMAsOHhU/og03G9Av
+7oU5LaMLGtAfv6zbXRUu29LTvQPe32q/Z1Id65SvVxvmZV9fHfUWbo3bG7MN
+Zimc2PaQrHsJ7F4ir5vy67rvwB5KFV8sYK1tik35MLN22LYJ+WeoTjsXwakv
+OSNeMDe63OoRzHXLeSQOuwhkpFvIebTHg6+WUjSl7t9Gh2D+Fb2a67CE6MMX
+C9Cfx9GjiSlw8BPPMBWYWzV7IQOuy5lpNiPz1tczHsBDf2QUu5L5ZtU2f4XL
+3dSkAmH+955DBuR+SS8yiiDXhw/8vAQzesdKT8Nsb52qGZhpP+UURuqphA0E
+YJ7f80dPeBPrHIrqhUf6HTpsYN4mS5ft5P5w+Ja96t/9e/zI8ypUbsz/O5mn
+0VuIjjzr7i3/Ny/etZgvu2E9myV5EcT3souTYav87Zo6ZL/UzctF5H6RGO8Z
+XIN+zarHy2G6nnhzNszMP0XnwE3NErqOMKsigAqFGztyDUSJ421GWHBkesHX
+52roZ52/byd5HnJNN5yF+fzmf4Jg+x3zsxxgWmR7zA/Mk26yKkAFTm2j5x2H
+n68djxOCeZxpuy/I42Psm50jq9GfX3rOIVj9xs7uXpjf2ls6SPJNCb3dAzNY
+n/aHwP4NG3r64FadX8sl4Jnkdp3vMHVYvKBakqLV2+5aJobzyyTlpU/DglmL
+vFWw497dJ51h1eqSFjOY4V44aQNLj40F7CP7Q99yyHrT42Kbk6R/4dTYU7Dc
+nnU2aXDr+eYblbBpXnZYLszyZSvNR33K6qtsCZn/l6G1F5xeNPOmlJxn7/Ly
+NdwpHnDuNkyt4L8ywnxyL68WXyL1r49QxXBgv7XECXJ9QaOIPPJpqvcctlcj
+z0eDlWxYbpujQIGc5zcw/J64L9KJzM95fG2XEvLWXZIZxoGZsWwhR1gtaiHT
+DU6VzAn1h49kbNhJJ3kdOqIaCAs8LLSfq6LeRZkLTrDl4stD4TDDsNFUFRae
+9MnXglmiknUfUM9LdTB4VAX5CdbfIv0khD6VK4WDuTsspGAxzzuap8l68auq
+TMzDea/e7QjzSuJzl8H+dv0jLBVS76PoBfLzGrGskSfuyBddBGuUF+hLkv3D
+2ZXnkW/jBNXFgD1cr/augI9sLL0rC3MMGtoqGaj3hOGuATN8S4x9YZm1yyw2
+w60rA36th23Ez51wJ+s2Tr/EYd79rL6TcOq5UI35sL6YsMtlsv9LSdAyOJzD
+zC0n9feNXzWFkxRWl78i+11PXIyC47KNM7vJeV7HtrTAFSaDd/thtrMvTxv9
+iThnZhBzLcrHs+CKqEGvLpKH0fXr4pjvsGpNQh1Zfy7zKhLOTBIdzoOpD68c
+hmF769a+U6SedprlduQVJxVvZE3Oj65TvAGH2FUxxYnn7R/sh/Nrbso2rML9
++W4kUBL5O+UJJmNglvb5veT3j9b3K091ibOu7FGF7zyRyx5Sxs9rz7isGMzd
+8vejazDTx9b5L/K8Yv4wdyF+tK8pEWY9ZG6Uhnm1/ix18jz16tvRxYSLropW
+o988qzjZ2zDHvTDRCF5v7lcQTWyn7vcA80fQLSo94LLhqEoW+b6lBiXawY4B
+R9KKkF/3wQUTlnAw64IIC/Z/UHLACmYblmfHLMH3cb3oS0eYa7baiEvH+4R0
+5FMvmFZoM6UOG3dIZp0i9S4eNHy6GM9PvxjPDLK/cAE7ATYU9Aruk/X3nRZs
+2HSJJKuNWG5m8C6cJ/mre5TMY5b8RATn0efHDglhXq6HgvLv8PPq6AhJmHO/
+5+4m9LPUgPPPCuKzcSemYcbjYLHlMPVjoYE/uZ/SO3iLYMYFsQM9ZB65oHkT
+ZP7u5MXbMX+fUlDgW5gl5raW5FPd13QuH251M3+7HPllPKnWO0byyRnP8IOF
+DWLKNxLnL8wrgJP0S9U+rUResXfG2uCIfvkAO7js3mfbfjiwLtmhSgnrb/wz
+emBBlJuGEkxlCcoewazSbvdziti/LTwxFm7vmFKdUUD9q5vEdOCxmbXBp2CG
+VAi9Bf2tcKy5J0rWJ4Ut3WFvTcvafHl8X59H/erFfPzjqcVuMPOyz6wr3FQV
+UacMU23ZtXnIJ77C79Ac3vu5ViuScpBnqI+ZzHeYttjXqRD5KyhkHhPATN7G
+wGYJzJN+aCsD1/MuWQjJwJkFWhV6MGfxmfcJ4ngfXfBZ8zDMDrKbXQ1HxrOe
+cGDuRNMfk4vQ58tyxQ+kflXlgyl46Kfyl2Xon9f40FML+73turq2wh6eG86m
+wcYZnNbjMNVzVk0J9QTDn9ekwjS2WPobuK44pj6bXP/f+bmX0a9HQqnlJbL/
+jaLccczTMBW1IALmiHvOOWNe3toxayuSl4WQiDzyUG//pjWHfmiXSs7HwxEb
+6dxcklflnmd9sIJreOcmMq92rsMG5Ou6ZJdsNfJgS2mfDSR2/vRaEw5W/hCV
+BhflpNRm4T07WDxgcw4s4V+kMA/mrvHpJOuB4crmAeTvpKf7XMj1DCnd5Pd4
+D2PLr+rSIt/HbC3W9uXk/edzJLk/XYM657/B73HugT+3hMGRVlkH98E88vcg
+5mkln8uo/wNkrgaE
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8279221571592412, 8.41091634100807}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 9.5}, {13.49999999999251, 9.5}}], 
+        PolygonBox[{{10.6, 9.5}, {9.4, 9.1}, {9.4, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.099654057937274, 10.345676968901149}, \
+{0, -1}], LineBox[{{6.5, 9.499999999997693}, {6.5, 16.49999999999251}}], 
+        PolygonBox[{{6.5, 12.4}, {6.9, 13.6}, {6.1, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 13.}, {-1, 0}], 
+        LineBox[{{13.5, 16.50000000000231}, {13.5, 9.499999999998607}}], 
+        PolygonBox[{{13.5, 13.6}, {13.1, 12.4}, {13.9, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 13.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 16.5}, {6.500000000002592, 16.5}}], 
+        PolygonBox[{{9.4, 16.5}, {10.6, 16.9}, {10.6, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{6.5, 9.5}], PointBox[{4., 5.5}], 
+         PointBox[{13.5, 16.5}], PointBox[{13.5, 9.5}], 
+         PointBox[{6.5, 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P2", " ", "N9"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781961599882307*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"f1786919-3769-4a36-9052-5d9e2a25ed15"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", "dB3", "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.78196160848985*^9, 3.781961622490263*^9}},
+ CellLabel->"In[41]:=",ExpressionUUID->"2cbc7209-ee9a-4f7f-8177-387ad319a3fc"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdief/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.781961611532447*^9, 3.7819616229840384`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"52db7e00-29b4-4ab1-a2ab-0e3ec66df1b8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdief/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.781961611532447*^9, 3.781961622987522*^9}},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"587f1187-8f59-48fd-8985-2c28578f2c58"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbg/chdief/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.781961611532447*^9, 3.7819616229920063`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"73cda055-f408-4da1-9a38-7e20ef334e8e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbg/chdieg/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.781961611532447*^9, 3.78196162299463*^9}},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"58aa7021-657d-4a96-9b12-72e7d2154a49"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.781961611532447*^9, 3.7819616229969482`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"44a98079-5d15-4ce0-a5a8-a022c9a4c828"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN//B/ArlQkxRdZElkEkZclWM0qaolASIVJKUhFpShgljeLTRAlF
+SklJaaWyp5CKUlGpRlmzjSVF6Ps6v59/7uPpfc495/0+9557mOuzd53vJIqi
+zEQoilyp/n/4MWBRNAI9FlXiu1FQAgvvdtp8mMeiun/WWx2EMzJXiOTPY3ET
+s9/KGcB+PmuzMxHfJnnikmA+iwqs5OumwWXTH+kmwqWHzrQhzt30wHJsJcxW
+yrqF/lS2Wbq9CEw72V/aAB/+XTm7TJ9F1S18/24Sxj+XVMOIhdXGZ+gs1mNx
+zc6/qd4EO7paJuyD43nCUVO4So5/4S7a721LsZhDfNs4bQhxrY/0U3RYp+7S
+OxN9FleUoR09ndxvTCQuGN6qu9xQFmYXGBjlwFM+hi7VIPE+kfBPuM6YZjZu
+hitVU875h3iKvHzQehJfevaawnwWN8Twqn8g6c/7J6mFPKTYyenxcMG6WnNN
+eKezekk2TFdqc5SDlZW3nS2BBV35U8ZwrXz2XbEO19IZ8Wc+4Fq+YeBEI648
+9ab71zDegzgVbgPM1VgfEwTbj90fqYEzlLccRN7c32s+7npAxl+w3HgE+c9M
+jKlIhBvbi/cXwuWxngE74Lwpr4aPwB8q5i5bCAtFou0dUJ82tTmnB/D7PwX/
+1Wjg+sjr46RcXF1v+O9B/bnnMgvifGDeqRMl3Vgfm5xNm2bBbEmHqh9wl+T5
+B5W48p6fntKB9U0rsu0Jgzkp1j4jsHtBiqUxrBBuZyaPfjriGbkDuhhP+vlG
+Fu5fln1C8hGsFkyXDUb8UsNANQ8281jvQuaR5NzW5wPTis7d70b7zviAWWzY
+9XFwnAHyOBwv6moG86W01cg6BNl4bDKCC5Ra799CfdbUbmWTeMfAeF474vse
+BghWkP6LUgqwflRy+syoTbA361klE+54sNQyBGZbPmG7w+vuH2vnw4a3t2j5
+Y7399g4uuQULntrX74ID7Jf0VcN+vvlu3jA/fEVxM+wYYuTERv+bMe+TB8l4
+AbJfyPPgoht5axym631J/435tZtei54g+V2wvFKO+R0caZr6C+aYuDnyYKvs
+6gQBccUhazu0v9ho9K8UTv4w01gKcZpudVoSqdeamJZ61CdBNHUxqVfg3H5h
+Oupn2797shassMe8MAjx/cMOaQId1JuTt34t4p2e7T+TYN4SX1dTePtPL/pq
+OJut0TMP7W0SX6wf00Z/Qct1fcQ9p45NzoMb/ZaftUR8x+DE1h0wjWeguRHx
+tiZjnibsqtPDjEC86JLZqk4G2v/WWncb1tx/ZF4+rMD2d+lAe9/tt1afgmnr
+ooQM5Bezes7GfbCfR3iMH/I7fTIy2hsO3HPI8wZsY3I8zg3mN1bld6L9+u6x
+PA/S3sJ0UAP1z3o58NQPNgxgZLmg3rfFao0PwwUtFo8jEe8YSpp7lrS38jma
+hnj61sJdd2CWntPbW3Dd1uO1r8l8JVJE7sEbRZXGf8K87TVj1+GHvSN3RJEf
+75679Rncbx5j6ls5mJ5k8nEf4mWbn0Wowx1rljtgn+MufC+hrwWXSmxNl4ED
+L8neUYF17I4rY3/h6qc5bZCAHR8Puqchv0sLtzX2YLy8hfcUvBGXv90W8ozM
+fzSKroX4Lon2LwlwciWnsxf1Gw0zWLyRxE9WypSivlaCGzRZWFDw9FYqvOdt
+9PwaLbzvRcFBXPiFRlpJBFyqfP4c2T8ddjtTC2H6FYV35Pngh6UxWzQxn8z5
+q7B+1IDznvJUmOcmevwc4kZXb1x3gbOVI/lkf6GU0z4pkvZ3FrR1If71r+jP
+Vg3cT/ZzEtlHqzKSxQvhgohfzluQz9XBt/8uwMkhsvzLcMCMsFmxsJqfzekW
+tG8d9Z3Nhdl1YinkfZEWiwqIgqsM7497wUdmz+o+Se53/gub1J+S71dOJ+Pd
+ObmuBHH3a0PaD2HuRQm3byReZvP3DUzNcZUdRNzKY/XGPpijaF0xAi+/Gt4t
+gfl71z00I3Hnnq5gLZj/qqke/SmJws1V5rDw46tjpXDkfqkJW7gxg1mehPu3
+SH4+YAdzfDmB2xBviFAbWUH8ZeUHPcTfqPncM4HzvLoi+sh6Zpg4KMF1twfm
+3IUHu8SFg2S+n9xDQ5G/78+sRU9hlqfhIia8cssWBqlPxubB1+R9v+sbaL0S
+FjzXDm9HvR94ljv+U8f7NqQyrQZe+1Vh2z2Yx5etfEy+h0tY+b4wfxkvOh/x
+nBKvFAW4Ltc5sozEg4PXv54LN9K2NiK+SlVcOhZmR8XZ/0X8QMnm4tUwndZb
+r4PxpcbeT50FNx7tVvbC/MMjXhl0qsGqCW3nEX9jESNdRTw0mttE9jPTZxJ3
+4bpA09I5qI/e3ASJa7COqrQnWU9u0LLwLJh9f++786hXl/wz99twNm/WlTfw
+i88d5qUwK5idOIH2Qq7augbYW+Bbo4ZzR6+bXOoAzFMx7DY1YHHnDJh+lMb8
+uKkiyizEd7WZl+nDpQ5WklawpXKq2EqSn2r8VD34N7MlwgMu0Pn2bTr6D/pU
+GOyC/zxUG2rFeNVa1TuDSPscptwD8v126/62G3bUEj0cDpfYyeZ6wbQfGVet
+4aoDPT62cNWI8rLJmP/NsNvT1WGeXPqMKtQjwDPZaBDzpTfMrDwFc/w1ah+T
+es3Y8NMTrrC1tDlE8s1aXGgMBy/96mgEc3+nq8jBU0sKB2tVsf6exYdEYW1F
+zU5jWKjk9WQc68VybZidOgf1y/tqNgXxl58ltSfDecvXP1Yk56Z9R/0PqGA9
+7lAHLOBXQbSW37ORv56o6nZYcbvvBA/WCa3tTIUlai8EzIep4I7r5HwS6iUv
+2a6M+lDCFnKemWEqUfcQzlad1ucKrzWj8i/AyVc9aKlwb3HLi3MwtfZQWAN5
+fwfz9LJIPMj2iRTqnxKnrvkMZr/QjVwC5y7MWdkP83vtmrbAboG2yQyM3/Gz
+bNMh2Fbl7F1v2FCuckoMHCWycSIV5tPWhEbD3Ed6zXWwmuKehv1w+13//nGY
+vfJ0yybY37yZMQf5s+Scm43h5iIPMQOYn5p4cooBeS9mvZoHs1sMaLWYr92V
+dcdmwoZGG2vIOdbLoV+rBfcTxASHk+9LQGlb8kWYM1L+RRHW919ctIKMbz/p
+igD1WuPh7tlI8hPb5pNLzifqHOVNcB5de+cROG7uaufXSng+K6bkbiH7+4GJ
+ETOYbp58xx5+/ficX7oi1vdGMseGnEevl5iIwoEaT0NXkfaXlSZ2KWA8j5r/
+3Mn5JmHNoi/y2C8uZsw8BGs4/WzdBHMz+19kwvGHt1zukMPzZpU2mZwrf+t2
+M2PhDHZY5gzMf9lFledL4TqpW+ZOcKsdZ4M4zHY8pE7yj9g5rtQ9C/1Z4Rff
+wdp01tofsHfS+PBM1K/Hnm7RCzvm0hLsYIMcTwfS309GWvEwfFoQaW0MVwVV
+xF+Gn2TenOcHB8ppbSmCqbti+Zfg7KHc6Br4o0eQcxNMiUwLfQm7C0R9ZZCP
+kJZrUwqfZc/ctwxm9S46fQ3+ZxTq6QuzM3bEHIULd0ie4sA6DjteboCttfxn
+H4SzFziGkv2juU62cxvM+erSRd533Y6GIgtSrzDzl9mwluJil1GM711g+gHn
+Peqzy46tV2BOUnXFQpjjlBttAess4RiNo55ZX0NMSkg9+KJR5Fz/Prbtjgks
+FDV9QNZ//jPd+kuyqI9lsH8SbBbxtUVMlrSnCk/Cj1Wv7A+QwfrvemH+H6wk
+9kTz3Uys77X538n5QO9Cz57lsHfxNPXHcM/m4cPFM1CfLqXPzbB8/vFfbNh1
+YkMgzhvUB/GBd6101NuyqMGenF8cGPbn4DqxzryT8InLUdmbYfZyO69X8Hzx
+3Sus4IIJcW1p1IeTu5e3AHbkm9uthU0WfW03hf8sldHnwfNTmv46wH4rx7c+
+htNFhpMPwKVj1Pfv8PC4xuB1WMi/SFELMC+b8srvMD1kUjId9rS+GKeC+fIP
+lojLwnITcy9vgAVvMu3FYU6je0wMrPPJ4scg7mcV/3bqTeI+ccEb2HTelz3l
+sLCp8t1V+I7VmbznMM9kvCwIfr74dMxDOLuvjzKDK61p8XyYFZuj+xf5jpYz
+nJxhP2u34SJ4kbukyyTSfkxF6yj8NoEhfYHkW1LjtgY+81m/ToPU68YDShXe
+Zvlpu7k08vrSYTSK+kveoPXJSuF+bgOZ5P0PPPY357sk+qctOlYPf51ucz1H
+AvvZifgjxIVNQ4yD4jgPF017SNrf/OZj5DwN35O/edfI/YR/JVauoOE+s4vX
+qZHzS+tw23ox/F7tm6Ej/Of3OaeYqRhPKGXHg4vl35o3T8Hzu9ve4TksO1cq
+cQfsWrT0hhjylxLPClSCWfY5mavgoYvio38mI5+/Rw7HwhYhWiEU4rzNFvEV
+8MzqeC992LBaZesfONTC+kYonLfA87M61sfl6aOBBthM76rFMmK7sI8rMR9h
+LIu1AU59kehZBNON+ozc4buX6awFmL9f4see9fDscFX/M3BHDbuRCf/JCXZq
+gV2v0LtU4YoVF1zkkb/Zty8ZvzB+dIu5ojbM+vu1rRxetnlfsRTsWhUmdgL2
+MExm1KB/ad3U02vgOL/70u5wozTXnA6XuoRolGA+ai0ZpWT/8nn5rW8E86d0
+Dr8hfw88bGLUSMMdcpNad8MtlkWZU1EfmiCXQf5v0bixvrh1Eq49JzxwvqNM
+Myi/ByJ4vyadr1eGJyqSzkZQqFfHfifyPYiW0ZY4O8GkFG6WSZDzbEFj/y2b
+MSYlLG++akmen/tda1VGmZRa9rAxOQ+FnArdbPCHSWWUiqyOh+OGjJujh5mU
+mWuRSAXZb56bf573C+2jDiqKIB/9897fGUNMqlRLnrYM1nl25n3YIJOqU52u
+RL6H0Tk6RTqwY5r1KbKeGYnJ74l5v3Y/Iu8ju35pRTBsxihSNIULtfMGx+Hk
+as/DPrDCrjKZR7i/YFIDPRo2LruVfwbjc+7KRKTAwld8iUjMj3vJtv8SfHOJ
+fYrvbyZVtURUOw3WLAmXNUU+Qg5jz0n4/rpkzW9w4/W9V3bDdamRmk4jqM94
+r/4KmHroXhsBC2TuCWTgqrZF9Z5w4/Dm0c8GZJ1/LWtH/9Ly2PGLcIDLjB/y
+MDX5T6oPTH9pukaI+TSeaE5gwGrRNZ0hmG+GelxSL+r3kmFbkov8dKadnEfe
+d276KcWsfibl+qfrxBnyPu0MUmrsRX2cjyWEkvNcbU2+6k8m1REdmkXO99ln
+HaNsW9FerSiLrFd2p4RrkADj7Ypt2QGzLK8KYhuYFH120RxyPuQyjIT8VxhP
+6Ul0OnHGjeUHnjApP8OdJS/g//u5XvT//28zYP0PCMornA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.191470063271683, 16.391592056605244}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Q0wlHkcB/C/FVZRK+8Sq3C1TSG1KtY+OtFpxmx0uutlW9UWbuu2ay4n
+JclRIpvr6BR2epHrVHvyUg3NcuFovR293Cq0h/LWLsnLiO77NNMzY5757PP8
+f//v7/c3u067vw8RMwghYvzRdzLzEZc5RT5d8ylSIjXh/gzH52xWFJpRxG2p
+x5lpfN7cULT6IBywkjsqgeVfOxwIhMXmJa3PcJdPR7itw13i71m6Hnf2uUkf
++nlQgjWniIV6nNOf1ldZy89yYPZ9/uVbMFNCbu6aRxHlgPkbBupK48Q9KXMp
+4r77Yl4UnGha7f3CFPtPup7ogu21xse3wsSl6MYu5OxK6iicMaGI4D3VpoEL
+yzIHW2B3Sd0vey0oMnq3PqYJljUMJXbC+UcVle9glp3p+WBLityzE55eS9fb
+6+B8C357zH9RNqwkI8JxWNQdVWGKPFKPP/04VhRxHQ4oOwvr9OtVX8L1Tqem
+ZiO/dFOHFW3u9mv7E2C5TXXYEvr9xq/c+mBqxP3VKOo9tBHmLkD/slQLuz/g
+sta2RythauW+bXSegWw21wvW5YU/1iBvgPZOvyvcFd6+5gDdT2jGQwKT5uwX
+I+i3KlXvw2nUj9/zwTkGZoyuaupBPoVhSIwB7Gobs3EBPc++9JnLmN9F1qXI
+FehP4NMi9IefViTfcsE8dIudMj/iPLieSyuZc9BPxIOaFjjJ1smtyxj1z+Va
+VcC7r0zrlTCxv3gmqwpuy9GKZEY4H340TwP3mm1YFmuI9db5ajvULxJOZh43
+wHOv2R70ee6wTnmaOwvz7fyd2UDvn6Ot69bHPPSjQvnIy65a+DAUZmkufFsO
+rzjSzHvLQP8b8od80f8Fv5vvi2F5svP1Sjgo/ElhPqycY2XBx/xKbaJDlDAl
+SWIWwWpTkeM0zBpL+8sS5+F7MKk+DPUFFyOX74P7XzIbq+n9CvYz5PDEskf3
+/ZCPyi4fU8IfQofTK2Hd1dKmWljS1/qFD91Ps/ehYrixxjejAJalz3Qkw1um
+5LEzsDx6u4c//IgRkczFPFg7t8UNWtL1G+RBMDXQWJYIF3Rn8ejnJMQk3gyu
+mTuRPob17rONxrPQH+P8luspMLtjfsJCeN/wA+k75FHk5ctuYD5WI7FKT5it
+uiPyhjUVYkcBPc8gg+qXmK+70+CVYPSvCDyky6DPf0hUwNVDnt6sQCEc4G+b
+yCKYH6fEez1caKXdVD/NJ8oTj90o2L8p7WDsFJ+IoiMjv4HbmniSgEnY8bZp
+Cqx7st7FZ5xP2AWFnFb4TZv82nfv+YQs+1vljjxbEgaPvnqH99X2jnnwrJ6t
+q26M8IkuJuNXW/RT3NKjrRrmE8VAncMlWDHhZ+8Fi8SV2x0wD0G//U4GrKRU
+6hzYuXF5tiP9vi4s1II+jykPryQ43uh15zF6/kPxP3BQnypXe7bChQbOvdOw
+clF2vbk1/v/Ur110yCPYvGquD/z8cd5h7Sjeb1ceDoILfDUn+5BfGhyc6kv7
+vx4f1Rgf329XjW3hNbU9siT0SzRXSttRv5ib5mI8gbyc3/acgY8J9xoGwlIv
+Ua0LbHHA0IMLk9qssBLk35jG1G/GeunZivk8WPKjOsEMVv6zNrQK/U8UxcVP
+YX9WQHlKEKx7rkjNoPNFSOa0Y347lM9qOuj5HYlT/QRfE/eeGtAh34rbnkvg
+e+vGr6YN4TlvrHsQ59F1Ymm5Xh/6VWVm18Gyk5rEsG6cF7XISEl/jw/YWIZ3
+Yp5b/61qhgWr11IRT/lEJl68YYpeX5tLzVPBkqh+Hv078UxsMn4fee7aGWZ+
+/t34fFlQ/wOCa1H0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.3457692355174515, 3.812492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999909, 17.}, {4.999999999998181, 11.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.899390194486315, 16.096286839465897}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lGkbB/AXxWxJs9aGlBAaERM6WfKykihrsNvk1Cw6sJRTZRmFVWtT
+OSTksI0R0XHCJ1ttjWNEIiXRYYS0hZRjNbL/5/s+18Vcv+t55n7u++9557pG
+23ev6w5ZiqJq8EteKUXyh0VT//1Rpim+1qzgb+GQUPbqZNg9db/2ajjl1iRL
+9Rua2m1gnfwzzFNkO5+Es9Y7VmSQdQ/N0zNwSv1yk4dk/erBQq4KTal4K1io
+GcC6ad05MMPTrI0HjyheSbpDrHz51gViQ2OqG+YFF5RNwJL+8YQOmP9hlGe9
+HHVd3PxvwH1Wt5N/g9n5tk+SYDuNwbVVsNZ05aQj7G9cnj0B04zBJCn6Kfd0
+dtIxpCmx1+j7s7DD/fcbv4ddfEIHHOCHfmkzXJj3PXvbEOZNP93H9SPrck3G
+mXDDnoAyX5iOOrHACe7UOdC7lfjwTbd5cKxKgIEdPOJnk9rzNfrmuOsakPM2
+37x+FzYfvydmkP1dkc+IFTWidPvRHy9PqNxL9vtbZorJfPrZ4d+gnpGhNDCP
+9L91QM0Tjrwy/TIGdjF4uLQS1lreoeEPh8xxfLAM/ddafRrjwCMzmrlFsMve
+R1IHkkdeDpeNPCIC1vMcST3+hUAxLNCfevYTzJTrfc/5Fn2o1t3aQ+o3cr68
+gCPEvAepMMX4XLtjAU2xWLGht0l/AfUPnsNjvTUJJF+XoqbvNqrSVNAwJ2UV
+5hO9l6nLgTc/yamJgtl3M+W74Cl+iWIt8e3Dhyk1mjrWudB4vhH2K2yuUYIl
+kxMd22DBdrPvZ8PcXMcb+XCs3ZOEfry/uTvlYh+ckmszdhW+aP1SpLUC+W5V
+bQ0mVhlTdYcFTGOFxaSf94zjMbDL1TKlWvQrnaeilwtrtbaU7oK9In/dfQWO
+LcnvVYSbm+W414ir78dWYn5qsiuoHBa9K9PbC7vH8k+egyXjQVPmsFf/G+00
+ct6Fhph5sBGL37gP5p3rCf+MfCU2zxNIPyMu0nIK6/5OzN/YxKmdSzXh1sMm
+TEWYKXUQusGMo0ox/2A+LTpcWQBL2k/LN8HMqxd9ZdCfO3P+rVIy/8eIggg4
+YVwuXAhL7hbqT8Dlm/QFOTD9+7GiOMxP98d5niF5PnIOV0aefapjjpdhnnrl
+2QJYJXJjXgPMbvNxZqvjvmfZMIZJ/YbJsjLYLvZa02Iyz/j5aIOFNKW7LvGv
+n+DW565Pj8OiPJZtJsn30vW6Z3DkgMXhZySfRmMZVQ2aWhQYt2OZMfI8MnvT
+WrjBnHsmjNhb7ycbmL2/XnITph9OvTSFp4TLXsqZYP4MUYESnKC38+AGeGSl
+vvljUl+5vvEQzNygJU2Gzau36F+FYy2WzLWCg3JH3Tthl1qzoZfov7ixK34M
+5hmdjzoCR5h/VSLLxv7gY2eNYJ0tf++ZDVP7NOku5OGl1t5N1ukz8e0n4Vlz
+6vom8H6JfPEOb7i5/PH9F8T6cW4WcKLCme+qSX8LNhmtgMW/D5gI4BCha8Ya
+eEx3sjea9HcvzsoDrrWQPbeVzCc2aE6HW5vy76yCqcbs4X64IemHaDVYUGvx
+s5M6+fwarJch83qmMaph/qFNAaPIS/DkB2V7kn9MbsMwzHTqWdxO5u/J7R2D
+JeKJQH/k5x4xYi9Pzn/zZe448QdXhaXk/EuHF8Yuwv57lWJHMs96h7fUYsxt
+sD+bT/oxf2QdDrOnrFyukf1txeHtsMPR09YfSZ5P+oWamjQVJjhrqYW8BM+U
+Gl1h9o03gRtgkc6vHXvgMZ6F/C8w+1H6jTA48GNJfzLcGpkWsB1Oq9J8XUre
+X+rTsBp2YG+h2mGt+duFn3FeWtQr63ewS9CdI1dhdz6/R34lfL2mwAs+NqvM
+RR2m8xjZMnBI1i62PhybVuBUiPmku074rIBFWd8Wb4YDE3PGjeGRLy8OSJGH
+6HiAkyHMLhUZ/AXXWpYM6cAh45sKjsCDK6ncBTBPqK62Gz74SoVWWEnu55qB
+7TAj5mnvOPoTrzWP3wv3WaQW9ZJ5D1V7Z2qQ565e1Aan6EgGO+BEXQ1WFckn
+9EqREfqxG529tAwOuVi7IANu3rcpr5jsf7ducj7mSbE9GCxkk+cvwi0Ddp4x
+sMwn+aSvKNVFXj6nbvMLyX1unrCrgLUi2ndfIXmlczTsl9BUl7Ri+hY80rR8
+631YSZguJfkK7JxE+lo0ZSqYOzQEJ+7kzPWBmadNdBQxX5ZF3nQSHPaqoork
+x72vY3QFtl839x6HzG+x/nI9fGLeU8MDJN9OL9UHcHVY9bVcmJl9KLoNLnKP
+cqiCUzg799TBf9qaiHuJB4OmL8M6o9tU5Uzx3Hd5nk2Gc4NFuzRhh0qhVQBc
+fql83Bwunl04bEX62cxfa0/Wj75hMuHAQp8XHJh662Rai/l0rLc82gpLMld/
+CiLzzimz4cJM5UnTJbDlxrYjbsQRGStfIK9FCResHOEUz78rRbDo8yUTK1iw
+TtyaAY/UcJxXkHoVu86dhH2jVUs0YHpRU2QxnNhm6/sVsb9p/CP4Q3yLcBLz
+UXpJM+o471Wp2okBcl85SWYRcErK3VVdsDjOMKoH7rgXfaKV5OnpYWqCeTRL
+j+5ogtUGNfaGw8KWdC7x6w/7DG+QPNTftpD9YpbbJzltfF4v2zjeTe7njlV+
+TnAg/e7GILzW9YD0BOxl4v1YFv01SEYSmmHuW17NYjj29dBnGR3c97q8BkuY
+tyCyYgXMur5s1naY9dfXoc6wbce7kN9gl3pdbz/YNCznQzGcpZ1pEAS/eub6
+cwus1smSDyD7//kq4wPM3R+Z7wE3F97er2KG5ySjWtsWPm9kJmsGv35QoqYN
+lyqkemyBO03/CPuI/oo6z7X4kvV9sr734Nw/bHvCYFZTvsMZ2I7h4RwDO2xL
+zguF+TED8+JhQbFnuz2crbvOPY7U2zltpQ13OtcnR8ORXSqfZLXJfTrtHwpX
+Vkd3DCHPitT4Qj+Y6p1v0wtv3v6jkxuxbsKaPjiDmRVoQ/rZ88TyPazixWCZ
+wMWfh93moF4rZ9/FxaS/Kr8ZYzgkPFhNCWY637X3gV317CJl4MTHk+IM0m/d
+UOUUyUdDpqADlnSz/hwj+c+yb9dAHmwl7+vjJM/+qhmSd4fPkd1S8v/wKKu4
+CIuigxsY5PzRU7Gj8KeAH/9eCGeVbPu0ainud6nRu5UwfaBqOBQW/7KqheTL
+9e8OLoT77KezgmGRX1ZPC5yrstM/hfQ7Uaw5BCduCdD7D5lf/23IDPxcZHyz
+i9Q/1S+crUv/70uC+f+/H+jS/wKhtFvA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.984279526590164, 4.521860800255244}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/BRWrMMRsjkHCmlcqymDxk5pByWqBxjI40KU6ko5yiVajaH
+nHKcShFqZ7CZCqvYPso5FWu2iEIRK9rk+z/7vdflcv2uZ97nue/7ud/nnVm2
+N3THvgUUCmUQf+T//y99FuX7PK7VLEqtHtvfEm6P+v1tLzwesdIoCl4xUigo
+h3W5Xv534c0hzMAImCXTYtYLv1kVZm0Ki743BXyDeRuVxqdXsSijqZLhVAMW
+Rdx4xK4M1jxVJaDBChP+Xv5wr/PScUnYu/6oPQPOd50LWgjnmAdvfq7LojA3
+mlqNYT5JlxfW5+GKBLmrT+HSNoaNPTy8rSI9H6ZMvhiSJ7ag7DwM8717zgyu
+ZFFa441ULGDmr1SNOpgbpOVCg80O/mR7Ew4fPRnweh2Lcvx7jE4G7B6cX14G
+T/Eqj6fAFZJ7f06C+Q56SWSccy448AC8JHKP1Q2YXRiycxf8bHInswZmDd7Y
+4wjzpI+Vdv27/k0LZ9i7eHfpJJmPV2LqC+se+qJB4m1a/4ZxEjZKsRcZkvzo
+v2vlww1KCS2OJJ+Y3YatsMGLrwMBcNLAagEV8Z9Rm9l5DOY6sRu3wg4KYalR
+MOdetPkF2G+TfFAkPDMf+6gVZpytnuPADclr/623aI3eO0844CVHZQ1cuen4
+8v/A46o+Ndvhjw2durIkPiGtYR+8Zp1eyyvEr9B01ykSblI2c8gl9Xr5rvAi
+zKVOmXjBtec1N2fCPe1OnvKweMLnnlz4W01UbdMK1CV3Ioh4HUUuKQqOtFdc
+kQFrxXx7YQyXbk2NTobTuzwbx3SQf80OVbJeQnvn1juwGVXu5X7YLzxZLgxm
+CwsqneHWWc9frGC73LjOjfChBUtfqcINruYB6jBT7VwmBc7PVb22CK44ukvu
+03LMr6/j24f6/PA1VGEYzvB/f1hA+ovxmjoC9zR8DE0j/df+YWwanuE/E4+B
+t6hlB0pivtbqxRFH4c+nrzdqw7rHJ3nEMvwHupYknvq8IfL5akPrcD+Y+mif
+dga8eLKIGwMXXxt8WANPh0U75cAVNyxL3sNZJ+pu8En+XYkb6Yh3i399zROY
+efmRsj78wTVxvBUudRVwSP6SqezZNviQ+Gm5o/Ar7aT3TWQ+zvvGNHhG6GQm
+gBn9TT5VZL71ba/Sift4xd2wTJFQNYTU88eKtM9weHBLgymJf89bE0lDFuV+
+yeQMqZ/u7rJ6Vbj767ENj1CPsMbX5avghMMXt4TDfrUeNw1g6zdLGetg3fvF
+vxjCnyv0Ot5oo38inqWtgRlDG7IzYP7reiUtmLKwLdkFnnkZyF8M1xf3F8nC
+yRx903nEk1y59GanFvKdenx9GI4NL1MshPmBU9Kt8C52q1IETJu0KayEF/xd
+f8QTzjdoy7wGZx1/F2sLMxxurzwDX1qnsM4cZndGhxyGd9wJnSFWWPk6zA9W
+nuX9vRVOzbyi7AY7mfj0esA5wipZR3i5cpLcEdh5LK7FHo7Wn6i+BGvGBf1C
+9mOAe6zpDmw3X+rpRc47AwW1Ftj7H/cPB+F7BvPcD+R+8/bHcaQ/bz+VE0e+
+bmJNpjlwb3uHQAkWt/Y6eB8uO7ewVRtOtTN0fE2ev8WaYithEV/+4RzsPPnV
+RhM2S604r4n6GW0YFiP16x2jRG6Bp+8tXjSJ9YS9Xf574VclBy81k3rESq6K
+gaPPLNuWA1PretuvwjduV9n4wwnXv1wpgbM6f/ikBY/6N7b8Bm9PvvpP7zKc
+S0p1mvUw3eyjVwrM1vAJbIDPUGNX2MHeEtlVtTC/XiN+TpOcz/MHquAe1frL
+ApihoSh3C86RinE7ArtZZIakw6llv/LWw/lpSWGx8D1PVTkxYu/ADWyY2+16
+p0QD6waq9TvBIo8jRUEw5ckn3nq42dfvgxnsnjghVIN1f7h/QQeuvn/ZiQrP
+tJzna8Ga/bz906hf84H2B0awc0TaBOmvgQfp5q5k/NzgTRE8WtCuEQcHDNyk
+/wkP67GeVMPLryqe+Ase961cOw2zFRKHP8Dqoc0XlBFvc4LI+Cucu+hFFhM2
+eZA/IkOejzJ7PVe4+hDzgC68xp9rx4ZHh+t6bIgl3DYch91Lbm8MJPXbHhV/
+CvZbtDAoCa7dr6JwAi7OlDAj+0PVebiB3L88KjiiBW649ajACU6ifP40Rvrh
+osmp1eR+39JYKSOcE3KNpTOIlyVVuFoH5gwVe52Hae90FP8D+5Xvv0eDBwyv
+ZmwzIu+poe/x6tifRh0bV1gUypGaUEN/p+8c2gUPm5/54gkH1C4+7wbnC7ZJ
+P1bF/j9lHXeAHe6uSDOGqYf/0LeA3SRTbt1WQd9f2sZZC6t+vUVbB3urp2gw
+4PByD7E6ZeQhctlOIeMS/FWBcKmLsdIQ8tGUfnhQAw5nLKgh+bqVdveNLUX8
+XfqHBKR/DkfXtMGjdKddeXBGzeTepzD94ZeLyaSeKTVe3bCfcvGiaNK/+zr2
+TcLWxp9Ph8HhFz5y1cl6i6KzOfBU83NPN3h4SO36EdJPaYkdXPiQ3SbhSdJ/
+GvJPnsOM6rsPyP40Kb19S0M+tTzHbTmwuLfVhBXM0856zIcNnqtPcGC6UCWw
+jazPN3TiwlM/XTKegL0/y1DyyPj3PxXlkT8v88TtLHhmYUT/epgWViuIgx3+
+5ni4w5pK23xdYfdcunMEXNroUSerQt6LlnlX4dGAJe1ViK941H3zPbi1jevh
+CPdO1W1vgk1Mf+5vR/7JPivlXpL7A+K59vDyoDKFAThpa6x6DQNxpIgpvCf9
+c8ohUweueDopNQwzt1rZXFZCHzkXbPwL7rwmH/ptCc6jSZpMF9xM22FxGP5m
+vcO8AaaOxV2eUES+sblF5TC/27k+FjZpZtpmwGFL8/KXwW4Xpm1jSP+semjW
+rYB4OpJ69sED2dJ9ebBDr4qRI9yzpONjNBzr1xS/Ac452yl2FM7Jdh/Ugr+l
+/9V8EjbZ0u9G6hmro2aaCk9tTi+kkvpxouKE8Lem4OCFcHUfz3Qcpk4UqojD
+7CfvL+khnoxned2SpH+fa+84oEi+P/10TgmmmPGYxfB48axoFenf3mvfReTz
+LmnOlnCFk1EaHfnTPkYu8SH93OjjYAxn5JpZR8IsX/qsDcz2MWy6BhvojSja
+wnSvlPBa2D3eqc8Q5g9HaLwl6zeXeFHh0j7vs+LG6Md574g/sF6q05Wz2rBD
+evY/x2Daua10CzggNzlSFvbLili/C056+KtnBvJjfD3FZMMNJuH58rDzq9uX
+w+BWUfVAgjzmT5wdOQnz9/B1xhdjf3dom52CB0Ya8jxg9oo9d47Bo7NZBY/l
+yPjZWwfg3uU1vky4uKiv3RM2qZP6Q0BHnV+HzdnCyVLGeyzhWpsbKwzgnuAO
+ZaEs4pzpPqAEc8pCdFVhb/bc7BzZj0cFrddlcN8iH6lBUp/Nsi6eMD97urWF
+nEdXGtdsgmmW+gd/g2vt3A1ZcKf32r5iuLgg9uJBOPKj/wJSX3pC/owA5khU
+J6bDdonb3zOw3vCL7FdppD/6H/ckw25HA5nZpP9G/ZvEEW+OOyPjBpy8dxnL
+isT/exG/isTT+elcFCzqFUg/I8+LwO5sOUwXHxglz8d44e7QLri0RSJYAvn5
+/SY/PQInCKNO68JMSZeQcTjJcUjSHk4dDBoUwWG2Ys+DSb2FP28Uwg3SCpmX
+yX5L3FWOh01So8zKyX7dt9A2JvPbdhT+FxZZ/hlegPiFt9RfvIWp10Qm95Gv
+XUSt7BeY6zJnWymN7yUKqZXiJqiPoKMoh4b3juR8CA3mmG3XPCaF/lAvWyoD
+h2/J07SThGkvu36EM9zvWqr/iOeF/G40Jr8zcEmw/gePeSis
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.425736195028037, 11.393326991679075}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVLGQ4rEAivZDQMpuAzLEBnjMSvMDhSK
+MqGzGdmKwrAO5BE6xnQjRIq8BxtVmVLtxpvwlm1IGGwZjCKlg6VORvwf403u
+vfnlfveec/7fyXUTZ8emm1EUJcJJ7pQVuXBp6r/Dk6ZoG2GFM6y6cZJ9BJ6K
+yiyMhk1dD5Yvw7XiVmMRqU/5a9cceX6NszkOMw/qzC1x7xqv6uN40ZTaNHPa
+A2bLBl+Sw1JbXZgvnC8zvjkJmwZYX7rBSZVcpcc+1P1e0sOAZye0uiyYYs2U
+z+D7va86+jYRL633kPHNOev6P2Cpzbc3kuGuGuugJ7DaqvMzJ5jVYffxNjxb
+ynSce42mrLi+7E1Y0sNW1sNMgcBuDvYPuhIgg8NVk9bd8LJXYl0yXNgTqS2G
++6//+X4cXL9n8dS7sAU74pcUmBtwasiNjH9ho0tO3lfzJUasx8DQPGmGE/R+
+jUOw5rx8XQ/rIuXvdcBsix9tgzG/uOaSD7+HuVW79EqY7ZB7u5nUj1RUL8Ec
+oVnwLVjYKtniI4+PXj57eB1ePmKy/QIWKiIkXhhfE8XIug2bW5+clpL1fspL
+NcFSxTz1G8zMEuxnkZxLBltZ3jRVvCUtJX1J8zePkMLc5M/5LqRPk4sOOpj9
+cDqVAett7HW2PjTVHtKWc4f0OcLpRAy8UH91pQ5W7lMYCmDhmR2nNOKGgPjv
+4GVOy2PST3qjuK0Z9k+ryLmP9Ri6p6LUsISxt60B1j/2qKuANUsDfjI49/TE
+2znwWGPMz0dhVZhYFw6rh/tcDsG6+Un+Hthi6+81EdlvX/OD5zFf9U2nvEzY
+ZzQttwUWjgxcqyb79+ILKYUw7V2eOAUHHox5dAI26ZdsXDG/qZFzIQmwv2Kw
+TEry3dEUJpL3My9a9sG6vEtjWXC/oEXsTPpQWrJZCZc5/1SeCdfPiquGYIo3
+/rwNprSdoUzMb9Y96deHJN+FO0WpMLP/1tpu9CFQ5p1wHTa0Hx12hGuNIndr
+X+S9ylh5BVamOwrE8NiU0d0Mbr5Z5N4OJ/BUV+7he7Wzg9NGWFpgebUB3l55
+ZuPpR1NBB0IOZ5B9JX16LhouE3VLufBwdod5Enk+M+j6iKynSVRzDDbEHk9v
+gh/8o5WTek3kNxsyOHBNZ+ZNrK/pjSf1L67lU/A7JdX3wuHeXM+VUYx/nPeV
++1uwYPXydA3c7yrgHYOHWRdWJbBQth2tgH2yQztD4SCDfU4P7G//QZgLrN7Z
+LCD7y3CX/9QSZpo20+PguQN3g3fD7VEGyQ9wl/Z+kgPx6Bt5FPKQZyzL98P5
+i2FnRHBlrlKRBausWrQquJ5jHUzyYhVyfCZgbk54xnOSV5uk6hnJW/fJ3lis
+x9QRb7JF32rLeQuNJI/ss1V2MJP8917////nTf8Lzx3MNw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.261512611302877, 11.151252930219968}, \
+{-1, 1}], LineBox[{{5., 4.4999999999976925`}, {5., 11.49999999999251}}], 
+        PolygonBox[{{5., 7.4}, {5.4, 8.6}, {4.6, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 8.}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 4.5}, {11.99999999999251, 4.5}}], 
+        PolygonBox[{{9.1, 4.5}, {7.9, 4.1}, {7.9, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 3.5548}, {0, 1}], 
+        LineBox[{{4.9999999999976925`, 11.5}, {11.99999999999251, 11.5}}], 
+        PolygonBox[{{7.9, 11.5}, {9.1, 11.1}, {9.1, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 10.5548}, {0, 1}], 
+        LineBox[{{12., 4.4999999999976925`}, {12., 11.49999999999251}}], 
+        PolygonBox[{{12., 8.6}, {12.4, 7.4}, {11.6, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.0548, 8.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{15.5, 13.5}], PointBox[{5., 4.5}], 
+         PointBox[{5., 11.5}], PointBox[{12., 4.5}], PointBox[{12., 11.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN//B/ArlQkxRdZElkEkZclWM0qaolASIVJKUhFpShgljeLTRAlF
+SklJaaWyp5CKUlGpRlmzjSVF6Ps6v59/7uPpfc495/0+9557mOuzd53vJIqi
+zEQoilyp/n/4MWBRNAI9FlXiu1FQAgvvdtp8mMeiun/WWx2EMzJXiOTPY3ET
+s9/KGcB+PmuzMxHfJnnikmA+iwqs5OumwWXTH+kmwqWHzrQhzt30wHJsJcxW
+yrqF/lS2Wbq9CEw72V/aAB/+XTm7TJ9F1S18/24Sxj+XVMOIhdXGZ+gs1mNx
+zc6/qd4EO7paJuyD43nCUVO4So5/4S7a721LsZhDfNs4bQhxrY/0U3RYp+7S
+OxN9FleUoR09ndxvTCQuGN6qu9xQFmYXGBjlwFM+hi7VIPE+kfBPuM6YZjZu
+hitVU875h3iKvHzQehJfevaawnwWN8Twqn8g6c/7J6mFPKTYyenxcMG6WnNN
+eKezekk2TFdqc5SDlZW3nS2BBV35U8ZwrXz2XbEO19IZ8Wc+4Fq+YeBEI648
+9ab71zDegzgVbgPM1VgfEwTbj90fqYEzlLccRN7c32s+7npAxl+w3HgE+c9M
+jKlIhBvbi/cXwuWxngE74Lwpr4aPwB8q5i5bCAtFou0dUJ82tTmnB/D7PwX/
+1Wjg+sjr46RcXF1v+O9B/bnnMgvifGDeqRMl3Vgfm5xNm2bBbEmHqh9wl+T5
+B5W48p6fntKB9U0rsu0Jgzkp1j4jsHtBiqUxrBBuZyaPfjriGbkDuhhP+vlG
+Fu5fln1C8hGsFkyXDUb8UsNANQ8281jvQuaR5NzW5wPTis7d70b7zviAWWzY
+9XFwnAHyOBwv6moG86W01cg6BNl4bDKCC5Ra799CfdbUbmWTeMfAeF474vse
+BghWkP6LUgqwflRy+syoTbA361klE+54sNQyBGZbPmG7w+vuH2vnw4a3t2j5
+Y7399g4uuQULntrX74ID7Jf0VcN+vvlu3jA/fEVxM+wYYuTERv+bMe+TB8l4
+AbJfyPPgoht5axym631J/435tZtei54g+V2wvFKO+R0caZr6C+aYuDnyYKvs
+6gQBccUhazu0v9ho9K8UTv4w01gKcZpudVoSqdeamJZ61CdBNHUxqVfg3H5h
+Oupn2797shassMe8MAjx/cMOaQId1JuTt34t4p2e7T+TYN4SX1dTePtPL/pq
+OJut0TMP7W0SX6wf00Z/Qct1fcQ9p45NzoMb/ZaftUR8x+DE1h0wjWeguRHx
+tiZjnibsqtPDjEC86JLZqk4G2v/WWncb1tx/ZF4+rMD2d+lAe9/tt1afgmnr
+ooQM5Bezes7GfbCfR3iMH/I7fTIy2hsO3HPI8wZsY3I8zg3mN1bld6L9+u6x
+PA/S3sJ0UAP1z3o58NQPNgxgZLmg3rfFao0PwwUtFo8jEe8YSpp7lrS38jma
+hnj61sJdd2CWntPbW3Dd1uO1r8l8JVJE7sEbRZXGf8K87TVj1+GHvSN3RJEf
+75679Rncbx5j6ls5mJ5k8nEf4mWbn0Wowx1rljtgn+MufC+hrwWXSmxNl4ED
+L8neUYF17I4rY3/h6qc5bZCAHR8Puqchv0sLtzX2YLy8hfcUvBGXv90W8ozM
+fzSKroX4Lon2LwlwciWnsxf1Gw0zWLyRxE9WypSivlaCGzRZWFDw9FYqvOdt
+9PwaLbzvRcFBXPiFRlpJBFyqfP4c2T8ddjtTC2H6FYV35Pngh6UxWzQxn8z5
+q7B+1IDznvJUmOcmevwc4kZXb1x3gbOVI/lkf6GU0z4pkvZ3FrR1If71r+jP
+Vg3cT/ZzEtlHqzKSxQvhgohfzluQz9XBt/8uwMkhsvzLcMCMsFmxsJqfzekW
+tG8d9Z3Nhdl1YinkfZEWiwqIgqsM7497wUdmz+o+Se53/gub1J+S71dOJ+Pd
+ObmuBHH3a0PaD2HuRQm3byReZvP3DUzNcZUdRNzKY/XGPpijaF0xAi+/Gt4t
+gfl71z00I3Hnnq5gLZj/qqke/SmJws1V5rDw46tjpXDkfqkJW7gxg1mehPu3
+SH4+YAdzfDmB2xBviFAbWUH8ZeUHPcTfqPncM4HzvLoi+sh6Zpg4KMF1twfm
+3IUHu8SFg2S+n9xDQ5G/78+sRU9hlqfhIia8cssWBqlPxubB1+R9v+sbaL0S
+FjzXDm9HvR94ljv+U8f7NqQyrQZe+1Vh2z2Yx5etfEy+h0tY+b4wfxkvOh/x
+nBKvFAW4Ltc5sozEg4PXv54LN9K2NiK+SlVcOhZmR8XZ/0X8QMnm4tUwndZb
+r4PxpcbeT50FNx7tVvbC/MMjXhl0qsGqCW3nEX9jESNdRTw0mttE9jPTZxJ3
+4bpA09I5qI/e3ASJa7COqrQnWU9u0LLwLJh9f++786hXl/wz99twNm/WlTfw
+i88d5qUwK5idOIH2Qq7augbYW+Bbo4ZzR6+bXOoAzFMx7DY1YHHnDJh+lMb8
+uKkiyizEd7WZl+nDpQ5WklawpXKq2EqSn2r8VD34N7MlwgMu0Pn2bTr6D/pU
+GOyC/zxUG2rFeNVa1TuDSPscptwD8v126/62G3bUEj0cDpfYyeZ6wbQfGVet
+4aoDPT62cNWI8rLJmP/NsNvT1WGeXPqMKtQjwDPZaBDzpTfMrDwFc/w1ah+T
+es3Y8NMTrrC1tDlE8s1aXGgMBy/96mgEc3+nq8jBU0sKB2tVsf6exYdEYW1F
+zU5jWKjk9WQc68VybZidOgf1y/tqNgXxl58ltSfDecvXP1Yk56Z9R/0PqGA9
+7lAHLOBXQbSW37ORv56o6nZYcbvvBA/WCa3tTIUlai8EzIep4I7r5HwS6iUv
+2a6M+lDCFnKemWEqUfcQzlad1ucKrzWj8i/AyVc9aKlwb3HLi3MwtfZQWAN5
+fwfz9LJIPMj2iRTqnxKnrvkMZr/QjVwC5y7MWdkP83vtmrbAboG2yQyM3/Gz
+bNMh2Fbl7F1v2FCuckoMHCWycSIV5tPWhEbD3Ed6zXWwmuKehv1w+13//nGY
+vfJ0yybY37yZMQf5s+Scm43h5iIPMQOYn5p4cooBeS9mvZoHs1sMaLWYr92V
+dcdmwoZGG2vIOdbLoV+rBfcTxASHk+9LQGlb8kWYM1L+RRHW919ctIKMbz/p
+igD1WuPh7tlI8hPb5pNLzifqHOVNcB5de+cROG7uaufXSng+K6bkbiH7+4GJ
+ETOYbp58xx5+/ficX7oi1vdGMseGnEevl5iIwoEaT0NXkfaXlSZ2KWA8j5r/
+3Mn5JmHNoi/y2C8uZsw8BGs4/WzdBHMz+19kwvGHt1zukMPzZpU2mZwrf+t2
+M2PhDHZY5gzMf9lFledL4TqpW+ZOcKsdZ4M4zHY8pE7yj9g5rtQ9C/1Z4Rff
+wdp01tofsHfS+PBM1K/Hnm7RCzvm0hLsYIMcTwfS309GWvEwfFoQaW0MVwVV
+xF+Gn2TenOcHB8ppbSmCqbti+Zfg7KHc6Br4o0eQcxNMiUwLfQm7C0R9ZZCP
+kJZrUwqfZc/ctwxm9S46fQ3+ZxTq6QuzM3bEHIULd0ie4sA6DjteboCttfxn
+H4SzFziGkv2juU62cxvM+erSRd533Y6GIgtSrzDzl9mwluJil1GM711g+gHn
+Peqzy46tV2BOUnXFQpjjlBttAess4RiNo55ZX0NMSkg9+KJR5Fz/Prbtjgks
+FDV9QNZ//jPd+kuyqI9lsH8SbBbxtUVMlrSnCk/Cj1Wv7A+QwfrvemH+H6wk
+9kTz3Uys77X538n5QO9Cz57lsHfxNPXHcM/m4cPFM1CfLqXPzbB8/vFfbNh1
+YkMgzhvUB/GBd6101NuyqMGenF8cGPbn4DqxzryT8InLUdmbYfZyO69X8Hzx
+3Sus4IIJcW1p1IeTu5e3AHbkm9uthU0WfW03hf8sldHnwfNTmv46wH4rx7c+
+htNFhpMPwKVj1Pfv8PC4xuB1WMi/SFELMC+b8srvMD1kUjId9rS+GKeC+fIP
+lojLwnITcy9vgAVvMu3FYU6je0wMrPPJ4scg7mcV/3bqTeI+ccEb2HTelz3l
+sLCp8t1V+I7VmbznMM9kvCwIfr74dMxDOLuvjzKDK61p8XyYFZuj+xf5jpYz
+nJxhP2u34SJ4kbukyyTSfkxF6yj8NoEhfYHkW1LjtgY+81m/ToPU68YDShXe
+Zvlpu7k08vrSYTSK+kveoPXJSuF+bgOZ5P0PPPY357sk+qctOlYPf51ucz1H
+AvvZifgjxIVNQ4yD4jgPF017SNrf/OZj5DwN35O/edfI/YR/JVauoOE+s4vX
+qZHzS+tw23ox/F7tm6Ej/Of3OaeYqRhPKGXHg4vl35o3T8Hzu9ve4TksO1cq
+cQfsWrT0hhjylxLPClSCWfY5mavgoYvio38mI5+/Rw7HwhYhWiEU4rzNFvEV
+8MzqeC992LBaZesfONTC+kYonLfA87M61sfl6aOBBthM76rFMmK7sI8rMR9h
+LIu1AU59kehZBNON+ozc4buX6awFmL9f4see9fDscFX/M3BHDbuRCf/JCXZq
+gV2v0LtU4YoVF1zkkb/Zty8ZvzB+dIu5ojbM+vu1rRxetnlfsRTsWhUmdgL2
+MExm1KB/ad3U02vgOL/70u5wozTXnA6XuoRolGA+ai0ZpWT/8nn5rW8E86d0
+Dr8hfw88bGLUSMMdcpNad8MtlkWZU1EfmiCXQf5v0bixvrh1Eq49JzxwvqNM
+Myi/ByJ4vyadr1eGJyqSzkZQqFfHfifyPYiW0ZY4O8GkFG6WSZDzbEFj/y2b
+MSYlLG++akmen/tda1VGmZRa9rAxOQ+FnArdbPCHSWWUiqyOh+OGjJujh5mU
+mWuRSAXZb56bf573C+2jDiqKIB/9897fGUNMqlRLnrYM1nl25n3YIJOqU52u
+RL6H0Tk6RTqwY5r1KbKeGYnJ74l5v3Y/Iu8ju35pRTBsxihSNIULtfMGx+Hk
+as/DPrDCrjKZR7i/YFIDPRo2LruVfwbjc+7KRKTAwld8iUjMj3vJtv8SfHOJ
+fYrvbyZVtURUOw3WLAmXNUU+Qg5jz0n4/rpkzW9w4/W9V3bDdamRmk4jqM94
+r/4KmHroXhsBC2TuCWTgqrZF9Z5w4/Dm0c8GZJ1/LWtH/9Ly2PGLcIDLjB/y
+MDX5T6oPTH9pukaI+TSeaE5gwGrRNZ0hmG+GelxSL+r3kmFbkov8dKadnEfe
+d276KcWsfibl+qfrxBnyPu0MUmrsRX2cjyWEkvNcbU2+6k8m1REdmkXO99ln
+HaNsW9FerSiLrFd2p4RrkADj7Ypt2QGzLK8KYhuYFH120RxyPuQyjIT8VxhP
+6Ul0OnHGjeUHnjApP8OdJS/g//u5XvT//28zYP0PCMornA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.191470063271683, 16.391592056605244}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Q0wlHkcB/C/FVZRK+8Sq3C1TSG1KtY+OtFpxmx0uutlW9UWbuu2ay4n
+JclRIpvr6BR2epHrVHvyUg3NcuFovR293Cq0h/LWLsnLiO77NNMzY5757PP8
+f//v7/c3u067vw8RMwghYvzRdzLzEZc5RT5d8ylSIjXh/gzH52xWFJpRxG2p
+x5lpfN7cULT6IBywkjsqgeVfOxwIhMXmJa3PcJdPR7itw13i71m6Hnf2uUkf
++nlQgjWniIV6nNOf1ldZy89yYPZ9/uVbMFNCbu6aRxHlgPkbBupK48Q9KXMp
+4r77Yl4UnGha7f3CFPtPup7ogu21xse3wsSl6MYu5OxK6iicMaGI4D3VpoEL
+yzIHW2B3Sd0vey0oMnq3PqYJljUMJXbC+UcVle9glp3p+WBLityzE55eS9fb
+6+B8C357zH9RNqwkI8JxWNQdVWGKPFKPP/04VhRxHQ4oOwvr9OtVX8L1Tqem
+ZiO/dFOHFW3u9mv7E2C5TXXYEvr9xq/c+mBqxP3VKOo9tBHmLkD/slQLuz/g
+sta2RythauW+bXSegWw21wvW5YU/1iBvgPZOvyvcFd6+5gDdT2jGQwKT5uwX
+I+i3KlXvw2nUj9/zwTkGZoyuaupBPoVhSIwB7Gobs3EBPc++9JnLmN9F1qXI
+FehP4NMi9IefViTfcsE8dIudMj/iPLieSyuZc9BPxIOaFjjJ1smtyxj1z+Va
+VcC7r0zrlTCxv3gmqwpuy9GKZEY4H340TwP3mm1YFmuI9db5ajvULxJOZh43
+wHOv2R70ee6wTnmaOwvz7fyd2UDvn6Ot69bHPPSjQvnIy65a+DAUZmkufFsO
+rzjSzHvLQP8b8od80f8Fv5vvi2F5svP1Sjgo/ElhPqycY2XBx/xKbaJDlDAl
+SWIWwWpTkeM0zBpL+8sS5+F7MKk+DPUFFyOX74P7XzIbq+n9CvYz5PDEskf3
+/ZCPyi4fU8IfQofTK2Hd1dKmWljS1/qFD91Ps/ehYrixxjejAJalz3Qkw1um
+5LEzsDx6u4c//IgRkczFPFg7t8UNWtL1G+RBMDXQWJYIF3Rn8ejnJMQk3gyu
+mTuRPob17rONxrPQH+P8luspMLtjfsJCeN/wA+k75FHk5ctuYD5WI7FKT5it
+uiPyhjUVYkcBPc8gg+qXmK+70+CVYPSvCDyky6DPf0hUwNVDnt6sQCEc4G+b
+yCKYH6fEez1caKXdVD/NJ8oTj90o2L8p7WDsFJ+IoiMjv4HbmniSgEnY8bZp
+Cqx7st7FZ5xP2AWFnFb4TZv82nfv+YQs+1vljjxbEgaPvnqH99X2jnnwrJ6t
+q26M8IkuJuNXW/RT3NKjrRrmE8VAncMlWDHhZ+8Fi8SV2x0wD0G//U4GrKRU
+6hzYuXF5tiP9vi4s1II+jykPryQ43uh15zF6/kPxP3BQnypXe7bChQbOvdOw
+clF2vbk1/v/Ur110yCPYvGquD/z8cd5h7Sjeb1ceDoILfDUn+5BfGhyc6kv7
+vx4f1Rgf329XjW3hNbU9siT0SzRXSttRv5ib5mI8gbyc3/acgY8J9xoGwlIv
+Ua0LbHHA0IMLk9qssBLk35jG1G/GeunZivk8WPKjOsEMVv6zNrQK/U8UxcVP
+YX9WQHlKEKx7rkjNoPNFSOa0Y347lM9qOuj5HYlT/QRfE/eeGtAh34rbnkvg
+e+vGr6YN4TlvrHsQ59F1Ymm5Xh/6VWVm18Gyk5rEsG6cF7XISEl/jw/YWIZ3
+Yp5b/61qhgWr11IRT/lEJl68YYpeX5tLzVPBkqh+Hv078UxsMn4fee7aGWZ+
+/t34fFlQ/wOCa1H0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.3457692355174515, 3.812492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999909, 17.}, {4.999999999998181, 11.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.899390194486315, 16.096286839465897}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lGkbB/AXxWxJs9aGlBAaERM6WfKykihrsNvk1Cw6sJRTZRmFVWtT
+OSTksI0R0XHCJ1ttjWNEIiXRYYS0hZRjNbL/5/s+18Vcv+t55n7u++9557pG
+23ev6w5ZiqJq8EteKUXyh0VT//1Rpim+1qzgb+GQUPbqZNg9db/2ajjl1iRL
+9Rua2m1gnfwzzFNkO5+Es9Y7VmSQdQ/N0zNwSv1yk4dk/erBQq4KTal4K1io
+GcC6ad05MMPTrI0HjyheSbpDrHz51gViQ2OqG+YFF5RNwJL+8YQOmP9hlGe9
+HHVd3PxvwH1Wt5N/g9n5tk+SYDuNwbVVsNZ05aQj7G9cnj0B04zBJCn6Kfd0
+dtIxpCmx1+j7s7DD/fcbv4ddfEIHHOCHfmkzXJj3PXvbEOZNP93H9SPrck3G
+mXDDnoAyX5iOOrHACe7UOdC7lfjwTbd5cKxKgIEdPOJnk9rzNfrmuOsakPM2
+37x+FzYfvydmkP1dkc+IFTWidPvRHy9PqNxL9vtbZorJfPrZ4d+gnpGhNDCP
+9L91QM0Tjrwy/TIGdjF4uLQS1lreoeEPh8xxfLAM/ddafRrjwCMzmrlFsMve
+R1IHkkdeDpeNPCIC1vMcST3+hUAxLNCfevYTzJTrfc/5Fn2o1t3aQ+o3cr68
+gCPEvAepMMX4XLtjAU2xWLGht0l/AfUPnsNjvTUJJF+XoqbvNqrSVNAwJ2UV
+5hO9l6nLgTc/yamJgtl3M+W74Cl+iWIt8e3Dhyk1mjrWudB4vhH2K2yuUYIl
+kxMd22DBdrPvZ8PcXMcb+XCs3ZOEfry/uTvlYh+ckmszdhW+aP1SpLUC+W5V
+bQ0mVhlTdYcFTGOFxaSf94zjMbDL1TKlWvQrnaeilwtrtbaU7oK9In/dfQWO
+LcnvVYSbm+W414ir78dWYn5qsiuoHBa9K9PbC7vH8k+egyXjQVPmsFf/G+00
+ct6Fhph5sBGL37gP5p3rCf+MfCU2zxNIPyMu0nIK6/5OzN/YxKmdSzXh1sMm
+TEWYKXUQusGMo0ox/2A+LTpcWQBL2k/LN8HMqxd9ZdCfO3P+rVIy/8eIggg4
+YVwuXAhL7hbqT8Dlm/QFOTD9+7GiOMxP98d5niF5PnIOV0aefapjjpdhnnrl
+2QJYJXJjXgPMbvNxZqvjvmfZMIZJ/YbJsjLYLvZa02Iyz/j5aIOFNKW7LvGv
+n+DW565Pj8OiPJZtJsn30vW6Z3DkgMXhZySfRmMZVQ2aWhQYt2OZMfI8MnvT
+WrjBnHsmjNhb7ycbmL2/XnITph9OvTSFp4TLXsqZYP4MUYESnKC38+AGeGSl
+vvljUl+5vvEQzNygJU2Gzau36F+FYy2WzLWCg3JH3Tthl1qzoZfov7ixK34M
+5hmdjzoCR5h/VSLLxv7gY2eNYJ0tf++ZDVP7NOku5OGl1t5N1ukz8e0n4Vlz
+6vom8H6JfPEOb7i5/PH9F8T6cW4WcKLCme+qSX8LNhmtgMW/D5gI4BCha8Ya
+eEx3sjea9HcvzsoDrrWQPbeVzCc2aE6HW5vy76yCqcbs4X64IemHaDVYUGvx
+s5M6+fwarJch83qmMaph/qFNAaPIS/DkB2V7kn9MbsMwzHTqWdxO5u/J7R2D
+JeKJQH/k5x4xYi9Pzn/zZe448QdXhaXk/EuHF8Yuwv57lWJHMs96h7fUYsxt
+sD+bT/oxf2QdDrOnrFyukf1txeHtsMPR09YfSZ5P+oWamjQVJjhrqYW8BM+U
+Gl1h9o03gRtgkc6vHXvgMZ6F/C8w+1H6jTA48GNJfzLcGpkWsB1Oq9J8XUre
+X+rTsBp2YG+h2mGt+duFn3FeWtQr63ewS9CdI1dhdz6/R34lfL2mwAs+NqvM
+RR2m8xjZMnBI1i62PhybVuBUiPmku074rIBFWd8Wb4YDE3PGjeGRLy8OSJGH
+6HiAkyHMLhUZ/AXXWpYM6cAh45sKjsCDK6ncBTBPqK62Gz74SoVWWEnu55qB
+7TAj5mnvOPoTrzWP3wv3WaQW9ZJ5D1V7Z2qQ565e1Aan6EgGO+BEXQ1WFckn
+9EqREfqxG529tAwOuVi7IANu3rcpr5jsf7ducj7mSbE9GCxkk+cvwi0Ddp4x
+sMwn+aSvKNVFXj6nbvMLyX1unrCrgLUi2ndfIXmlczTsl9BUl7Ri+hY80rR8
+631YSZguJfkK7JxE+lo0ZSqYOzQEJ+7kzPWBmadNdBQxX5ZF3nQSHPaqoork
+x72vY3QFtl839x6HzG+x/nI9fGLeU8MDJN9OL9UHcHVY9bVcmJl9KLoNLnKP
+cqiCUzg799TBf9qaiHuJB4OmL8M6o9tU5Uzx3Hd5nk2Gc4NFuzRhh0qhVQBc
+fql83Bwunl04bEX62cxfa0/Wj75hMuHAQp8XHJh662Rai/l0rLc82gpLMld/
+CiLzzimz4cJM5UnTJbDlxrYjbsQRGStfIK9FCResHOEUz78rRbDo8yUTK1iw
+TtyaAY/UcJxXkHoVu86dhH2jVUs0YHpRU2QxnNhm6/sVsb9p/CP4Q3yLcBLz
+UXpJM+o471Wp2okBcl85SWYRcErK3VVdsDjOMKoH7rgXfaKV5OnpYWqCeTRL
+j+5ogtUGNfaGw8KWdC7x6w/7DG+QPNTftpD9YpbbJzltfF4v2zjeTe7njlV+
+TnAg/e7GILzW9YD0BOxl4v1YFv01SEYSmmHuW17NYjj29dBnGR3c97q8BkuY
+tyCyYgXMur5s1naY9dfXoc6wbce7kN9gl3pdbz/YNCznQzGcpZ1pEAS/eub6
+cwus1smSDyD7//kq4wPM3R+Z7wE3F97er2KG5ySjWtsWPm9kJmsGv35QoqYN
+lyqkemyBO03/CPuI/oo6z7X4kvV9sr734Nw/bHvCYFZTvsMZ2I7h4RwDO2xL
+zguF+TED8+JhQbFnuz2crbvOPY7U2zltpQ13OtcnR8ORXSqfZLXJfTrtHwpX
+Vkd3DCHPitT4Qj+Y6p1v0wtv3v6jkxuxbsKaPjiDmRVoQ/rZ88TyPazixWCZ
+wMWfh93moF4rZ9/FxaS/Kr8ZYzgkPFhNCWY637X3gV317CJl4MTHk+IM0m/d
+UOUUyUdDpqADlnSz/hwj+c+yb9dAHmwl7+vjJM/+qhmSd4fPkd1S8v/wKKu4
+CIuigxsY5PzRU7Gj8KeAH/9eCGeVbPu0ainud6nRu5UwfaBqOBQW/7KqheTL
+9e8OLoT77KezgmGRX1ZPC5yrstM/hfQ7Uaw5BCduCdD7D5lf/23IDPxcZHyz
+i9Q/1S+crUv/70uC+f+/H+jS/wKhtFvA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.984279526590164, 4.521860800255244}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/BRWrMMRsjkHCmlcqymDxk5pByWqBxjI40KU6ko5yiVajaH
+nHKcShFqZ7CZCqvYPso5FWu2iEIRK9rk+z/7vdflcv2uZ97nue/7ud/nnVm2
+N3THvgUUCmUQf+T//y99FuX7PK7VLEqtHtvfEm6P+v1tLzwesdIoCl4xUigo
+h3W5Xv534c0hzMAImCXTYtYLv1kVZm0Ki743BXyDeRuVxqdXsSijqZLhVAMW
+Rdx4xK4M1jxVJaDBChP+Xv5wr/PScUnYu/6oPQPOd50LWgjnmAdvfq7LojA3
+mlqNYT5JlxfW5+GKBLmrT+HSNoaNPTy8rSI9H6ZMvhiSJ7ag7DwM8717zgyu
+ZFFa441ULGDmr1SNOpgbpOVCg80O/mR7Ew4fPRnweh2Lcvx7jE4G7B6cX14G
+T/Eqj6fAFZJ7f06C+Q56SWSccy448AC8JHKP1Q2YXRiycxf8bHInswZmDd7Y
+4wjzpI+Vdv27/k0LZ9i7eHfpJJmPV2LqC+se+qJB4m1a/4ZxEjZKsRcZkvzo
+v2vlww1KCS2OJJ+Y3YatsMGLrwMBcNLAagEV8Z9Rm9l5DOY6sRu3wg4KYalR
+MOdetPkF2G+TfFAkPDMf+6gVZpytnuPADclr/623aI3eO0844CVHZQ1cuen4
+8v/A46o+Ndvhjw2durIkPiGtYR+8Zp1eyyvEr9B01ykSblI2c8gl9Xr5rvAi
+zKVOmXjBtec1N2fCPe1OnvKweMLnnlz4W01UbdMK1CV3Ioh4HUUuKQqOtFdc
+kQFrxXx7YQyXbk2NTobTuzwbx3SQf80OVbJeQnvn1juwGVXu5X7YLzxZLgxm
+CwsqneHWWc9frGC73LjOjfChBUtfqcINruYB6jBT7VwmBc7PVb22CK44ukvu
+03LMr6/j24f6/PA1VGEYzvB/f1hA+ovxmjoC9zR8DE0j/df+YWwanuE/E4+B
+t6hlB0pivtbqxRFH4c+nrzdqw7rHJ3nEMvwHupYknvq8IfL5akPrcD+Y+mif
+dga8eLKIGwMXXxt8WANPh0U75cAVNyxL3sNZJ+pu8En+XYkb6Yh3i399zROY
+efmRsj78wTVxvBUudRVwSP6SqezZNviQ+Gm5o/Ar7aT3TWQ+zvvGNHhG6GQm
+gBn9TT5VZL71ba/Sift4xd2wTJFQNYTU88eKtM9weHBLgymJf89bE0lDFuV+
+yeQMqZ/u7rJ6Vbj767ENj1CPsMbX5avghMMXt4TDfrUeNw1g6zdLGetg3fvF
+vxjCnyv0Ot5oo38inqWtgRlDG7IzYP7reiUtmLKwLdkFnnkZyF8M1xf3F8nC
+yRx903nEk1y59GanFvKdenx9GI4NL1MshPmBU9Kt8C52q1IETJu0KayEF/xd
+f8QTzjdoy7wGZx1/F2sLMxxurzwDX1qnsM4cZndGhxyGd9wJnSFWWPk6zA9W
+nuX9vRVOzbyi7AY7mfj0esA5wipZR3i5cpLcEdh5LK7FHo7Wn6i+BGvGBf1C
+9mOAe6zpDmw3X+rpRc47AwW1Ftj7H/cPB+F7BvPcD+R+8/bHcaQ/bz+VE0e+
+bmJNpjlwb3uHQAkWt/Y6eB8uO7ewVRtOtTN0fE2ev8WaYithEV/+4RzsPPnV
+RhM2S604r4n6GW0YFiP16x2jRG6Bp+8tXjSJ9YS9Xf574VclBy81k3rESq6K
+gaPPLNuWA1PretuvwjduV9n4wwnXv1wpgbM6f/ikBY/6N7b8Bm9PvvpP7zKc
+S0p1mvUw3eyjVwrM1vAJbIDPUGNX2MHeEtlVtTC/XiN+TpOcz/MHquAe1frL
+ApihoSh3C86RinE7ArtZZIakw6llv/LWw/lpSWGx8D1PVTkxYu/ADWyY2+16
+p0QD6waq9TvBIo8jRUEw5ckn3nq42dfvgxnsnjghVIN1f7h/QQeuvn/ZiQrP
+tJzna8Ga/bz906hf84H2B0awc0TaBOmvgQfp5q5k/NzgTRE8WtCuEQcHDNyk
+/wkP67GeVMPLryqe+Ase961cOw2zFRKHP8Dqoc0XlBFvc4LI+Cucu+hFFhM2
+eZA/IkOejzJ7PVe4+hDzgC68xp9rx4ZHh+t6bIgl3DYch91Lbm8MJPXbHhV/
+CvZbtDAoCa7dr6JwAi7OlDAj+0PVebiB3L88KjiiBW649ajACU6ifP40Rvrh
+osmp1eR+39JYKSOcE3KNpTOIlyVVuFoH5gwVe52Hae90FP8D+5Xvv0eDBwyv
+ZmwzIu+poe/x6tifRh0bV1gUypGaUEN/p+8c2gUPm5/54gkH1C4+7wbnC7ZJ
+P1bF/j9lHXeAHe6uSDOGqYf/0LeA3SRTbt1WQd9f2sZZC6t+vUVbB3urp2gw
+4PByD7E6ZeQhctlOIeMS/FWBcKmLsdIQ8tGUfnhQAw5nLKgh+bqVdveNLUX8
+XfqHBKR/DkfXtMGjdKddeXBGzeTepzD94ZeLyaSeKTVe3bCfcvGiaNK/+zr2
+TcLWxp9Ph8HhFz5y1cl6i6KzOfBU83NPN3h4SO36EdJPaYkdXPiQ3SbhSdJ/
+GvJPnsOM6rsPyP40Kb19S0M+tTzHbTmwuLfVhBXM0856zIcNnqtPcGC6UCWw
+jazPN3TiwlM/XTKegL0/y1DyyPj3PxXlkT8v88TtLHhmYUT/epgWViuIgx3+
+5ni4w5pK23xdYfdcunMEXNroUSerQt6LlnlX4dGAJe1ViK941H3zPbi1jevh
+CPdO1W1vgk1Mf+5vR/7JPivlXpL7A+K59vDyoDKFAThpa6x6DQNxpIgpvCf9
+c8ohUweueDopNQwzt1rZXFZCHzkXbPwL7rwmH/ptCc6jSZpMF9xM22FxGP5m
+vcO8AaaOxV2eUES+sblF5TC/27k+FjZpZtpmwGFL8/KXwW4Xpm1jSP+semjW
+rYB4OpJ69sED2dJ9ebBDr4qRI9yzpONjNBzr1xS/Ac452yl2FM7Jdh/Ugr+l
+/9V8EjbZ0u9G6hmro2aaCk9tTi+kkvpxouKE8Lem4OCFcHUfz3Qcpk4UqojD
+7CfvL+khnoxned2SpH+fa+84oEi+P/10TgmmmPGYxfB48axoFenf3mvfReTz
+LmnOlnCFk1EaHfnTPkYu8SH93OjjYAxn5JpZR8IsX/qsDcz2MWy6BhvojSja
+wnSvlPBa2D3eqc8Q5g9HaLwl6zeXeFHh0j7vs+LG6Md574g/sF6q05Wz2rBD
+evY/x2Daua10CzggNzlSFvbLili/C056+KtnBvJjfD3FZMMNJuH58rDzq9uX
+w+BWUfVAgjzmT5wdOQnz9/B1xhdjf3dom52CB0Ya8jxg9oo9d47Bo7NZBY/l
+yPjZWwfg3uU1vky4uKiv3RM2qZP6Q0BHnV+HzdnCyVLGeyzhWpsbKwzgnuAO
+ZaEs4pzpPqAEc8pCdFVhb/bc7BzZj0cFrddlcN8iH6lBUp/Nsi6eMD97urWF
+nEdXGtdsgmmW+gd/g2vt3A1ZcKf32r5iuLgg9uJBOPKj/wJSX3pC/owA5khU
+J6bDdonb3zOw3vCL7FdppD/6H/ckw25HA5nZpP9G/ZvEEW+OOyPjBpy8dxnL
+isT/exG/isTT+elcFCzqFUg/I8+LwO5sOUwXHxglz8d44e7QLri0RSJYAvn5
+/SY/PQInCKNO68JMSZeQcTjJcUjSHk4dDBoUwWG2Ys+DSb2FP28Uwg3SCpmX
+yX5L3FWOh01So8zKyX7dt9A2JvPbdhT+FxZZ/hlegPiFt9RfvIWp10Qm95Gv
+XUSt7BeY6zJnWymN7yUKqZXiJqiPoKMoh4b3juR8CA3mmG3XPCaF/lAvWyoD
+h2/J07SThGkvu36EM9zvWqr/iOeF/G40Jr8zcEmw/gePeSis
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.425736195028037, 11.393326991679075}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVLGQ4rEAivZDQMpuAzLEBnjMSvMDhSK
+MqGzGdmKwrAO5BE6xnQjRIq8BxtVmVLtxpvwlm1IGGwZjCKlg6VORvwf403u
+vfnlfveec/7fyXUTZ8emm1EUJcJJ7pQVuXBp6r/Dk6ZoG2GFM6y6cZJ9BJ6K
+yiyMhk1dD5Yvw7XiVmMRqU/5a9cceX6NszkOMw/qzC1x7xqv6uN40ZTaNHPa
+A2bLBl+Sw1JbXZgvnC8zvjkJmwZYX7rBSZVcpcc+1P1e0sOAZye0uiyYYs2U
+z+D7va86+jYRL633kPHNOev6P2Cpzbc3kuGuGuugJ7DaqvMzJ5jVYffxNjxb
+ynSce42mrLi+7E1Y0sNW1sNMgcBuDvYPuhIgg8NVk9bd8LJXYl0yXNgTqS2G
++6//+X4cXL9n8dS7sAU74pcUmBtwasiNjH9ho0tO3lfzJUasx8DQPGmGE/R+
+jUOw5rx8XQ/rIuXvdcBsix9tgzG/uOaSD7+HuVW79EqY7ZB7u5nUj1RUL8Ec
+oVnwLVjYKtniI4+PXj57eB1ePmKy/QIWKiIkXhhfE8XIug2bW5+clpL1fspL
+NcFSxTz1G8zMEuxnkZxLBltZ3jRVvCUtJX1J8zePkMLc5M/5LqRPk4sOOpj9
+cDqVAett7HW2PjTVHtKWc4f0OcLpRAy8UH91pQ5W7lMYCmDhmR2nNOKGgPjv
+4GVOy2PST3qjuK0Z9k+ryLmP9Ri6p6LUsISxt60B1j/2qKuANUsDfjI49/TE
+2znwWGPMz0dhVZhYFw6rh/tcDsG6+Un+Hthi6+81EdlvX/OD5zFf9U2nvEzY
+ZzQttwUWjgxcqyb79+ILKYUw7V2eOAUHHox5dAI26ZdsXDG/qZFzIQmwv2Kw
+TEry3dEUJpL3My9a9sG6vEtjWXC/oEXsTPpQWrJZCZc5/1SeCdfPiquGYIo3
+/rwNprSdoUzMb9Y96deHJN+FO0WpMLP/1tpu9CFQ5p1wHTa0Hx12hGuNIndr
+X+S9ylh5BVamOwrE8NiU0d0Mbr5Z5N4OJ/BUV+7he7Wzg9NGWFpgebUB3l55
+ZuPpR1NBB0IOZ5B9JX16LhouE3VLufBwdod5Enk+M+j6iKynSVRzDDbEHk9v
+gh/8o5WTek3kNxsyOHBNZ+ZNrK/pjSf1L67lU/A7JdX3wuHeXM+VUYx/nPeV
++1uwYPXydA3c7yrgHYOHWRdWJbBQth2tgH2yQztD4SCDfU4P7G//QZgLrN7Z
+LCD7y3CX/9QSZpo20+PguQN3g3fD7VEGyQ9wl/Z+kgPx6Bt5FPKQZyzL98P5
+i2FnRHBlrlKRBausWrQquJ5jHUzyYhVyfCZgbk54xnOSV5uk6hnJW/fJ3lis
+x9QRb7JF32rLeQuNJI/ss1V2MJP8917////nTf8Lzx3MNw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.261512611302877, 11.151252930219968}, \
+{-1, 1}], LineBox[{{5., 4.4999999999976925`}, {5., 11.49999999999251}}], 
+        PolygonBox[{{5., 8.6}, {5.4, 7.4}, {4.6, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 8.}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 4.5}, {11.99999999999251, 4.5}}], 
+        PolygonBox[{{7.9, 4.5}, {9.1, 4.1}, {9.1, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 3.5548}, {0, 1}], 
+        LineBox[{{4.9999999999976925`, 11.5}, {11.99999999999251, 11.5}}], 
+        PolygonBox[{{9.1, 11.5}, {7.9, 11.1}, {7.9, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 10.5548}, {0, 1}], 
+        LineBox[{{12., 4.4999999999976925`}, {12., 11.49999999999251}}], 
+        PolygonBox[{{12., 7.4}, {12.4, 8.6}, {11.6, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.0548, 8.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{15.5, 13.5}], PointBox[{5., 4.5}], 
+         PointBox[{5., 11.5}], PointBox[{12., 4.5}], PointBox[{12., 11.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws41NkbB/BfJdcSuiCXxi1CkiiFZroubUlCbmVKdBOjVLZUkxQraWxk
+bLWNJUQrXVZUNCLdtCmWITIKKRNDuiv/77t/z+M5z2fOOe953/d3fuNhtCHC
+M2QkwzAD+KWRkQ/jR5vDKBO0OEyRQ0z6dliybtF3R7LEp6xzEofR8c44mAhz
+U7kXt8NFU6fnD8CcRc0vVWD5mt0p4eMx1lTJyiZyGKmxwbqvcG3vgblJMGtn
++96UCXBrwY9dcIJ70CMbjFxJ+bR9NJ9g9KYGo+CchPs7RsbVYmMo4rIOybSe
+wrWdbaM+wtLn207pYZRkHBy9B3nK2Sreu+DoL11enXDtk/iRTbDtotVlLjrw
+AaUWDj7neueOOwAL4ppkObC4ab/zediWl+M9GqOryRPuVVrfcvI3H4xFG1Or
+LmAUfzYpS8OYoPrLo0SM8pBb1eUYWbarJH4YRS90L/yDkam7YKqHkRsRnliJ
+UTLXO7mO8gveV3eG1m9asTYB5i08NzuA1vdmKrBp/vrhXAZWvr++fQh5c0v/
+WSTA53lGiV+ryX2y6eqw1OFTVSbM978ccBCjSGraK8CosU074A36k3fIyTad
+Ps9+O84T5o/YM7MY5r3dtv02+s5fEs7rhQX5zjPmwPePmM+n87k67anleE6O
+Uk71f33pVzPxh0uUakyNqf71mdvHwjrNjQl/Ub3HP8qa8dwlz1U3LNZFHYYr
+pJWwjtb09HZY1NYz/z65YULlwcnY//hoSRec12ewS1cP/b7cX6WPeDxzix0X
+YLFg/Z1QWHJwwntLfeQ3ro4lhl2PNbRmwBoXk4UmyHdzHO/jAMxTYG85Bpfk
+pIy2N8DzGsz5ox8WeKu+D4CZrXfWeND9621+tpXmDZmxf8Ilkxd2rIfFSSue
+tcOOvg2xi2h+rzRFjfrYF6g6nuZjGBd9uDa0sLAe54lsE+WaNK8e73YcZmVF
+q8mw38Ppd9ZC2GPU5tkFsKv/6ZzPqMdDpyRgFc3rWc8rhjU8LgrakR8TV9J5
+EOa4/y4PgnlN8038YdaiF9ueot7Psmc5rrDo5xdJTrBwcaCdO1nW4pBN71ma
+KCoMri0v8teEPWaZfciCufl5pQma9FwlYwdhwfTeU+NgUXPtgD/yq83P2J+v
+gXFbxb1/YX77ZpW1sNzK8g4X9bKuim5Og0uOZft8ggUdBq2asIWfXUSqIdYP
+fg2fCPuOUcizmwIXx1rOonjVbSdqYJE/T7AZvr/nZJQNC+9NdLXiFQ3qk2NU
+BFw7SzJKDflElXfPzoUFdw8tDocVHqrp1dN6XWW1Btha+JL5ANu2XQp2pu+d
+6/1rVIzQPx/JttMwy63MTBP28HcVvoPlRUdGj4X5SqGfptP3zHFlox/Y7+G3
+MMwXlp48Y9wFi4evt22Bh1juRvdgLnt1CBe2r3sTn0XnJy/zpH7L2ww/76f8
++nYt+Yb4qYmaVn6waFTXlD/huIr62jmw/KedvXaw7ZSVPH2at1p19zLyH1Oi
+6qYCM2fXnDCBozf5OjK03su17jj6ca1CKWsk5VOc8Uo2DufOLd+oSc6NLa9W
+x/sxcO2uNSzVNCu9Nhb9nu27x4vmP4wIqRiDPrj0p8fTeeVDHR/UOMzgJZuy
+KjovyZbvB5uqqo9WpX5oflnWr4r7dDbA2htm2bDf3oa9Jt26kEX2btt5F+5Q
+GXo0AHO7srYPw/XjnZrZxohf0vZ2M+Il1EbaJ8DiyqX3vsL2Px7veEBWWjJU
+gHyqDMNjR5ggnlbjmB3I1z7OrNwGFiU3xy5APaIlRiM9YG7T0B511OvYcrh0
+I82rvzJ5DPNWeXeGkf+Isp+L/ghjdulvgTmNO633wnlOKXH+FD+uy/s83NIQ
+XrUQlj5amHIdlhg7yE1gefWD7kK46i8hj4EFun25ibBIV7urGflyWqqCf4Yv
+NqWrFMP8GvXuTpwvye8+lgpLX8y5oQx7dWV8iKb6rTR9lZA/P/pGQgjMcjVP
+6kG9+oatZoEw8+RUoBj9EPIuOKyj+K+48Sno33Lj0cIw6k+CxcetKhwmW+Fc
+RjzFf/5qhq8yvh9m+ckLyfZmT4KVcJ+OlZW3k19uGZWuiPfDf/UfhtSPfl+T
+L6NxTpV/UTD1w13L+wQcU2t2rZA8IdcjEBY8HGX8ndarnmZzYUlPjNtyU1h/
+8IYQti+NisyA+Rp9rxnEl9Vd+dwOS41GXklRpL/vK3aZmCHfzD1TFiKfluz9
+TwNgacXFW0rIV6Hy6MZfYZHNgE4j3DHjiGIBzD81d2U26kvtnmcohjmXbVKD
+UT/v5ay8+7R/zORKFfTHouHd7Lu0Xv71ZRI8pmaErJji6WWd7YC5Nplbz9H6
+gqVZquhvzUWlKj7MVWr5QPfNevGjdWthVvJ9nWuw6I1t8xw6b22m8Ry6ny+f
+92qRd1oXxeN8YeQK937Ux2K7lBYgP0FtSey/MHdphFsB8vfNKqitoPpnarIE
+qFc5/INeCSx+cMMpBP3Q+KL5tJTs/81nNvonqzWtvwdz3DiB4xTw/M+t2v2S
+4vfGNH4bieet1R+pgvMZB8cwRTjmx5N3TuStPB/HERh1PeOjqZ7cxUNCBu/n
+vOENZdRvq2Np0+Eoh78XKk9FfEVZc/8wm6mqiRL5wIw0KPYjPMbk15rzsFRp
+hIsd1jsrZo59P5Xuo4FOBhzm7F/hZI75Q7WPLXDeGEnpvv3kBwGRErg7Tde0
+GBZvyRCeRX7dbbbqHTDHIkwSNorDTLiqrq5oQd/flivmob4E+0lH9WCuX47F
+V7jIe024KSwOn8XORD+sLWVeRjT/Wuu4GfoV99xnzXhYaqtReAAWJc2YOETn
+LS1ZkANvdqg40wpzj/LnCGHHuzGeN2DWGo9hT3h5+Kb6VHKx5ZlGxHftkTRH
+0H5VXeE0WF76Q9ud6ol+3eSOfBitPG07yr8jf91K5C8zf84ypP2H/JrtUZ+9
+6bnJE2AmqHuRKuqPM+DsmkjrzfOzi9HPOFUDXROaVwtv3/Sdzdz69XGAC8x/
+VR7E/sZm7v9mNBRMHvCL9vzCZhIcrMxOkW+q3br6ic0sXmYT/YzyO9g8ccdH
+NhMdNKyvjfoZm0od4Qc2o2+iLlkPcyoCD1nBE0TjzYos6H1x67eGi8zNvIdp
+XrHgdTq83LaqcPk07D/f/3ED4gXe35acBvOPH3Xg03mxk442wmJN1Y7Wz1jv
+snivhiXms4MXbPqK+M5mN+fDjNnN2NFDbKbDrlxnPXnqvVci1Fc1ZWL/blhc
+UnrHCPUPqpXP4dP+yiWtjrg/CrLtu/fD3ArnNeXwoNrx6giYk2/QqoP+Cbon
+VvnCrLS27wvoPs9eu3cezd87dMoBtlif97M2nSeJHDWA/dfu/l3fj3ylDw3s
+o2GOY+LjGsp/bwo7HedvNP3cnU/1Nbg7diC/+qbga8n/1b9xxmv037pvyS97
+Yc7Jpl1X0X9fRYkRj9ZfnPR2HfoxKLQzjqR4P64OMNTvpHehB2j9mfehlwfY
+jDBu/DIhxfsyGBkvZzMtYbLkctp/9d9vtu/YjO3Dpxvl5MIDm3vf4D781MOz
+pn5ct3UJec1mPEyCXvDIESu68jvZjPM7+6ibVJ/YbdqjDjajc6/jkooV5lVG
+CO/BLTu8X/nCjHX//nSsH4x46ZVD86YcVwvEi5vXE9RH/l4YvA7nSfaFps60
+hkP1jk6SsRnTd8N1W8nfLL3M+7CeHbItA+aoXc+d2c9m+JNTp96CmbD3ex+j
+vgTNOUHPyPMfxqwcZDO87aEKLWSFynmZ6EdSGu90E+0/oXa4EPdJppA5t4bm
+tfK9Q9E/LxePPX/D4urDl27CPKvGwHRa71lhlgML3dyWRdH8R89lxnDLWO3n
+7rT/SGf9TMQTq/VUT6N8M4OSn+N8L3eHCiWydsuw5XvYs9u3B/VyWl93z0D+
+y1u6mxqo/vMvFL+h/851Z2fWUL86XZxXox/1ht2NZP40yYx09HOC2qmyJpp3
++MvkXRvqdTVd8J58ojuN3QivWm2pS/kYz3b99A+byVtZfXEZ2dmuQFKB5xOS
+FHmUzFz22VEIRxrnPiRzXJ3n7cR96pyuPXE6LGp4/DX9NtNSKeMEkzVOBjhl
+3GY0DhruuUKmH0HZ//8ftuH8D75reiM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2371675279736856, 11.129988497564629}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8lNsfB/BT9jUqSxIjiUKmorLUPDcpkaj8SoVGyVVZo6iUsUuK0qJw
+G0oRWapLqZhcSb8oZEti0kaUIW0iv8+5P//M6/065znn+/0c83geOtv91++c
+SAiZNoEQ+klE4/jRZsgIPsLZDAm9uk1PgsWQTuna+s1wUVbI018Yv3IsdMtC
+mK2iOvIc9n61u10BFm5bvDEF7th+Q7LZhCH1subhlnDRuqGu0zB57zTlmRZD
+BD8Cjd1gJc29Z9bB3jfVjpjA7GrrlY9mMGSNRsSgPOzk+nLYFM4piTH8Ng/r
+v7J9fFGTIXw5DYc+WKC7Sk4BTpboHqIOiDz+IWI6Q5qSIs2/U39cu0gM7lGN
+fCRH13fbaXNGgyGenas79GF+aniOJVyvmrljNSzs3aH8cxrWe10j7wdzrScs
+eAYHWy3xTIEDai7klsPeFS8+l8Csks6xatg1NN2mha63yYz/Hv5xX489QOvX
+UBjXwPrC04fuj9N+63ZkceEbn/9rJIa8WO5O62/C1aFBAwTmO762UUS9PhrT
+Lg1iPi9hlYsPbBAQdITmyaiO/1EDV42l1F2HBYKDzzXRf+jLPb6H6Pit6nk7
+YfXM3GIO3d8mcywdLvIY/c8o8uAGFmUKYKfcxt03YdY/d13r4HSdPcv+hJ2U
+DP0f0HyPmVlrwMkF+w3p9clF/OGnxgwRPSgac4NZyVF342Cliude0jDvjPPz
+lbDATbY/g+Zf5TJfkc6XyxvRgftHO/26jHD+t7UqU9GvesqB0rswr22LhBSc
+PHX07iU6vmz4XSDyc+qvu3YODnBUy+tUZ0it7Qdjam5ZV+x6at4Jv0zq6DTX
+RjWGzDLO1/qbzh8/mLAdvj3uEFcP17dI35GEg0tL0gZhoXLMjQeqDEmU11dS
+RX3E8r31GThfb3uQJZyc3mYQSd3VsHobrT/pvFg8HO08Y044HTeR8ciGGfZ4
+YyrMt35Y0wrXts9few1mblxom479fjS4jhbTfN5q7valfjEpv4D61QPBI9hg
+n/iVi3CRdlS5HvrxOTL572ia3/syzUh4RVy4gTutT7z6SivsOj+p3giu7+gM
+0kE+PWEHv9J+mG0FM7bCntoLVhfCLBPTQR4c3XC0yQtOlnmvlgzfjs8QatB8
+WqxKY2F26p5XdYb4XOUk4QmveXV/ZSTMv5y2zgBeopAUbwEnGyZMaMb+VZO1
+3/6Yi3PxGOT5wAYDrzdWwPxZs/WH0E+NJDc6CS5SaFPeDScr/r60m9rT6Xsb
+8vF0CQlaN5een/KQNcwa4c9bAQtTtWyLVBgi79GQuBxOnuDO1oVPq8hU2cMB
+6rmpmVNRp+udk+50/3qJARM4/2W17QG63pCfqGEKcmOM3p6n/m0fngDn7/Wd
+UQ7zPu2M2grbXnwd84aut+9ekw2cM1SWKYX+WHmzF6yGSdpFMQPa/6/ZKzzh
+Fccy/1xOx2c8zzsN95/YVesM18fNndEK19gfOepG85lfGqWPetqGCz22woR0
+m0TAPkxHsgP1DTG5LjinKbBpIcwoiJ5Z0n4vOPspUlvG2ZyC4+9NnNlJ+4uo
+DH0FO3VOM7pM651S+kUdeY3uuWC6HRY5Gg4w8FSvCCsNmLw5G7YeTn4UHfd0
+DhxXdsUeHr7dGxkBBxR6xhnC99QSr5nBrLqAdUNYX0nB2veTAfbpO7k2E75X
+0KycB7PZExosYJ/9+RkBMItfOK0S9d/T2VzOgZM3a5hawvGyAyXTYF7VhsfX
+kMfbE7/Wjetj/iezfhVYPrusTQQz5r+FEZPx/fTpnfQZFvg97P6izBBN0WaL
+bzCb794bAAvtDHWksR6/e+beMSV8P8PtdGbS/YcV12bAVtnZS5fD9Q9cQzbA
+OU9XmnnRekP9RTpwz0Nu+jFqi4jrMjBRW/y9EFYykk2QhWs9S5rrYcHOjXa6
+cFtkwuc+mJiY566DBcdjlozDwsM2gadgA6llE2SQF7stiP8aNhX1jEvB9e9z
+T1ugXlbOXzt+YX7AHjNOKqy+wKejm9b39rfrV1h+Tu1f5XT/XLHiNei/rYzr
+kQSLCo4vO0/zKJP6z0Y6/0MmrwUOjuarqdB+G63SCfITbVfNqqP5xM87NhWO
+L9i/IJLa585SJdjpp8RCM5i36XDxEK6Pl96l3Tsb57OwaPQunP9WbhcfFinr
+O/jCoa0/t7rBvMMWL6XhJg9niZkwt1et4STqTV8VoynSQ/9Dp/Tl4ej9c0Q1
+sNPA2IEw9K+pe3TTdZir/DH72SSGXG5YlptB57+41nNFEflb7is9D/MWXjQ/
+qoA+at418GF+mFUaT54h0hYRdcXUaY16Z+Xo75mv8hOYpXAkq0EW9Vc8zPmo
+R58LrpqawzURbi6KqI+Ja1JpkEH+WgmlC2HifssrDeYl9dq5wIKRCLVUePji
+t4sHaD9zi3uqYGdLC+8zdPxXT9QMrOdyue9ULjVZmJ8Gk8lvdtyCWbNWRy1G
+PemSwlhqppe8/kDrC3XQovO5STJ3slC/S3dX7Uk63yMlwQ39mYZk3fGjeQ5L
+NSugf83NK08wMD+4MjEXTgyq9pem9fJLEvSRFyukePARzUfJeCgcdnl3RTyC
+9r98Tnw+3LP3sdAMZqSv/8iB+yVVP/XMQr35LZJB1EuLL6fDRL8yWxYumuF8
+aAPMj1D/GYj9DE7KVk6CGY1VS6+jPvm6vcef62J+7J+plai/Ri/9Lz7MM33b
+fAf9+ZTEOobC3AONk9KRh5NQM3orzMhWrw5CfvxWB74d9eKoCXbS2M+hNMqG
+Xh+7s2yuFP4ecBWP2VPfTYjXlsT9YXjxOXo9K6mJP18C9yeXB9OC6fUqGUPe
+4vh9YubNTqHza48/eyLGkFvhW+NK6HwZn2x3WJ0n3fYSFnS9q9WFZxXvzyC0
+n/AI/+nw7bFv22fSPEzqY6zhDouFzctoHq9/fDoHj8aId9A8yGz++cnYr6Oy
+tHgbzF3MbsiDPX/d/8al4/PPHt2C+vo1Pws20vFn92qmon5bQUE2Awvfe0+t
+h/na58q1YN7ynPcR6De9YkPOIK3P8uFMFvIY7W0/VEb7m5MXkwm3mVlVHqR5
+y7bL/4aZZad2mMJ8nwBHE+R5S/D8ZO9MXP/b5yEbLrLxL0qHuS8VR8Yxn7dU
+YO4EswZ1r6bDnrHRlyRh4UGV29LwvZho60odrJuZbGqLelK/ZJjFwKTu9hQP
+Wr/u+hXr6Lh1y0/a39ScjiZ9mK+6480y9B8vKmyVgbnH9R+oIq/QQ+Ll3/Fc
+z0jcl/k0Affvfz4HD7Lo31Nrm1qC8wpb4PUNJs432YfHOUTpn8dHJHA9T+zh
+lQtjHGIU0moxAxbkqatOGOWQ1LTwEkvqvQqH749wiLjlx0p3Wo9kntaLnxzi
+Kh73O+rf+fenb4ZHn0YN5FB/7TRfBrO6HbWf0H4s3rRHw/VbRsx66PVVsnp6
+WI+psJz6m85/uGTLlF8cUlMs0yc7k96/vbcw2F9cpdBRAeallNjT+pyyjtqL
+w0zOXa4C6q+1KPcaoP0nrt6yHP1xNX2vP6V2jT3/FW6ablSYRfcrDvnjLPJg
+xdeG+tD9dikPa0xkiFF2cbwxtcL3o4dgloR5+QfkI3DQ9i2GfzzrX5FB89ov
+110KG7zxCnOieep4WiXCwamiV2Kw8FzxqDGcHCddGYT3Ip7cu+a/sB9bv6qi
+F+9BfKl9F7pRj+2hxhFfLXre5bq/Uf+SliINcZjYNQZ8R381a3+NF+C9iBQ0
+tFYiD6bc/3IAzBj5Tg5GfuyX38XtqP2mjWl/55CAOwWqlrDgu2nhy2EO8c7e
++mg5zJt+OfnuEIcIS1xltlFPVAppFHHIbd2wj4l0/ZOcXI/PHOLSV3yrhnpf
++MSaPpy37k41RdTDu1m9pq+XQ7hCj00u1B/cr7b0oJ51flFZ1B+9IhPh+KxF
+eR+o88qjJDFf6Gesqkv7P5NaZ/YRdh4PcaLenHlJrB/ruW5g+cDk4Jk/12N/
+3oJqXZoXc94gMBz18bw2h+3Qpt+nhHeiQQ4puv5Z24peXy5Z7v2FQwTpzXJj
+9D0zJ1HYgH5TXfpWXKX5Gfm2qH3D+pl2tVbUxo8L9ZFP6laZowLaf+ykFhHc
+s2FEfxHNj7u9aucP1N/fNpSJ9xzmqzAjDK5vvsT/973ntEOaCSw9sljHH+85
+TIS9/WFc7/Qw0Ksd7zUkdVeWN/brKVtk7Eitsar9B+qpOfvfmgY8ZwvcGR1z
+1MvuuTO0E+Y56mgtQT9cg8BMRZiYJVxQRP9stsOHOjx3k3C/sGDkF5qQ8vIy
+tVVy8JO3ON/29SdSYN5ehbtLhRySI3ND6jwdd+AX9bTiPHP+Xn+TWs2obG49
+h/D/EEvpop7Y/0n6Hw7uH0WzNOh+PSMXbhTh+7jvTpU7taBH9/Ve7Ge9Q5Dz
+73jqg8X8CsLN95/zhVrdlK1zpYIsKe+VN6f9OSWa+l+sILYrdK/to+a11M0K
+RD5VkVcvUxtUPp1SgPP2aV1eSe3ckX5SgDyPaxx6Qm2rZjvrCc5j3rP55dSG
+3LNOz3H/8Tq+/Dw1f7Hh/Bf4/ZK8leRK3XfCp6sT66XcFJOhvpZ+VLwb/ba/
+ieXT+iLyatnIpyfV+aMetV1QdeM75DMpuiad5mVfUf70PfIN3egmQ/MIdFig
+9IFDRMWymwLwHkM47SUJGK8/syirBc/RvAH9GAtc3/ZcfuEf1I7k0qw3HKJ+
+Y83TW3hu5tW55W1E/m2STJMZTJTW+9WiXp6qilINnpvJkFV7VwPyLCg+7ket
+NV9hcyXWb2kKMaSmP8n3//9/mCnM/wDXOWeR
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.475611817684063, 14.487402206687182}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlcjOv7B/CnPe2brzaatDgqytRJ2XpKKp0OCamkpkiKKFmzNPYWlehk
+iWMUBwmpcCTTFCEVKdnimPZFEUmYyu9zef38wev9up/7uq/rc89SjEPX+YRJ
+MwyjL8Uw9C+jRH/pssyvP1osM0vt+CM+LCqKNPSBXXoehajpsQwnJs86DW79
+uenOWZi1NAsugiM1bmxw0mcZ3ryGF6Vw3f69H17B7Eh8cz5slb07Y50B6kek
+vz8An2g5KjcE5/fG7HSDV5h5um0zZJk+4Va7j5os0zmzoKcLtvF1PrYPls/5
+zW3OWJbxTkoeUYUt9JQ2JsOC7i2+KRroS8Fr322YHa/TrwiL7gxvaiBLOGdU
+1FnmcNjsWa9h3tj9V0ersczKlKp/q2DOhVbXqaosUxxhdzyP6lWP3R+nwjJe
+91zn8mn/uz2mHcos8zLD+Z4nre+QKO6BJw/9jNQgix5q+cB15sfqG9CvOOBF
+z2K4NaMm8zTMZC2SpMDF/gFj18Os9crQQThutNe6BTC/qNAsBecVn01ScIZF
+a8ODPdDPf8L1l2fDnCr3gxz02/3J0ncp1TuR3aWMedaHq6gn0nnuI+KfcJHb
+90/VsOD0JuEWzP8j3dXUHP1peA/3dcPNwtHiw2TJjOULkB9naOCAxjjk/URh
+/Xm4Vvvi3Sw42lveugu2lx19zsYI9Zv0Dmrjfgxtz9Q/gpl+nR2msIrDmP+4
+HJY5tGSRmgG8Y+hRyE6Y78yuG8T+zBpRSQWtv2b7iuG/0q63yhvj/vRmfgmH
+e6vqtFlYQ9n1uRRskOD0Zp0x5bvn3kH0q+fUNvUvmK9idlgVFg4VH7kKi7+N
+ldXGvJMn6D8XwkzsRT0V5JOz/EXwXZjz91UPTeS345W2Iq2LdMM/WiFfceCA
+Vj7VC9HZsAr5+87KM8mCeUaL31YpscwpuxCLXVRPP2PrMrj1Td28FbTfc9Nx
+Yzj1eupLN5g1Z3n6sEJx1WhL6mfAKc8dvlIhcdam9T+ddc/D/xuxjJKi+me/
+j7bDedKnZocNIg/RK09OJ9zSYZD9FWb3T5G5jf5OP/P6naH+tdzsc9C/qlGI
+UIf2x3fPycR8IuMvy+3IjSfdEjF/8BW5uiDKT+f2Pw7I59XNzJlHKD9dny9n
+YK/F4VG11H+Ab6UEjhna+EBnPJ6vFqm6IO8q50uhQXDf8NpdMfBX+48Gl2Ce
+k4z4ALztWunlb7DIoPv7HviaxKXS1QT5tEWXhcHDfWXWKXBfSeAfk2Erqeiq
+JzAnR1L+DudJ3NfdVzLFeX62Pjvg/hit0zNg7+TMESVY7d/tDitgXpvMD33M
+I9nS2c6HRY99JdqYd7mh6ubDsKBf1KaMPOY2+9gcp/X3Ly+qIq+KvJKnf8Ec
+27gqE3o/2ucmJtL629LeJcg/d7imcyPMX56/qmAUXv8qHbWBVM/FutcRlngP
+B7O0nmk5vV8RfWTJvRpP+/9y7BXD6o0fkuSpv7yXS2XwfG6i5c1ezCf+mH3c
+Dx5qf7LlNSyQOpTwBp7GXXL5McxXDlFIxPkVHeriKlg0zvl3X2V6H2k61lM+
+AfkPp6H/Db5x0W0wu0Ky0QrzLb8Sd18a57FGDTx6vx/UP8xYwuK1kzLo/X5S
+rLFmGfXzSn9bC+yn8KjtGOW5oNZiPvJkn//d3gj3TTOtOw5rjfhnmJrBrwdc
+HsMzkjjPo2FBdK0UfR7ISR9dLYRrve7mvIfXmN2WUzZHvSMK/9XBW4XBvEVw
+7WrHRAF9nny2WXoM1lCXOuYL55y30myAxcVmMn3oJ+xccq/iBNT/2uGsCben
+2N3hwpzmVzr6mOem7LfbC2BeGFOgg3n3GsqeCoNF0mY9ysijSpabuhZmLFbe
+VkJe2m9H2UfRfodJ9wyQZ9jg4bxQWHyhrMkDeRvZsuu8af1Nwq0TuC/dHzu8
+HcjdZ5bqwme2H11uCPM3f/9yXwHfM1JP20bQr0Bok3kRfltZaNYMMwtrNMvg
+kbqsiIewKMq8Xxn7MzpOPy+EeU9jU/fDpfGdfv/Qfq8/J1ri/Pjf41LPkNe+
+cfwMp5xadp3WedcViuvQb2NA16kblI+pdHI55rlQU3HmKa27DLTewLzZIlXB
+IJ1fPFBzVpWeuzkygeabNf7ILuRVV2B3LYTyUCuaNRt5DggUXHMov/4uuSa4
+UL28pxuunazYMBH3IZ9becr+N+w/PL3VE65cy4zdC/MVPin50P3H+Bs+JT+I
+KZsFG47yXGgwEXlZP8zRhC8vHjnKg8UnlZ4fQ/3LadMG/4YF07YWtdD3j3dT
+5TOYKVdnleFxmlMeMBbY3/ZgqS76r477qDUeZn3mqY3GfLfmtbs50PrZZdoq
+mN8jcO7m2bRe5xWmiHzC/RqmuMKMf89dHeS3JPfa5ulkYffM6cg7Ut2/wAIW
+9bwp24v7GVshc1abvLzg9jd5lrnHc1r0Df3wBuvLT8Kn45O+v6Z+FTYEboCT
+XN6L79C627/P+PC7/JRFOTSfS4RNGbyneNfuFFh0sGIqF/XPWl1dsZOenyh1
+4jE8IUvx0maqp9o9IQ39CNJ7L8TRfgNLk9XoVzYo0S2BnHf3bz/MI/f5yVcB
+1atK7vHCvPeSDhTco3VzVe2ZyIPhZn77TE456TYOeTmMP1RP8/GvbeO1w7OM
+PFsjLahf8byDyFcrQhJ9jeZ9q7xVEffRscNjyxDZ20R7MRyVseLBXEu4d0LQ
+Wlg3brHWUVjQNv+pDxxR+6dqM8wPGrCQgdVS5Pb/ZoXzJ4Ss2o368pe+bVsF
+8x9VnW3A+bkT+fYCmBcl1SQDJzg9XfKYnlcbc4Pu866UZs8nK/p+3f9VB/Np
+WD6PVZqE8/IqnVUwf7rzua4xMLvIKE2ePm9bLMr1Yf7E5CI15Nerx+3Qhnlx
+rh8nI1+l7NTLsrDoS8n6aNxHe33k/Q9W9P1oKNMoxzLHN2VZPYNZr4zTG+CO
+7AdqN8kJXNYZNstefPM4Pb/VMNcFrueax+6EBevlArfAG6/YbQmn9YVlR97B
+nKu2Nb60XlWwJpZeLwNc23k03/T7oyehH8tPrlrzKQ/rfwxl0e/qRd8jAshW
+PY8+wBel/e5HUz5cz/RmzDfH4LnjYZj5oLb9GeZ3HZcQKKR1+5+XbiEf11Un
+vL9Qff/5jw8gv9da76q4lI/RodTfke8uI0XzLZRH+7nhYviW2afIcpjR8+/S
+xP3srJwcrT4Z+2Vvcexhn28DPYHk9mXZZnBlr8+RC2SP5AIx9ldGHp/YB3Nm
+zXoZAY8oDmRPsUa9MR5lFfR946Rkv9qacrioJkF/q/SvRGfBfFGEshbs2fPa
+vQwWOKot0ME8/W1TTN7QfqtLy1Qwr/GDpJb3sLhblyOHPMSJc1v7YHbp/PhR
+yG9a3upBWuc/0ms2Qb4DSlsD/6P9ST4ly5D/8ImSgkpY5HbMvFQWP2/MWdZx
+lfrxleydBz9KMeQcIX/exmrAMdHncjbS89WhmfKwS1m0yB/mrTwYPwU2L1pY
+6Eznp9zMT4VvfK9Ntab1K/WFejivK2qGqRmdr+6gVw1P9b780YT6DzgnPIX+
+tExPKkwi50pP3If+w3+KNaieKOpbz2bMJ92VOZVH/cR1GNP7/YSC7aQkmk/F
+4/VC5KOn0WYppOcT2ZMTkF+ZluHPH5SfnXPDGzjo56oEIxvUL7owezXyv1+w
+b6YrzDNpWVANb3MKS42EOVGjgyXwD70Hfun0fDr384AKy9/62mrjzV92a8DP
+h3y+8rG7jTBfUDlmPp6/wB2YOkwebhosxHkLG3Pb9Kegfn5aYR/629RXPcoO
+Fq16MFsVHi/co+0Bc0I3ymqPYvnh7+bm+sJsk+2fKpj3knvJtWDaf2ziTxnk
+EbC5znM5LL4jUZGTZ/k3jsTUhdD+IkZaH3kqz4t8u5T2m3SmeMmy/DIpNa4P
++X2j3jkZ/D7z40zpHJj/T9FqC/iTp3rGVKov57y0SRrrg2ztb9Rf54uT1dIs
+f0FZfhb1L/bandMDc0ovjVGj/T/kTjrJsHwdo0YfWXr+msKuMphZeWLmiA3t
+X+m+BvcvXZJ1eghmxnVzHNCfzxYvdQbPM5cC6wzQv1Ds916RHLdKT1WB5b+6
+nek7hvrxfThWSpHlN7ftsbek880+d/bQ59W1CDtXOq9M410F7n/ZLd0yml/M
++5/dbiWWv1FHx2APLAhqXKKnzPIblTt9z1P94tOL9sIZ3t4RNbT/caOBEL7y
+7x3uF8pHVkN4F/fl5lqSrM9FPU3L5Ay4PzZ/gRMskjPW5+L5UZOCY0NggXvw
+VAHOO190fSgeZta/K25FP5FH5xufgNmxF9wVYD9XtzlXYf7nPYMa6D9Bt0um
+FObdSv+qjHn33dW2q6T6HtLaMnj9W7j1d9XQenzjHCnk5W9jvumXHVodNXGf
+QV+cQx+SJ39qmIG845tbIqkehz335CDuhxeZtrmQ6ikH/KGI+9SLKTx0juY5
+tCilSIrl5710fZZJ/VzMLc2AK9tWRyTQ+g//Jxfhh37VsduofyfN0M9S+P0u
+9It8DNU/ZNgWiXpjPm3XjyQ71hap4nwjy6D4cHJaaUA9Xk/G5b3PI8idmuIC
+3H/6mu7kX/tfRdhky7H8r4ubanZS/0MGiZmYd1wUJy2d1nd0f6SfJ/au8Np3
+kfKNnZAXivv/Y1yG1X3q11fujhnyDAwJqmmn/gQSd7p/04W2e5VsMa9k+w9H
++nzcnvSHDcwYPgzYifvZZKWpsMT21+8vsmkwt6AnbQett8yvicTzF3RiyrLJ
+S4LqteAWYem+Cpgvw1uXhPej8GZ5UyvMa4rVeEGfP/T/MHb///8xiuz/Aedf
+Llc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.760300471822903, 2.1176044036804296}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/C/0mOd2EnZHqbMUNGDGbvVlkf+yJZkjR4KPUYPPTY126LQ
+STSHSWKcTQqbKbKhx8ToscJUSrbSzDG2dHR2NpRITQ9pZ9F+7+7/nDm/87n3
+/7/3+7vzYkck+UXrUBSVgBep/18smpqYxrWQptRVjlZMeJZ90LVyOPhGl8AO
+1shf2wfBpWFbO63gder42xQsCp+kdeDiuMH0CjZNcQ2Cda8voCnDYeHeKGLH
+omdcWF8pnraF5dru8kvWNBVvzOp4j+fkc20rP1vRlM6rY8VPYbHD/dlB8A5x
+Lt0CS3JKom8yaeqK0faghzB9LmWhJZwqXJXdBfPcYvrz5iNHi2n2BKwuf/+J
+A0/+qHCZj/0Y9rsG31jSVLrYr8MLliZ667bBvjHrv9kPSww4Pkr46mKtYzGc
+EbmN9xFukdOXHxKvHPPzxnqNOWeH+0g/bWtSKuHYkhrDUTJ/SGLvgDwTx2sa
+R8j6HtL8Srj2WdJAL0yZZXm6op8Wlt2WO7BinFkgg+tdTftEMM+9J4uN83i+
+VprlDYsP1tnsg531i4w/kXN/GmpyDe65Eai9Rs7D21SnDp6oY9P+pN8+u/5i
+ODdpzFmLc1bPMFoQA6t0niQGwfwXgQJDmBnsN9KMKolrVmVjf54vK9wXlprs
+XDqFvNy143+NYFxTe0IZCEsOUE23YOniMoMK9OuUkrKmAM644Jk4C/bsiU6+
+RObP/Ba+F+eVOmdjZBOZTwvfMWFBU1NFYa4U1ucV/7T/DOyddunQFpjx5OUY
+D+Yt4Z8jfTGYZmoXmK7SrNZHXpbcepiGE6wjtSGwJu7nXQLi7rc1JbCUeZMj
+h/d+tt3wDJYf0aMdsH+7cLB1FM4w+KHzKtzqson9lty/b+mwE/IKb8ntmmBJ
+uIvxLdh72rbzAKzwsijnoN/2U/HLjMl+5q7KAri1vzsgB/nkGz/UDsKaQYvZ
+E+hPrDL1sUA13MNO90WVcBtTbFBnSrXVhbhPsPyI8Av49TyV4zj2YXHirR9h
+3Fx83skPFhyzCtgN5+r/GdqEnJLMuZH9GJcVX1i1GZauTIjgwa+/uycj5yio
+u9tZhnHmlKOyHuYLvtTTg50mtp64SrxwUBKBarM7plqKqh7Xe/PYnKaGhkOZ
+3eR5o0I3P5jR6FNqhufUN58mjpvRVP706N1YmMd9K6qB+ZXOV0geac8K3yI4
+KvmUDgs5uF0rLatgRveN2H2wdC3vzUs49fThrjuwgtcR74b1H0TYrh8i81mL
+vEpguUeQ3gz0qUiUnVqEHPLpr90nyf2bFS7X4QdRh7WPYEZJeSkH+7KSE4Rp
+sGRSP+Y6LEzrWcqA1RfSC41RzZdHrM/COGPTP3Wh8MW2zIZ3WId7se+5CG71
+iRv3JP1WhK47DT94Ev0xDzk0B88fTIJTl9f4DyG3INP2qAM5X2pkxWYz8vuk
+riJ9Rzk0fNvwFXIo80U0LGu7V/A9zO+t21pK1tVtMtHOQ35xfYUunBaWl9RC
+vGdgVgj2ERUW82UwdxutcwfrxobnpTbCdFNcsz2sSq/0eEfmG/yFUqxr6sGJ
+5aDKa9wHA1FpS/6yo6ia6pAya1Qb3u36XlQeFew1G1WcpSd1J3n9h9rZMPdk
+R2EOzPr18cB2uHbnH0VKWNGTQ1WR53pzVZ9h+f4lIhaqUc+C5i+Rk6uXHyGB
+Q3Iut1MwP0wcvxhVpq32UWCcOmGmXwb7Mjrvp8OSk6JGG/SrOstqngNr7C2H
+ReT7nZncJyQ5NjjYKuGZodmeA+hPUBnw+we4NqEveDWsPi7b9Td5v61GA06b
+oo+pzEcqmPmiXfrKBJ8X/yO+2XCG29FfvGH60PBJFuwcOnL4/lzMCzI2nic5
+x3JTefB/F/l8k/8rY/pfND5rUw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.834338870872151, 6.424344451651139}, \
+{-1, 0}], LineBox[{{7.9999999999976925`, 16.5}, {14.99999999999251, 16.5}}], 
+        PolygonBox[{{10.9, 16.5}, {12.1, 16.1}, {12.1, 16.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        LineBox[{{8., 16.50000000000231}, {8., 9.499999999998607}}], 
+        PolygonBox[{{8., 12.4}, {7.6, 13.6}, {8.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 13.6}, {14.6, 12.4}, {15.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 9.5}, {8.000000000002592, 9.5}}], 
+        PolygonBox[{{12.1, 9.5}, {10.9, 9.9}, {10.9, 9.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6., 4.5}], PointBox[{8., 16.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws41NkbB/BfJdcSuiCXxi1CkiiFZroubUlCbmVKdBOjVLZUkxQraWxk
+bLWNJUQrXVZUNCLdtCmWITIKKRNDuiv/77t/z+M5z2fOOe953/d3fuNhtCHC
+M2QkwzAD+KWRkQ/jR5vDKBO0OEyRQ0z6dliybtF3R7LEp6xzEofR8c44mAhz
+U7kXt8NFU6fnD8CcRc0vVWD5mt0p4eMx1lTJyiZyGKmxwbqvcG3vgblJMGtn
++96UCXBrwY9dcIJ70CMbjFxJ+bR9NJ9g9KYGo+CchPs7RsbVYmMo4rIOybSe
+wrWdbaM+wtLn207pYZRkHBy9B3nK2Sreu+DoL11enXDtk/iRTbDtotVlLjrw
+AaUWDj7neueOOwAL4ppkObC4ab/zediWl+M9GqOryRPuVVrfcvI3H4xFG1Or
+LmAUfzYpS8OYoPrLo0SM8pBb1eUYWbarJH4YRS90L/yDkam7YKqHkRsRnliJ
+UTLXO7mO8gveV3eG1m9asTYB5i08NzuA1vdmKrBp/vrhXAZWvr++fQh5c0v/
+WSTA53lGiV+ryX2y6eqw1OFTVSbM978ccBCjSGraK8CosU074A36k3fIyTad
+Ps9+O84T5o/YM7MY5r3dtv02+s5fEs7rhQX5zjPmwPePmM+n87k67anleE6O
+Uk71f33pVzPxh0uUakyNqf71mdvHwjrNjQl/Ub3HP8qa8dwlz1U3LNZFHYYr
+pJWwjtb09HZY1NYz/z65YULlwcnY//hoSRec12ewS1cP/b7cX6WPeDxzix0X
+YLFg/Z1QWHJwwntLfeQ3ro4lhl2PNbRmwBoXk4UmyHdzHO/jAMxTYG85Bpfk
+pIy2N8DzGsz5ox8WeKu+D4CZrXfWeND9621+tpXmDZmxf8Ilkxd2rIfFSSue
+tcOOvg2xi2h+rzRFjfrYF6g6nuZjGBd9uDa0sLAe54lsE+WaNK8e73YcZmVF
+q8mw38Ppd9ZC2GPU5tkFsKv/6ZzPqMdDpyRgFc3rWc8rhjU8LgrakR8TV9J5
+EOa4/y4PgnlN8038YdaiF9ueot7Psmc5rrDo5xdJTrBwcaCdO1nW4pBN71ma
+KCoMri0v8teEPWaZfciCufl5pQma9FwlYwdhwfTeU+NgUXPtgD/yq83P2J+v
+gXFbxb1/YX77ZpW1sNzK8g4X9bKuim5Og0uOZft8ggUdBq2asIWfXUSqIdYP
+fg2fCPuOUcizmwIXx1rOonjVbSdqYJE/T7AZvr/nZJQNC+9NdLXiFQ3qk2NU
+BFw7SzJKDflElXfPzoUFdw8tDocVHqrp1dN6XWW1Btha+JL5ANu2XQp2pu+d
+6/1rVIzQPx/JttMwy63MTBP28HcVvoPlRUdGj4X5SqGfptP3zHFlox/Y7+G3
+MMwXlp48Y9wFi4evt22Bh1juRvdgLnt1CBe2r3sTn0XnJy/zpH7L2ww/76f8
++nYt+Yb4qYmaVn6waFTXlD/huIr62jmw/KedvXaw7ZSVPH2at1p19zLyH1Oi
+6qYCM2fXnDCBozf5OjK03su17jj6ca1CKWsk5VOc8Uo2DufOLd+oSc6NLa9W
+x/sxcO2uNSzVNCu9Nhb9nu27x4vmP4wIqRiDPrj0p8fTeeVDHR/UOMzgJZuy
+KjovyZbvB5uqqo9WpX5oflnWr4r7dDbA2htm2bDf3oa9Jt26kEX2btt5F+5Q
+GXo0AHO7srYPw/XjnZrZxohf0vZ2M+Il1EbaJ8DiyqX3vsL2Px7veEBWWjJU
+gHyqDMNjR5ggnlbjmB3I1z7OrNwGFiU3xy5APaIlRiM9YG7T0B511OvYcrh0
+I82rvzJ5DPNWeXeGkf+Isp+L/ghjdulvgTmNO633wnlOKXH+FD+uy/s83NIQ
+XrUQlj5amHIdlhg7yE1gefWD7kK46i8hj4EFun25ibBIV7urGflyWqqCf4Yv
+NqWrFMP8GvXuTpwvye8+lgpLX8y5oQx7dWV8iKb6rTR9lZA/P/pGQgjMcjVP
+6kG9+oatZoEw8+RUoBj9EPIuOKyj+K+48Sno33Lj0cIw6k+CxcetKhwmW+Fc
+RjzFf/5qhq8yvh9m+ckLyfZmT4KVcJ+OlZW3k19uGZWuiPfDf/UfhtSPfl+T
+L6NxTpV/UTD1w13L+wQcU2t2rZA8IdcjEBY8HGX8ndarnmZzYUlPjNtyU1h/
+8IYQti+NisyA+Rp9rxnEl9Vd+dwOS41GXklRpL/vK3aZmCHfzD1TFiKfluz9
+TwNgacXFW0rIV6Hy6MZfYZHNgE4j3DHjiGIBzD81d2U26kvtnmcohjmXbVKD
+UT/v5ay8+7R/zORKFfTHouHd7Lu0Xv71ZRI8pmaErJji6WWd7YC5Nplbz9H6
+gqVZquhvzUWlKj7MVWr5QPfNevGjdWthVvJ9nWuw6I1t8xw6b22m8Ry6ny+f
+92qRd1oXxeN8YeQK937Ux2K7lBYgP0FtSey/MHdphFsB8vfNKqitoPpnarIE
+qFc5/INeCSx+cMMpBP3Q+KL5tJTs/81nNvonqzWtvwdz3DiB4xTw/M+t2v2S
+4vfGNH4bieet1R+pgvMZB8cwRTjmx5N3TuStPB/HERh1PeOjqZ7cxUNCBu/n
+vOENZdRvq2Np0+Eoh78XKk9FfEVZc/8wm6mqiRL5wIw0KPYjPMbk15rzsFRp
+hIsd1jsrZo59P5Xuo4FOBhzm7F/hZI75Q7WPLXDeGEnpvv3kBwGRErg7Tde0
+GBZvyRCeRX7dbbbqHTDHIkwSNorDTLiqrq5oQd/flivmob4E+0lH9WCuX47F
+V7jIe024KSwOn8XORD+sLWVeRjT/Wuu4GfoV99xnzXhYaqtReAAWJc2YOETn
+LS1ZkANvdqg40wpzj/LnCGHHuzGeN2DWGo9hT3h5+Kb6VHKx5ZlGxHftkTRH
+0H5VXeE0WF76Q9ud6ol+3eSOfBitPG07yr8jf91K5C8zf84ypP2H/JrtUZ+9
+6bnJE2AmqHuRKuqPM+DsmkjrzfOzi9HPOFUDXROaVwtv3/Sdzdz69XGAC8x/
+VR7E/sZm7v9mNBRMHvCL9vzCZhIcrMxOkW+q3br6ic0sXmYT/YzyO9g8ccdH
+NhMdNKyvjfoZm0od4Qc2o2+iLlkPcyoCD1nBE0TjzYos6H1x67eGi8zNvIdp
+XrHgdTq83LaqcPk07D/f/3ED4gXe35acBvOPH3Xg03mxk442wmJN1Y7Wz1jv
+snivhiXms4MXbPqK+M5mN+fDjNnN2NFDbKbDrlxnPXnqvVci1Fc1ZWL/blhc
+UnrHCPUPqpXP4dP+yiWtjrg/CrLtu/fD3ArnNeXwoNrx6giYk2/QqoP+Cbon
+VvnCrLS27wvoPs9eu3cezd87dMoBtlif97M2nSeJHDWA/dfu/l3fj3ylDw3s
+o2GOY+LjGsp/bwo7HedvNP3cnU/1Nbg7diC/+qbga8n/1b9xxmv037pvyS97
+Yc7Jpl1X0X9fRYkRj9ZfnPR2HfoxKLQzjqR4P64OMNTvpHehB2j9mfehlwfY
+jDBu/DIhxfsyGBkvZzMtYbLkctp/9d9vtu/YjO3Dpxvl5MIDm3vf4D781MOz
+pn5ct3UJec1mPEyCXvDIESu68jvZjPM7+6ibVJ/YbdqjDjajc6/jkooV5lVG
+CO/BLTu8X/nCjHX//nSsH4x46ZVD86YcVwvEi5vXE9RH/l4YvA7nSfaFps60
+hkP1jk6SsRnTd8N1W8nfLL3M+7CeHbItA+aoXc+d2c9m+JNTp96CmbD3ex+j
+vgTNOUHPyPMfxqwcZDO87aEKLWSFynmZ6EdSGu90E+0/oXa4EPdJppA5t4bm
+tfK9Q9E/LxePPX/D4urDl27CPKvGwHRa71lhlgML3dyWRdH8R89lxnDLWO3n
+7rT/SGf9TMQTq/VUT6N8M4OSn+N8L3eHCiWydsuw5XvYs9u3B/VyWl93z0D+
+y1u6mxqo/vMvFL+h/851Z2fWUL86XZxXox/1ht2NZP40yYx09HOC2qmyJpp3
++MvkXRvqdTVd8J58ojuN3QivWm2pS/kYz3b99A+byVtZfXEZ2dmuQFKB5xOS
+FHmUzFz22VEIRxrnPiRzXJ3n7cR96pyuPXE6LGp4/DX9NtNSKeMEkzVOBjhl
+3GY0DhruuUKmH0HZ//8ftuH8D75reiM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2371675279736856, 11.129988497564629}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8lNsfB/BT9jUqSxIjiUKmorLUPDcpkaj8SoVGyVVZo6iUsUuK0qJw
+G0oRWapLqZhcSb8oZEti0kaUIW0iv8+5P//M6/065znn+/0c83geOtv91++c
+SAiZNoEQ+klE4/jRZsgIPsLZDAm9uk1PgsWQTuna+s1wUVbI018Yv3IsdMtC
+mK2iOvIc9n61u10BFm5bvDEF7th+Q7LZhCH1subhlnDRuqGu0zB57zTlmRZD
+BD8Cjd1gJc29Z9bB3jfVjpjA7GrrlY9mMGSNRsSgPOzk+nLYFM4piTH8Ng/r
+v7J9fFGTIXw5DYc+WKC7Sk4BTpboHqIOiDz+IWI6Q5qSIs2/U39cu0gM7lGN
+fCRH13fbaXNGgyGenas79GF+aniOJVyvmrljNSzs3aH8cxrWe10j7wdzrScs
+eAYHWy3xTIEDai7klsPeFS8+l8Csks6xatg1NN2mha63yYz/Hv5xX489QOvX
+UBjXwPrC04fuj9N+63ZkceEbn/9rJIa8WO5O62/C1aFBAwTmO762UUS9PhrT
+Lg1iPi9hlYsPbBAQdITmyaiO/1EDV42l1F2HBYKDzzXRf+jLPb6H6Pit6nk7
+YfXM3GIO3d8mcywdLvIY/c8o8uAGFmUKYKfcxt03YdY/d13r4HSdPcv+hJ2U
+DP0f0HyPmVlrwMkF+w3p9clF/OGnxgwRPSgac4NZyVF342Cliude0jDvjPPz
+lbDATbY/g+Zf5TJfkc6XyxvRgftHO/26jHD+t7UqU9GvesqB0rswr22LhBSc
+PHX07iU6vmz4XSDyc+qvu3YODnBUy+tUZ0it7Qdjam5ZV+x6at4Jv0zq6DTX
+RjWGzDLO1/qbzh8/mLAdvj3uEFcP17dI35GEg0tL0gZhoXLMjQeqDEmU11dS
+RX3E8r31GThfb3uQJZyc3mYQSd3VsHobrT/pvFg8HO08Y044HTeR8ciGGfZ4
+YyrMt35Y0wrXts9few1mblxom479fjS4jhbTfN5q7valfjEpv4D61QPBI9hg
+n/iVi3CRdlS5HvrxOTL572ia3/syzUh4RVy4gTutT7z6SivsOj+p3giu7+gM
+0kE+PWEHv9J+mG0FM7bCntoLVhfCLBPTQR4c3XC0yQtOlnmvlgzfjs8QatB8
+WqxKY2F26p5XdYb4XOUk4QmveXV/ZSTMv5y2zgBeopAUbwEnGyZMaMb+VZO1
+3/6Yi3PxGOT5wAYDrzdWwPxZs/WH0E+NJDc6CS5SaFPeDScr/r60m9rT6Xsb
+8vF0CQlaN5een/KQNcwa4c9bAQtTtWyLVBgi79GQuBxOnuDO1oVPq8hU2cMB
+6rmpmVNRp+udk+50/3qJARM4/2W17QG63pCfqGEKcmOM3p6n/m0fngDn7/Wd
+UQ7zPu2M2grbXnwd84aut+9ekw2cM1SWKYX+WHmzF6yGSdpFMQPa/6/ZKzzh
+Fccy/1xOx2c8zzsN95/YVesM18fNndEK19gfOepG85lfGqWPetqGCz22woR0
+m0TAPkxHsgP1DTG5LjinKbBpIcwoiJ5Z0n4vOPspUlvG2ZyC4+9NnNlJ+4uo
+DH0FO3VOM7pM651S+kUdeY3uuWC6HRY5Gg4w8FSvCCsNmLw5G7YeTn4UHfd0
+DhxXdsUeHr7dGxkBBxR6xhnC99QSr5nBrLqAdUNYX0nB2veTAfbpO7k2E75X
+0KycB7PZExosYJ/9+RkBMItfOK0S9d/T2VzOgZM3a5hawvGyAyXTYF7VhsfX
+kMfbE7/Wjetj/iezfhVYPrusTQQz5r+FEZPx/fTpnfQZFvg97P6izBBN0WaL
+bzCb794bAAvtDHWksR6/e+beMSV8P8PtdGbS/YcV12bAVtnZS5fD9Q9cQzbA
+OU9XmnnRekP9RTpwz0Nu+jFqi4jrMjBRW/y9EFYykk2QhWs9S5rrYcHOjXa6
+cFtkwuc+mJiY566DBcdjlozDwsM2gadgA6llE2SQF7stiP8aNhX1jEvB9e9z
+T1ugXlbOXzt+YX7AHjNOKqy+wKejm9b39rfrV1h+Tu1f5XT/XLHiNei/rYzr
+kQSLCo4vO0/zKJP6z0Y6/0MmrwUOjuarqdB+G63SCfITbVfNqqP5xM87NhWO
+L9i/IJLa585SJdjpp8RCM5i36XDxEK6Pl96l3Tsb57OwaPQunP9WbhcfFinr
+O/jCoa0/t7rBvMMWL6XhJg9niZkwt1et4STqTV8VoynSQ/9Dp/Tl4ej9c0Q1
+sNPA2IEw9K+pe3TTdZir/DH72SSGXG5YlptB57+41nNFEflb7is9D/MWXjQ/
+qoA+at418GF+mFUaT54h0hYRdcXUaY16Z+Xo75mv8hOYpXAkq0EW9Vc8zPmo
+R58LrpqawzURbi6KqI+Ja1JpkEH+WgmlC2HifssrDeYl9dq5wIKRCLVUePji
+t4sHaD9zi3uqYGdLC+8zdPxXT9QMrOdyue9ULjVZmJ8Gk8lvdtyCWbNWRy1G
+PemSwlhqppe8/kDrC3XQovO5STJ3slC/S3dX7Uk63yMlwQ39mYZk3fGjeQ5L
+NSugf83NK08wMD+4MjEXTgyq9pem9fJLEvSRFyukePARzUfJeCgcdnl3RTyC
+9r98Tnw+3LP3sdAMZqSv/8iB+yVVP/XMQr35LZJB1EuLL6fDRL8yWxYumuF8
+aAPMj1D/GYj9DE7KVk6CGY1VS6+jPvm6vcef62J+7J+plai/Ri/9Lz7MM33b
+fAf9+ZTEOobC3AONk9KRh5NQM3orzMhWrw5CfvxWB74d9eKoCXbS2M+hNMqG
+Xh+7s2yuFP4ecBWP2VPfTYjXlsT9YXjxOXo9K6mJP18C9yeXB9OC6fUqGUPe
+4vh9YubNTqHza48/eyLGkFvhW+NK6HwZn2x3WJ0n3fYSFnS9q9WFZxXvzyC0
+n/AI/+nw7bFv22fSPEzqY6zhDouFzctoHq9/fDoHj8aId9A8yGz++cnYr6Oy
+tHgbzF3MbsiDPX/d/8al4/PPHt2C+vo1Pws20vFn92qmon5bQUE2Awvfe0+t
+h/na58q1YN7ynPcR6De9YkPOIK3P8uFMFvIY7W0/VEb7m5MXkwm3mVlVHqR5
+y7bL/4aZZad2mMJ8nwBHE+R5S/D8ZO9MXP/b5yEbLrLxL0qHuS8VR8Yxn7dU
+YO4EswZ1r6bDnrHRlyRh4UGV29LwvZho60odrJuZbGqLelK/ZJjFwKTu9hQP
+Wr/u+hXr6Lh1y0/a39ScjiZ9mK+6480y9B8vKmyVgbnH9R+oIq/QQ+Ll3/Fc
+z0jcl/k0Affvfz4HD7Lo31Nrm1qC8wpb4PUNJs432YfHOUTpn8dHJHA9T+zh
+lQtjHGIU0moxAxbkqatOGOWQ1LTwEkvqvQqH749wiLjlx0p3Wo9kntaLnxzi
+Kh73O+rf+fenb4ZHn0YN5FB/7TRfBrO6HbWf0H4s3rRHw/VbRsx66PVVsnp6
+WI+psJz6m85/uGTLlF8cUlMs0yc7k96/vbcw2F9cpdBRAeallNjT+pyyjtqL
+w0zOXa4C6q+1KPcaoP0nrt6yHP1xNX2vP6V2jT3/FW6ablSYRfcrDvnjLPJg
+xdeG+tD9dikPa0xkiFF2cbwxtcL3o4dgloR5+QfkI3DQ9i2GfzzrX5FB89ov
+110KG7zxCnOieep4WiXCwamiV2Kw8FzxqDGcHCddGYT3Ip7cu+a/sB9bv6qi
+F+9BfKl9F7pRj+2hxhFfLXre5bq/Uf+SliINcZjYNQZ8R381a3+NF+C9iBQ0
+tFYiD6bc/3IAzBj5Tg5GfuyX38XtqP2mjWl/55CAOwWqlrDgu2nhy2EO8c7e
++mg5zJt+OfnuEIcIS1xltlFPVAppFHHIbd2wj4l0/ZOcXI/PHOLSV3yrhnpf
++MSaPpy37k41RdTDu1m9pq+XQ7hCj00u1B/cr7b0oJ51flFZ1B+9IhPh+KxF
+eR+o88qjJDFf6Gesqkv7P5NaZ/YRdh4PcaLenHlJrB/ruW5g+cDk4Jk/12N/
+3oJqXZoXc94gMBz18bw2h+3Qpt+nhHeiQQ4puv5Z24peXy5Z7v2FQwTpzXJj
+9D0zJ1HYgH5TXfpWXKX5Gfm2qH3D+pl2tVbUxo8L9ZFP6laZowLaf+ykFhHc
+s2FEfxHNj7u9aucP1N/fNpSJ9xzmqzAjDK5vvsT/973ntEOaCSw9sljHH+85
+TIS9/WFc7/Qw0Ksd7zUkdVeWN/brKVtk7Eitsar9B+qpOfvfmgY8ZwvcGR1z
+1MvuuTO0E+Y56mgtQT9cg8BMRZiYJVxQRP9stsOHOjx3k3C/sGDkF5qQ8vIy
+tVVy8JO3ON/29SdSYN5ehbtLhRySI3ND6jwdd+AX9bTiPHP+Xn+TWs2obG49
+h/D/EEvpop7Y/0n6Hw7uH0WzNOh+PSMXbhTh+7jvTpU7taBH9/Ve7Ge9Q5Dz
+73jqg8X8CsLN95/zhVrdlK1zpYIsKe+VN6f9OSWa+l+sILYrdK/to+a11M0K
+RD5VkVcvUxtUPp1SgPP2aV1eSe3ckX5SgDyPaxx6Qm2rZjvrCc5j3rP55dSG
+3LNOz3H/8Tq+/Dw1f7Hh/Bf4/ZK8leRK3XfCp6sT66XcFJOhvpZ+VLwb/ba/
+ieXT+iLyatnIpyfV+aMetV1QdeM75DMpuiad5mVfUf70PfIN3egmQ/MIdFig
+9IFDRMWymwLwHkM47SUJGK8/syirBc/RvAH9GAtc3/ZcfuEf1I7k0qw3HKJ+
+Y83TW3hu5tW55W1E/m2STJMZTJTW+9WiXp6qilINnpvJkFV7VwPyLCg+7ket
+NV9hcyXWb2kKMaSmP8n3//9/mCnM/wDXOWeR
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.475611817684063, 14.487402206687182}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlcjOv7B/CnPe2brzaatDgqytRJ2XpKKp0OCamkpkiKKFmzNPYWlehk
+iWMUBwmpcCTTFCEVKdnimPZFEUmYyu9zef38wev9up/7uq/rc89SjEPX+YRJ
+MwyjL8Uw9C+jRH/pssyvP1osM0vt+CM+LCqKNPSBXXoehajpsQwnJs86DW79
+uenOWZi1NAsugiM1bmxw0mcZ3ryGF6Vw3f69H17B7Eh8cz5slb07Y50B6kek
+vz8An2g5KjcE5/fG7HSDV5h5um0zZJk+4Va7j5os0zmzoKcLtvF1PrYPls/5
+zW3OWJbxTkoeUYUt9JQ2JsOC7i2+KRroS8Fr322YHa/TrwiL7gxvaiBLOGdU
+1FnmcNjsWa9h3tj9V0ersczKlKp/q2DOhVbXqaosUxxhdzyP6lWP3R+nwjJe
+91zn8mn/uz2mHcos8zLD+Z4nre+QKO6BJw/9jNQgix5q+cB15sfqG9CvOOBF
+z2K4NaMm8zTMZC2SpMDF/gFj18Os9crQQThutNe6BTC/qNAsBecVn01ScIZF
+a8ODPdDPf8L1l2fDnCr3gxz02/3J0ncp1TuR3aWMedaHq6gn0nnuI+KfcJHb
+90/VsOD0JuEWzP8j3dXUHP1peA/3dcPNwtHiw2TJjOULkB9naOCAxjjk/URh
+/Xm4Vvvi3Sw42lveugu2lx19zsYI9Zv0Dmrjfgxtz9Q/gpl+nR2msIrDmP+4
+HJY5tGSRmgG8Y+hRyE6Y78yuG8T+zBpRSQWtv2b7iuG/0q63yhvj/vRmfgmH
+e6vqtFlYQ9n1uRRskOD0Zp0x5bvn3kH0q+fUNvUvmK9idlgVFg4VH7kKi7+N
+ldXGvJMn6D8XwkzsRT0V5JOz/EXwXZjz91UPTeS345W2Iq2LdMM/WiFfceCA
+Vj7VC9HZsAr5+87KM8mCeUaL31YpscwpuxCLXVRPP2PrMrj1Td28FbTfc9Nx
+Yzj1eupLN5g1Z3n6sEJx1WhL6mfAKc8dvlIhcdam9T+ddc/D/xuxjJKi+me/
+j7bDedKnZocNIg/RK09OJ9zSYZD9FWb3T5G5jf5OP/P6naH+tdzsc9C/qlGI
+UIf2x3fPycR8IuMvy+3IjSfdEjF/8BW5uiDKT+f2Pw7I59XNzJlHKD9dny9n
+YK/F4VG11H+Ab6UEjhna+EBnPJ6vFqm6IO8q50uhQXDf8NpdMfBX+48Gl2Ce
+k4z4ALztWunlb7DIoPv7HviaxKXS1QT5tEWXhcHDfWXWKXBfSeAfk2Erqeiq
+JzAnR1L+DudJ3NfdVzLFeX62Pjvg/hit0zNg7+TMESVY7d/tDitgXpvMD33M
+I9nS2c6HRY99JdqYd7mh6ubDsKBf1KaMPOY2+9gcp/X3Ly+qIq+KvJKnf8Ec
+27gqE3o/2ucmJtL629LeJcg/d7imcyPMX56/qmAUXv8qHbWBVM/FutcRlngP
+B7O0nmk5vV8RfWTJvRpP+/9y7BXD6o0fkuSpv7yXS2XwfG6i5c1ezCf+mH3c
+Dx5qf7LlNSyQOpTwBp7GXXL5McxXDlFIxPkVHeriKlg0zvl3X2V6H2k61lM+
+AfkPp6H/Db5x0W0wu0Ky0QrzLb8Sd18a57FGDTx6vx/UP8xYwuK1kzLo/X5S
+rLFmGfXzSn9bC+yn8KjtGOW5oNZiPvJkn//d3gj3TTOtOw5rjfhnmJrBrwdc
+HsMzkjjPo2FBdK0UfR7ISR9dLYRrve7mvIfXmN2WUzZHvSMK/9XBW4XBvEVw
+7WrHRAF9nny2WXoM1lCXOuYL55y30myAxcVmMn3oJ+xccq/iBNT/2uGsCben
+2N3hwpzmVzr6mOem7LfbC2BeGFOgg3n3GsqeCoNF0mY9ysijSpabuhZmLFbe
+VkJe2m9H2UfRfodJ9wyQZ9jg4bxQWHyhrMkDeRvZsuu8af1Nwq0TuC/dHzu8
+HcjdZ5bqwme2H11uCPM3f/9yXwHfM1JP20bQr0Bok3kRfltZaNYMMwtrNMvg
+kbqsiIewKMq8Xxn7MzpOPy+EeU9jU/fDpfGdfv/Qfq8/J1ri/Pjf41LPkNe+
+cfwMp5xadp3WedcViuvQb2NA16kblI+pdHI55rlQU3HmKa27DLTewLzZIlXB
+IJ1fPFBzVpWeuzkygeabNf7ILuRVV2B3LYTyUCuaNRt5DggUXHMov/4uuSa4
+UL28pxuunazYMBH3IZ9becr+N+w/PL3VE65cy4zdC/MVPin50P3H+Bs+JT+I
+KZsFG47yXGgwEXlZP8zRhC8vHjnKg8UnlZ4fQ/3LadMG/4YF07YWtdD3j3dT
+5TOYKVdnleFxmlMeMBbY3/ZgqS76r477qDUeZn3mqY3GfLfmtbs50PrZZdoq
+mN8jcO7m2bRe5xWmiHzC/RqmuMKMf89dHeS3JPfa5ulkYffM6cg7Ut2/wAIW
+9bwp24v7GVshc1abvLzg9jd5lrnHc1r0Df3wBuvLT8Kn45O+v6Z+FTYEboCT
+XN6L79C627/P+PC7/JRFOTSfS4RNGbyneNfuFFh0sGIqF/XPWl1dsZOenyh1
+4jE8IUvx0maqp9o9IQ39CNJ7L8TRfgNLk9XoVzYo0S2BnHf3bz/MI/f5yVcB
+1atK7vHCvPeSDhTco3VzVe2ZyIPhZn77TE456TYOeTmMP1RP8/GvbeO1w7OM
+PFsjLahf8byDyFcrQhJ9jeZ9q7xVEffRscNjyxDZ20R7MRyVseLBXEu4d0LQ
+Wlg3brHWUVjQNv+pDxxR+6dqM8wPGrCQgdVS5Pb/ZoXzJ4Ss2o368pe+bVsF
+8x9VnW3A+bkT+fYCmBcl1SQDJzg9XfKYnlcbc4Pu866UZs8nK/p+3f9VB/Np
+WD6PVZqE8/IqnVUwf7rzua4xMLvIKE2ePm9bLMr1Yf7E5CI15Nerx+3Qhnlx
+rh8nI1+l7NTLsrDoS8n6aNxHe33k/Q9W9P1oKNMoxzLHN2VZPYNZr4zTG+CO
+7AdqN8kJXNYZNstefPM4Pb/VMNcFrueax+6EBevlArfAG6/YbQmn9YVlR97B
+nKu2Nb60XlWwJpZeLwNc23k03/T7oyehH8tPrlrzKQ/rfwxl0e/qRd8jAshW
+PY8+wBel/e5HUz5cz/RmzDfH4LnjYZj5oLb9GeZ3HZcQKKR1+5+XbiEf11Un
+vL9Qff/5jw8gv9da76q4lI/RodTfke8uI0XzLZRH+7nhYviW2afIcpjR8+/S
+xP3srJwcrT4Z+2Vvcexhn28DPYHk9mXZZnBlr8+RC2SP5AIx9ldGHp/YB3Nm
+zXoZAY8oDmRPsUa9MR5lFfR946Rkv9qacrioJkF/q/SvRGfBfFGEshbs2fPa
+vQwWOKot0ME8/W1TTN7QfqtLy1Qwr/GDpJb3sLhblyOHPMSJc1v7YHbp/PhR
+yG9a3upBWuc/0ms2Qb4DSlsD/6P9ST4ly5D/8ImSgkpY5HbMvFQWP2/MWdZx
+lfrxleydBz9KMeQcIX/exmrAMdHncjbS89WhmfKwS1m0yB/mrTwYPwU2L1pY
+6Eznp9zMT4VvfK9Ntab1K/WFejivK2qGqRmdr+6gVw1P9b780YT6DzgnPIX+
+tExPKkwi50pP3If+w3+KNaieKOpbz2bMJ92VOZVH/cR1GNP7/YSC7aQkmk/F
+4/VC5KOn0WYppOcT2ZMTkF+ZluHPH5SfnXPDGzjo56oEIxvUL7owezXyv1+w
+b6YrzDNpWVANb3MKS42EOVGjgyXwD70Hfun0fDr384AKy9/62mrjzV92a8DP
+h3y+8rG7jTBfUDlmPp6/wB2YOkwebhosxHkLG3Pb9Kegfn5aYR/629RXPcoO
+Fq16MFsVHi/co+0Bc0I3ymqPYvnh7+bm+sJsk+2fKpj3knvJtWDaf2ziTxnk
+EbC5znM5LL4jUZGTZ/k3jsTUhdD+IkZaH3kqz4t8u5T2m3SmeMmy/DIpNa4P
++X2j3jkZ/D7z40zpHJj/T9FqC/iTp3rGVKov57y0SRrrg2ztb9Rf54uT1dIs
+f0FZfhb1L/bandMDc0ovjVGj/T/kTjrJsHwdo0YfWXr+msKuMphZeWLmiA3t
+X+m+BvcvXZJ1eghmxnVzHNCfzxYvdQbPM5cC6wzQv1Ds916RHLdKT1WB5b+6
+nek7hvrxfThWSpHlN7ftsbek880+d/bQ59W1CDtXOq9M410F7n/ZLd0yml/M
++5/dbiWWv1FHx2APLAhqXKKnzPIblTt9z1P94tOL9sIZ3t4RNbT/caOBEL7y
+7x3uF8pHVkN4F/fl5lqSrM9FPU3L5Ay4PzZ/gRMskjPW5+L5UZOCY0NggXvw
+VAHOO190fSgeZta/K25FP5FH5xufgNmxF9wVYD9XtzlXYf7nPYMa6D9Bt0um
+FObdSv+qjHn33dW2q6T6HtLaMnj9W7j1d9XQenzjHCnk5W9jvumXHVodNXGf
+QV+cQx+SJ39qmIG845tbIqkehz335CDuhxeZtrmQ6ikH/KGI+9SLKTx0juY5
+tCilSIrl5710fZZJ/VzMLc2AK9tWRyTQ+g//Jxfhh37VsduofyfN0M9S+P0u
+9It8DNU/ZNgWiXpjPm3XjyQ71hap4nwjy6D4cHJaaUA9Xk/G5b3PI8idmuIC
+3H/6mu7kX/tfRdhky7H8r4ubanZS/0MGiZmYd1wUJy2d1nd0f6SfJ/au8Np3
+kfKNnZAXivv/Y1yG1X3q11fujhnyDAwJqmmn/gQSd7p/04W2e5VsMa9k+w9H
++nzcnvSHDcwYPgzYifvZZKWpsMT21+8vsmkwt6AnbQett8yvicTzF3RiyrLJ
+S4LqteAWYem+Cpgvw1uXhPej8GZ5UyvMa4rVeEGfP/T/MHb///8xiuz/Aedf
+Llc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {12.760300471822903, 2.1176044036804296}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/C/0mOd2EnZHqbMUNGDGbvVlkf+yJZkjR4KPUYPPTY126LQ
+STSHSWKcTQqbKbKhx8ToscJUSrbSzDG2dHR2NpRITQ9pZ9F+7+7/nDm/87n3
+/7/3+7vzYkck+UXrUBSVgBep/18smpqYxrWQptRVjlZMeJZ90LVyOPhGl8AO
+1shf2wfBpWFbO63gder42xQsCp+kdeDiuMH0CjZNcQ2Cda8voCnDYeHeKGLH
+omdcWF8pnraF5dru8kvWNBVvzOp4j+fkc20rP1vRlM6rY8VPYbHD/dlB8A5x
+Lt0CS3JKom8yaeqK0faghzB9LmWhJZwqXJXdBfPcYvrz5iNHi2n2BKwuf/+J
+A0/+qHCZj/0Y9rsG31jSVLrYr8MLliZ667bBvjHrv9kPSww4Pkr46mKtYzGc
+EbmN9xFukdOXHxKvHPPzxnqNOWeH+0g/bWtSKuHYkhrDUTJ/SGLvgDwTx2sa
+R8j6HtL8Srj2WdJAL0yZZXm6op8Wlt2WO7BinFkgg+tdTftEMM+9J4uN83i+
+VprlDYsP1tnsg531i4w/kXN/GmpyDe65Eai9Rs7D21SnDp6oY9P+pN8+u/5i
+ODdpzFmLc1bPMFoQA6t0niQGwfwXgQJDmBnsN9KMKolrVmVjf54vK9wXlprs
+XDqFvNy143+NYFxTe0IZCEsOUE23YOniMoMK9OuUkrKmAM644Jk4C/bsiU6+
+RObP/Ba+F+eVOmdjZBOZTwvfMWFBU1NFYa4U1ucV/7T/DOyddunQFpjx5OUY
+D+Yt4Z8jfTGYZmoXmK7SrNZHXpbcepiGE6wjtSGwJu7nXQLi7rc1JbCUeZMj
+h/d+tt3wDJYf0aMdsH+7cLB1FM4w+KHzKtzqson9lty/b+mwE/IKb8ntmmBJ
+uIvxLdh72rbzAKzwsijnoN/2U/HLjMl+5q7KAri1vzsgB/nkGz/UDsKaQYvZ
+E+hPrDL1sUA13MNO90WVcBtTbFBnSrXVhbhPsPyI8Av49TyV4zj2YXHirR9h
+3Fx83skPFhyzCtgN5+r/GdqEnJLMuZH9GJcVX1i1GZauTIjgwa+/uycj5yio
+u9tZhnHmlKOyHuYLvtTTg50mtp64SrxwUBKBarM7plqKqh7Xe/PYnKaGhkOZ
+3eR5o0I3P5jR6FNqhufUN58mjpvRVP706N1YmMd9K6qB+ZXOV0geac8K3yI4
+KvmUDgs5uF0rLatgRveN2H2wdC3vzUs49fThrjuwgtcR74b1H0TYrh8i81mL
+vEpguUeQ3gz0qUiUnVqEHPLpr90nyf2bFS7X4QdRh7WPYEZJeSkH+7KSE4Rp
+sGRSP+Y6LEzrWcqA1RfSC41RzZdHrM/COGPTP3Wh8MW2zIZ3WId7se+5CG71
+iRv3JP1WhK47DT94Ev0xDzk0B88fTIJTl9f4DyG3INP2qAM5X2pkxWYz8vuk
+riJ9Rzk0fNvwFXIo80U0LGu7V/A9zO+t21pK1tVtMtHOQ35xfYUunBaWl9RC
+vGdgVgj2ERUW82UwdxutcwfrxobnpTbCdFNcsz2sSq/0eEfmG/yFUqxr6sGJ
+5aDKa9wHA1FpS/6yo6ia6pAya1Qb3u36XlQeFew1G1WcpSd1J3n9h9rZMPdk
+R2EOzPr18cB2uHbnH0VKWNGTQ1WR53pzVZ9h+f4lIhaqUc+C5i+Rk6uXHyGB
+Q3Iut1MwP0wcvxhVpq32UWCcOmGmXwb7Mjrvp8OSk6JGG/SrOstqngNr7C2H
+ReT7nZncJyQ5NjjYKuGZodmeA+hPUBnw+we4NqEveDWsPi7b9Td5v61GA06b
+oo+pzEcqmPmiXfrKBJ8X/yO+2XCG29FfvGH60PBJFuwcOnL4/lzMCzI2nic5
+x3JTefB/F/l8k/8rY/pfND5rUw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.834338870872151, 6.424344451651139}, \
+{-1, 0}], LineBox[{{7.9999999999976925`, 16.5}, {14.99999999999251, 16.5}}], 
+        PolygonBox[{{12.1, 16.5}, {10.9, 16.1}, {10.9, 16.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        LineBox[{{8., 16.50000000000231}, {8., 9.499999999998607}}], 
+        PolygonBox[{{8., 13.6}, {7.6, 12.4}, {8.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 12.4}, {14.6, 13.6}, {15.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 9.5}, {8.000000000002592, 9.5}}], 
+        PolygonBox[{{10.9, 9.5}, {12.1, 9.9}, {12.1, 9.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6., 4.5}], PointBox[{8., 16.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd0gk0lesaB/A3SSqHcrJudffp7JAhlE6JBn2foiRDhtiU2irLvicdNCBT
+u2XIKV3DkUxlE6HSRKUu2SSXqOQ6G2U6XZwGzbioy/0/d69l7fXzvN/zPs9/
+f4v2BLj4KjHGMvBH36x3Eh8NnqkRFvFMdqG/SqHOsyuOtZL5MCuNLKj+jmdu
+uQEJHCy1/ZzfqMYzkb3HiSCqN6aYTczimbVdfV8J1Ue6u8RwbX/n9c+w2Ny9
+bXQmz8q/SpIstdH/0ZEn9fDhg21dp8i/jVQ3w5LBtIbnsPRYp5I69dOOj9DX
+4Zm80n17ONz64p9rAmBhbpfpHNyva70k9hos6woX1MHzkh6bD8DizDbtRMyb
+Xe2QP0cXfukvEmOfVGXPi6aw7HDCARPsO6RVfGMD2Urb5g08qnanfTM8OyKu
+1mY2z4zb2hp5mF8ekhkN98U1NS+FtzVI4i/BSU0mpd/Dver9J+/AQ+uDrn7C
+/R8fdL8ogq03nHFphNkqiWoUXN5Qve8CzWfy04g5+ZJ3ZQTtoy68cQP3S4PN
+F3vRvqnqRvWYV2Tjv2I9LN0rsajAPu2jJSZG5AXMOx37vrpwYFCb+tlEW0mQ
+T5EDV6tHPn1b1wJ5ZksSjpjDvb1Sm7kzeNas462znZ4v/WSvqsoz++fFzsfo
+fpeAqoXTeVYWu+VtGd1v/u9wsQrmL17pNETzO2g4tU6Dl4ftW4t95a68LApe
+l/Kp9ATlN+611gcuUwmIU5CtO9aEw33x01UWL6Z86zQb4OyrTeJAmN+/vMIa
+/a/fcn97CxY/UJ7sh1PPHbH6QnW7MkUe5pFMPbpXTw/POw0NBmBetYCiJw7k
+yDRdK+wz2iRPlMD8+z9NZmLfBO0zjsHkh8E/VMGmJ61dQmDpa9UJN+TTx7VE
++sPsY717DRyTt8XGAxbqczmTsEDwJWs19VecypqOfG1zDnVq6dHvEZbdhnpS
+xfjl95hPqrVbFgDHN/R01MHCTEPXFrqfX2OZS/tq3HynTO+7y4IUKe3T2jCs
+jnmFvrNEfmRl7Zdj2E9NFlbqQf26/S82Y38WE+rqSu7baJKDvALt/uK9g/q3
+rK0LUsb/zfd6U369j4WJblPxnhrkbkiB5arJPS5KmD9Kz1tO9Ysa94OnYD5X
+ud8Y3ee2yreewXM2nl1L+zYPdDvAulejr8dQPn7b7s2E580v0WmhfITF8slJ
+jrXn5Rkt0kf/WJ94I9RTY95/+IV8Yavjr3BEcnZhOSyMny/RxH2qX7b/4yss
+5peNVcIr9QT9ZgaoX+uMOo75UusW2vvCYjuBszPmjznrkRUPyyxFyxdhv3LP
+9jk5sPQ3cW8fHMFNTSii86d8y5KQR8xxy9gCOn+uQX8B8pKnT9c8S/2HRzxD
+YYv4By1RMP9YIyIfFmk19uwiT7XVzYTbpQ3XVsO9foPRHnQ+KGVsDj0viI7s
+Qn+3DwMpb2ifn0cylsHp4/cd6mBZumOXK+apOCb/vVCf3p9ZkS6YvzPqZGIy
+7XujINwM+1ko+YbHkoO/mqhi/16dSgGZ/87QpwR5mjZl+NF5+YPzF73+y7Gk
+ysGyS1TP/2ma6VeO1R91ut9M/T0bft44xrHsBHGuEuZjHbceF/6HY0Ur0t+s
+p31+DLL2H+HYaJlGYTTl1VlrnzXMsVf+PhFPqB65cesamK+LeCgwRL3ZbMsW
+WJqmVrofZvcNhmrgovSXB8qpfkbYk41+c4U1q9kSzOftolSP++pv96TxsPSp
+9aHlmMfib+HiEJh3OWH/YJxjIuMf/8yjeujAXd9vHLvuzk+rgdnEJgGb4Fj+
+xGaTVqqfX2Yehv1rO90DO8gOj67swvvzbf3ByBY6//eOu89htz26GXJY1uip
+Yoj87BtGThfAvU+XxG2ERWExadGwcPbxQj24YofpBm+aNyY96hme3+f7eLsZ
+LO4ab7aBVVXKi9WpHnJ+UgP3C49NqgxiX/meo/mWyD8+Y8u0Zpjf222th/yb
+xZpvK6iu2P+ye5Rj6X80JZdRPoPPHkUhn3Vn1jhRXuxrSNjCIeRzQKO/nuqV
+skDFJ44x98shA+SFj1QiPnDMwGRHwmzaV1EV3foW5wdXaWyifesO9XW8wn1m
+28WxVP/ri4DCAfxeUTf9mqh+eV+HYz/HWp+1XZ1nhHq7QNLWxzHjZJVjfjDL
+iz5niXrSihCl2+RfvMSH8HzRwe/9phjDrTuLxegvtFKaspm84Hxx3xuOyVx2
+7Y8hFwbtbHuH+y/GFdyB5YFPy2M/cmynZ55RjzH93ivWGXzmWOhroxnjVH/n
+l37vC8dsPXP7ppvgeYnPF128P6LQR1NnwNKEH7ydkU+El4/tBPXfynUa4/3p
+nbtp8Wty4m73Irh1uDqhEeavDNvehUdXlrYX0n0Lley8YP9fa0ukdJ65251C
+v20ls1+IqK6wT3PGfayg0nwFzdPyIfUO5onJXSnVpH41WbZNyL9svWzlGOVx
+IGqpDfJPCt4a9pqs/emhDPuHZomm9JNrbL49R372Ms2Pg5TvfiuNxX+gfkjR
++v/87u0e3tXBMXGgVY4OeYeRg9Mz5PdkVOZMlggGFbV4H6pZ2kly/ty830uR
+v6FlWRNZevpfHcnIV+FdrUV5yU9kvkqsYhZHDZfuJZu+Ppx9porJ0trNbpLp
+k1TJlOl7Kf8/bdOG9w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2847296091079567, 11.54244899022028}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gtYjNsaB/BVOjWJjEJF2UNRkdOgzUSaqXQTutmU0BSFUkbqlESzky4k
+41pOZCREYlLtomQSUXZMJrq4jVISatKhEO3/8px5np55fq3vW+t933m/tb4p
+gVu9glQJIWX4o99kcBif33jk18eYRwRXGeQezGFHupZO5ZFM4dFDUTBr/9qe
+7XCX89CJ0XBZ/+tUDtxMLmsdnswj+hP0fTRg0tt3Wx1mGflMapuC65lvVgmM
+eITXYK1RB0vU9ryVG2J8/sJrt2Bid+npPFhqXa5dDbtEXziUPQn3eZ0MldPx
+ilg3JjyYlRzXC7Nb79wSTUR8KWGbx2M9XqPLN2PYY3DfG3u6flbO9HoDHlHG
+vneMglk1ESHpcIo6K/8iLGbcfrAJ5nlcNXhB87GqN1kDu0Tk5oxC/i7Sumkb
+YenaI3t/hzlTj25IhvOmbfP8A9bvi95xnc5vU6YSAisGn5t+peOjd02IgPOq
+GkR2iCem0vv8FphVNSvsACysnr3ZFzazPLi0Cb6fVFvOgfnLnZ4aID+FMSdL
+Cy4rNNX0gDdVcE7IafytbtFRsMf4kNrDsLTwU2wSvb52b54bLPumEyiEpbmS
+nwQebE9LD4B5C5wqS1Av6Y7dqeawS1++Ygss9H7MaKHxLH1kb07H99zt3AZ3
++Q0kfGRh3su1WgO0Xgf/fF3OonV64LaF5us/PO04nLd2J+epPuLU/pK6C5ZG
+VnZbwz67bC9FwMrpD++e1EMcn4rio+CUmvZ5ajDHPdV/L50/ISwyagLyLuGN
+OAMTiZz7eTziEXRm1MBiq5LLyTCD0SLvp+sF8pSWsMhyos50xCta/2GBchyu
+N2/bthpmLfHLroVZwUODB+h4QRapgPN+eJXepJ4aYFQDS3JIdyc8mGJyrAMW
+xToZ/urX8GhNPcwvPvx8sSHtZzHHcSXMd+G+NIElmXXh2XR9edPgb/R50Pps
+1w0rIkydRtN+OndruRXyERoIDD9ifoG3z4JomKN6NUIKNyt//iyAWYYGT1Jo
+PLu/mzbC0uM5Xi4w8+1j9U7YrDZsgwpclmX7SgEPhjrJ/kL+/OAWjWpYzEtN
+DoXvb/n2Yz8sUR2ROBUWpshCbWg9H8ldbuK59FgTyXpK4z82d5wjLExw/+YH
+KyN9+hV4LqXXWu80IH9icS/+KGzmsFTLBhbn+nICYd69FW2ndTF+ctt6N7hs
+Z0S+Ksy8XDnsTp/rYknjZh3MU7XsTjjM15NntI7F/31fW56DmzX6y31hMurZ
++d7J9HeMWfOeibg+eGS7Ip7BTN2yw7DsptvjAlgwVnOkFxzT52WvRfupLn3r
+DLjrU73CFjbbt7d1EqxUhMnDaT16jXWmwSLu6xWZdHzjgSoH2KxN+qEMFiw7
+fyQS5miPOvCQ9q9zy+oimNhfudQES47323+H71t0u8tpv2nWjHRGvJkOD02r
+aD+GPLM/BIsCZyTQ/hT81ye9EY5xa3Kn/SyII+1ayL+ZH6dH49M/5393Dszs
+u1bzne6LWz13O8Ks5mee4TBvcJ2zHa3XLttVLaiHLK0j1AT2eBlbak/r9S56
+bQ+tX8/zYAn2SY5+0o3TMN/beboZtey70wJYFp1gexX75CbTWU1SxC91NLFb
+Ameaj/73fJqfs+rjITzn4uWJYocxuJ5xY2ctzOYHnNTShl1WHSqk+0ay2piG
+UbA0YXIJLDT5/CRbC/EUful8TPcRXavQ+JGoUyk3ioH5lRrmm+I0cd0RA44X
+LAkYrZvNwPdbRkE+3cfvzxzq1sD6f1sdH4N4yfj0qxthZckQJwb2aK/cPQEW
+aPrnvIL5f5oEDagjruDhj1zkL8pfxGBgnFkQl3YEZltXyB3ofDaP9j6BhS9n
+sXPp/dEZxSr0HOo438DC+tIZJwbG0X5X3pkoYdD+HL+KnkuytWEHnRGvKNjZ
+sJvO59br+VyT9k9nSz6sZJbkrkd+ihLvoBUwMYkNkcPKsUXSTsQns9M6PZXW
+4zBjIJjGP7v3tissOPX5fQvyVTT1WTnAYvG6KY6weOL6KC1YufBK1BXUT6bS
+4X6Gznel5sUkmLm08d2/YP6ZDqMj2Gd5mtnFNohHMPtBogEsqshd7Ib4hXGr
+Lxdhn2XfOK1tjXwVF/Lsg2DJN5H2GNSLdI18yaau3bGmSQ1xVbNf6tFz7LOs
+6OQI3Pex3G8i7OHg179ZFfO2GZjOh0l2QJarCuo1ruBpKCxy9PZwJJjf72R7
+MT3nLvg+qvvJJUpPpXw0jW9AVTPgB5eIFmoI6LlAgg+JVg5xieyegrTS8Rfc
++ZLvXEICfI/a0X4LMjEOh4Wzpi/Oof0VFlW/H5ZY2cd9gcnZDA7B/WzNxEXW
+tH5+4X6VsEecnW8w7Z91PRUlWI/30fpsLB2vK+LIEY+we7teJMxvu95HEC+/
+cMknT9p/Bt6qx2FpQ9r1cbBwTvuoyciPZ8edV0n7ffL+9+kwy8Xd3xNmPfmc
+9goWOM2e9xjxs0tO8Rmoj9JMJ8MRlqoaF46AFRef/JSgHsyMnV31uJ5td8yV
+1lP56sGNIBX6fBVsSdan70ldv/+N9YlBluVPnGuypNvFarAk/EfnHpiYV4Sb
+0/ibe6yMYLElz14D+QqLrzXU031/zMyq4q+od76rfybd1+NEmk4DqHcWWbKb
+nhMrePtk/8N47bbSeHq9Y7NqyCcuYWZXJ2bBCnU9oamSSwQt1isewTztyVWc
+D/h9LKIv6mE94ZS21mtdqG+wka4AlopDTZo7uIT1V6u/HOa9+hJT3o779UKe
+L0Q+QlO9puA23G+ck3EWlialvmt9DUcFXVSj/fNt5bA2xkWnpu3wpf02//T2
+PpitcpWcouPxc4Wb3sBnWIwH1PXsbd6dmD94sY+COsNxZhriUR7pVbTCQvf/
+fOrqxvj9Mw30PYrozF1j+xHjOovO7qL9+G7fHwG96C/79TpmdPx6/uGjyFeS
+Wz6ygsaXYHWR08clYj/9xEUw339P/gGY9WiidyHN726pegpM1NN6DWn9w2YG
+smBmuv7cJFrffZwBb8zHz4nV7ce5SL42b3DtwfgPb7/N9D3kjaX1nPdwKSOo
+B+ei1PeEQcxbzP+hsTWJvnesbl7GQf2YOfrx86ijXYosXiD//duHh3+dm2Mv
+RsqRn0Vt4xvqr/EWNtWI/2b+7A7d/79ni28SJX3v1uX9A3iCJcM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.4677856382145418, 5.536752147784559}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VO37B/CxJEmMQtYaPUKKhihLMpWQEGVvMSqVqJSILEnWkpB2RfaE
+hkramFRSlmhV4REqa1GeGlr8Ptf35x+vt/s+931dn3PmzDnUNu1e4y3MYDDW
+CjEY9Pv/f5gchmAcPywOQ2X2iE0K3MFr6VVU4zBE9+85qC3DYYir7v2kCfMH
+pvTUwA4NmuNasJ/PiiteUzmM4IygRhXYNkpe+AfsXxcQLQIvfvxs58FpGDe5
+2t2G9XNkr/aNkmXOmhXDXGMF1U2yHAbPr849AJZd4r3/Blyh2u6rD9vOznP5
+BvMPru5/O5PDSHeRlFOQw/5vJ7itgrnx+jKaZKkrvMoZqPfK18ss8sFNe41h
+xvFu3Ykwb7y1hq+K3//trWnDetwhExt32O/zcpsCeChZ640YzF86qOxLXhW2
+rl6Fw4hsu/hdG84ULLl5BXZIEr4ygPqH2pPzc+H6ihyxG7BDh1vlLbgjdFVk
+PMx0Ut72CS6oOS3rC/sbVwu0sP68fA15Lsx7mfQiHLZYM1d8B8z53ZXQAe+L
+0Ig6ArOtZky1Rf0jXqOq1bT++pXjt+Ei9xl7mKiHZWpQqYn+50k4yeyDmxiG
+LxNhJ/W4nD7YIeqtykc4bZf1L3/0zxX6LCSPPLv7cg1E5DmMlt6Frbrwb6mX
+vemwIGh9kSksWnfH03g61jf5GE8u8DG/+wJW0NBTovlnDNoXb1PgMNzYdhen
+wQ+nr/b7CkdW+NfT+VERLnfarojjf28+G0TnZ9SsqBHmVgzbCcFMWbWxmUro
+39CeG0H9TAwv84AjZTQ7vqH/3223rSLI5/PMtsAsuRr2UZjVbCzZgjzTbjZ0
+RcGMrU8frIV7dOsebYP9Y+cfblVGXtMSpM1oXOvI6yCYtdnjshiNh8pFa8DW
+M5THa1FPsusVry9Ux38+jfFUb/A7gyaYs2LVsA2cGfXfxXp4fd0xTVmy4i+5
+LqprseuHHvTLbc7rk8F6HaV6Uxqo/7db17nAFuF1/Q/IBl7XiuDuAY/+Z+Ss
+ufuYqLe7emniNziT4RUfBts6qTvMw/rMCe/D+lXo86V/PQwe2ihZ6Yr+ox0/
+Leyk/LJqX9+BDeK+bqe8eFo3i6civ8Vj6eKdSnQ93q10hSucD2kEYt+mVa/t
+4uD4b1WO0li3qVM95SKczpV8StdxZr1z03l4yzTtGyuwbpM1I5jOR3xYinML
+fU62qrGsYNbd5+ae+M2T8ov5ib9XKKxPfA1H1lUEpsI5cgEipjivHa17eMqw
+ZJD/0iMwI8zz7mnso9KS11z9v/Gr1yfDjLGHS7rpOpgZIh1O5yPw1/SvcObN
+xdxhyje2qI/Gm66wFHfBiVcH2bU03/6SnQA5OAxnGqbT+N6dIWkwYx/36xby
+lCE7S9jiVPsLDdi/tzKeCTsJl+Z+Qr3JE6tfjiB3weCdJZdh/vldN7/D6c5n
+3AOov7s9RyQx32DpuvUrqe9XdjFmtH6IrOZ82L/nVf1heLuZXo8mja/tPf0e
+rt1SLDCE2UbVrhzUG52Te98D5k673V8Ed4TvKzpFNhd+r4x+ed8kZ/TCnHaz
+1Dg4593jcAfK565VVh8sLuxm9RTm+Xj9Maf7R/uxE3PwOYvco8Q+DHP7a47T
+fZL/eNcJHrzFR+E9H2YUfw58BAfH/pkqjfsuM++rMR9mfo95ug52uCeyPROW
+35+XmwNzpf+7tpWug6K6gM9wx57xEVl4l8Nh61mzsN5uKZkS1JOqppGyFuZY
+KbUawroqSRoHaPyZ5CAP/eUEy3ichCPbp+1Qh0ss2X9y4MzD+Y0nkY+268XN
+l2FmX1OxBLymNtUzG3YY3R4Qj/wLlOOM0mB/eRlNWVjcpzE9HOa1py0ow33n
+79L8JC86vkfPcCvMy75gt4zWbx1p0ocLy0zNqF4Hsf9OKcK/WRpPRcjT7w0p
+wa1Vz+170R9ncr7KQrhSSXL0Jczb4LnQBy755FtaCyf3zbcthTt//DuhBo5k
+/hMpQZ/zJXMVGmn+jiML/OG/hZopHyi/+HGTNviMndtZBvV/9KSCLfqTOjPz
+jTbVW1tkfBP+rVKy15Py2skzVEQ+Fb3hMy/A7Ce/JHbCm9SGtDupfw9j1xJ4
+IHf78Xn/YDyXH/8WfjfInHwAbrpUIzYAC/+71LgWZnSft++GCyKCimXVsd9w
+iWg1XPTutNQGOFL1hCAG/ha9Sy8D5p9tV9aHx+Kk9d7CQ0WWfk8U6fOqFz1p
+Nn1/DTWvhmuUQ6Tmw/7l+74/QX9hPWPzVsKM3HAhM1jdfMs9V7L5urAS5DVk
+FDZzHdxRJvPjH1h7UT/bCWaPZb/IwvdKolbIcgtaP9edyYYVqthSOjCv5MqE
+JnwvBS2VPseEky1Wm8TCW7KV5g6jvkzrGBNn+h7/9q9GM/Xz3S90CcyZEzJa
+RuMa6TbL4KefV46dUaf7wo2nnvCs7FzHGDj5+uw/abDKqbiOEJofm9LSDkfs
+3Dk3mPLaM9HXGPUcCFq28hAdr+stlgm3Bii/OQnzusUCp6AfwQK74Rtwk5qf
+QRgc9WGu/geYMd382ie4NvBQuTzq57eIJFshnyO7EzSdYW5T8auzcHCj0NNz
+lNeUPQvewvqSBSkfqd9iDx1h5N39ydJogQY9ZyQunwr3RDu6HoKTbbZIicNR
+af1RDTCre6V9F44vfKXjLaeJ3LMjvuTAZRUBLS6wQ+/9MXu45WjC+HGYO8Mq
+vhv1KV0o9Kgie/5Npev9Zcmmli6Y6X2zqRP9Jh9N+/Ab9l+gEOYML3abwZXQ
+ghn3FB8jryHx5ipJmL9JwcQMvruZ1ysKDy1/ZnIPzxn7/EqNR3A8h+coYQs7
+yfnuboV5K92GBvHc4vLZ+xztHzlQviEP1oruEc6k/UKzHu2n5yBrS2Ykzd+p
+GrUZljRq1tkEsyzvP/SBtRMyrlpTfzLJaQmw7UTXCkPa79CnFj7M6lFXm0t5
+nJ+2RxL7f7Ic2qKtSd8nia7b4Y3zS48b0Px3es+ewRY5+fo2cLJV7hnqp3HN
+zw2+MIO5UacIlp8+lHEaZje0/pFDHi9LJ0s0Uj0rLXmBcFLHdtMp6L9jVvb6
+GnjIzN5/LdzUofpQhJ6TMsROXYTZas2R2pT30UWbBsjWk+cZwfPUr/iZzMF+
+EW4hc+n8iPjaxMJM61krROHM8rGCBpgrMD/1gM7H54jtUtqof8PWVF+43r3w
+miXMVhj1Hke9oszNsoHw0Hx71mFY9sXC6DPk8z9ifqHfwuqP+3nkLqn3O+GL
+45Ef78IOqSP5/yK/kdstFpU0bvD7gAvcp2Z45AbMMPt4+Q2e41u+n1TOgVm1
+dXLbYRO9b/yjcKT24pHJcE3inORdNF/neQa9F8hmJbyyp3r/C957Dm50+Tqq
+S+OGI4XxsEFC/jYZmGfRujEFTv2Hs1uAfjObC0OuwfxloTqfKI/3nbUDcLlj
+QkAr5eFeJ2uC/d5xT5aRIw/mWZyGX15L6P9MXtGYOA7r//Mg+y/cEXc1Zyf6
+KUvW/5eF/ZJdLIRb4R1luiyqjy/tr7ACeVgeF/jFUB7LDp7MhhnD1z0ewU0n
+JmfQe4d9lqeq5Fysp3ZJXBf5iptOSHeFm+7fi1oDiwk843PhzHMK/A3wgdcN
+wd/n0ucn6bg93d+OhoqYz0MewUd71eFqo9S3MeS8LUMf6D0n1vDDI5gXfKwr
+Du5T1rH7AzPTVoopwSaluqXaOvS8+uVAOuq3lumWsYMZSc6ysvQeFSH4upls
+c2xmLPoXVi612w0zK7W0BMjPPq65hNyx4Pmt3fAMs8apW8kibWrf8J530TOp
+dy3ctPzUgmi4/KepiCk89Oy7jDb8SettqCrMOjdJuFGaw4jdFZlN9bFqN0Yd
+gK+vXNfdRnYv618Hy3P35fPhjtO6envhnIenjAvILwa+3YaZQb6lp2DGetd6
+Bay/V0Hw5hic6fS0ehu8RDdO9jit92aFXg3MefB+/XmY3SW/ZD7qj7DepH2N
+7Dh2+gLM2Niy7zXsMGG0lK7H9f35ZaKol7vso9A+OLpluH0x5Zd+a0kzfOCR
+aEw42UQ5fQbyWyZb1fQQ9md5MdzgAnX1bKYu6myr0j8Av15kVrgRZm9KGY+C
+O+cbhxbBDmyW4x5YMJBT/FOXns/aTVfAWUkJP8zmw9yDf+h6FB9csiycrP/n
+SzZsOf9Z3TWYqThnhwGc1NTF7oA5675m30A/66qK+Qw29S0Imwd7ZQzkTIY7
+ZKtsLiKPHcK+9Uw2fV8dPM+ED377E0GONPH4KoN8hY16l9J8frGTlaIUh7Fn
+UOi5EJzp9qOWMwXPG15VC/uoHg+dtGRJ1GcxsqGeLOYhIg3v2Lx6ZxF5ScNm
+/mS8bzVMakok31r/KA/m/yoZ3A13NOl03Ydv/5GUdiN33dGg4/+2RVhYwQwf
+wcMEWNa2zN58Pn2uzUa0sX952eCRpeQbZUZ9sGTy9S57cmXDg3uo91RbUM02
+mHv4euc59GNRUTWD9ue4u5qa0vVRqeh6B2bPmnsrC673y/AcofnpIlf+wmV/
+f7QqoV9urMRaG+QnsRovHNS/+ZPCQ3D+kT2vttC4c1jyJThXO6/rKOUl6taX
+D/Nyy2+VwbwV7MoT8F3BIvUWyvdJyGJv2KX8zvgYzPquWakKm83LWqGkh+vn
+w8EbVdhfV65guiHMzjmaag/fPF38xAbmW9caXUA/bp7WvR4wSzA5KgH9BsTX
+LfOGIz9m3PFDHvIPE7t8YG6ukdga5Je41E6RzD9u4muBvEV1G3Zt1qP/Rxzg
+2ktg/3herjvMcYxcEzKJw0hYNFZsS8cv3GXSIM5hnA4MP28Gd7y1tHCAJUPv
+ntXRo/tFQIIYfJJxr12V9h/M6ByeiPe/R1svSNP6s0eey2A81G+CQIT2b086
+thl29Y75/ouuz3AJuU643/OXr4D8IjcgFvs7mP+UoHwyM85NskZ9oxulOUK0
+XzD7iwrqj5MWmErRftLWnmOw5emNX1i0Pm+/ySv0azyaIWZM/VR7H8hCHoE5
+a3860/Gy7WWuyIu3Mep3EPWTMy+2H+7NXq5+ntablCblgnw/ZHPd79N8V9NF
+KXCJfszuHnLsZcZZuMc3kC2tj+PTnxb7whsXX/MxgBmrDr+ZBN+fNDbqArN8
+fngHYX3dMEFbIMx3qN1djnpahitMk8kzmxnNkvR+aeSXC3PqHjxtRD9tQveE
+b8CRWtYPbqF/t8eXmithbvfra+nIx+XL2oFqGo+25EchPy21kLz7tB7TqzcI
++c/hcJLvUH1OYimHxXC9Myf5l9LxL20nlE3A/Uiq0DgHzjzxcLoEfLe5XOQk
+WSLoUYoo8nxk/iuajtcN/W4Lnzc46UL1M65qLTeDI5OzrLZRvXuvj3vBD7eF
+fllH/dZralTAvFWltk40f7ZFnAnWlxcWMnGk+ZPbhDrhQufXHmtpfsT0F7mo
+r5gto0jHd7yfOBqK+md5bsjYTvX8dct2R3839zq+CaXxdvHiBeg/ibljRxqN
+R3YojsM/H79+RP1xTsxKLUVeP1oHWS9o/vD466XIMzrlb8xPqsemTLsA3lk9
+o011AfqYUpDfDjvbHBBYwNyg/qgPsFzq2Uu+cKZzy8Kr8ILqSfnJMIdrnmYN
+GxfX95bR8f2Gt3jYjzcm8GkmPxwdHEA9jaa/HfvJgn0+ovD/fgxQD/1/dCLn
+/wA7d3r3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.041811450678379, 3.90656724560653}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1g1UTOsaB/CNUPoaUqJi0ncqgyjVqZ2P1Ck1FZVEY276cKIOQ0mYiCQy
+NCeVQUI6R1cTlQoZTEqlGVTiRONUblEM5SvR/b/3zlqtWb/17P2+z//Z7+yV
+MTcuYONYiqKu4Y98U8pRfGbR1Ai+9rJoipVTc2Myk6b2cCwM18Ce1s0ndOHM
+rw0jLLj+5z/ySbDAd66+GszXrxr8B/cL1sTeq51LU4wWyywhXJbNjNsL5zMd
+VtvCOfOHCtxhZVO5Z+lM1MNvcLXI9Y0f9pnBSjNH2//Y0RTtf6zzmBHuE7v0
+NcFUUX7FZ0OaYud5P78N83NFRzhw/V/LTxMzdppLnhjQVNFFX9tGmNlftjgI
+jv/8l1IBx9/UMB6YQVP26wabfpL1FzqLRHCv41n32difEi09FQUPzctO84Rp
+U51rfnBss1PZFlhhl6m2Gi5+veDlcVJnXQ3cAbdYmi0pIfWnXT1iWNSdtlEK
+S6aKWinSj/rAQhnMrmy03gDnnJtp0gwzQ9NmNsFh3KfzJWQemT3/ckYeeoa+
+5kXSz93EhCJYOm0vtRsWrEv6oIF5LLuy6SfpT1yS18aFVQ2nHZsEsyQ7uy7A
+Q3Yra+4hHzuOIWuGc2TCMQkkb/g9/gs4cR9rugWseMhzkMHRyuiBNlvMp//S
+2fOwwv1lTDrMNzrzdC0s97sS4m5L8jttGEY/R77TbmNgwau1Y/fDQz4Jro02
+uJ+/9I9h5PnqIfuSD8sfBzVGwu3VssT9sEDo0/MQ86kcvm27DWbP84pYBDeN
+BnTEEXvLrxdORw7t9MJEWEJn95vCyTrndY+Q+zPmcSr0cf1PkU0RzNDdsjsc
+ts9YntIAK9NOpprArKCKUCVMVyZyVWCb0stP9EieB1NzxsKqLyeNOhGPeNsb
+wbHWDRqhMMv9Zqc/XFwVs/l3WPJjxbAIlqu7ftwDsxmy+m+w4dZPvXyYM/BM
+zEV/ERU/WDtg+pHH3kdwmd9Nr/VkPhP2VLgh36rmnpDFZL1JgYpCmOFzwVKV
+rFeZ3knOR6/svFETyd807OIJ619MMUsjeYwOxybCKqW7zjjDrI60CZmwhtqJ
+xf1zsD5d9PEgnOqT1X4Klmhu28eFKUoSsxJmf+vYaUyub5HdHQdTW86Mv4/9
+y6rn7L5jjedVc+dsICw4w2w9BMtT73U1o3+BwZ9H18JUQNyqX+Ch3PnPnWB2
+a5DeReSXHtvhZ0Hq3v4FGvAyI4sOJkwHtW5LmkZT/Z6ND8xhSeSC60N6yCO6
+XetA1ler/M6HWZP6PvjDipGMARPY8a3HyFaY86V2xitdPF+Wk0sOzHgtvF8N
+J1ozWmpIv5nXm0rh9jyr1i5yvfGf2bUwg/U5QgX5WHbqJkPwIfuPCiNYnvt+
+phPWP/JOMWoLM7Sl2lkwR+fcu/mkXt6c8Q02nMaKmkPq/rw9UehfFF4t0SPW
+f8trg+NlA1+GSB7rrPduyGuaYVZyn+Q//vHaaXJe4mPNj5L6ml8N3sCio9Vz
+fiXW7lnDxPykTxaoUDDLL++GC2woOuhXaoX912c8/p8fPn7NgRVHG/6YBYdp
+3aicDDNtN23pwXpi3sYL9y3Rj6vvfAEsrHFdvY84eKwmOe9htV7GK2BJdGVw
+AfotLr/wVg/Or4jh6sA5SZUagxbYr7+ZlYy8xUw39w5YXLDbrgvzCtv3Jf8x
+qU/se+ELW0bvOt0K8+8uPVg7FfPe6aHWTeoNvt0+cNgzofkIqb/6/qpPB++/
+JetuGWA/6s22kHzY5x3bgSZentm5FRbn7pVEwoI6w39z4a8Px/12BBZzig7E
+wWFxnwKvkDzS9bdPwolyed0DYg+N4HY49nBaRAe5v3i6ni32/9pz1KGbOKCk
+TkD6oze1dRJ/Ck/6AXd/EsQ3k/sTZjXGIk9E8eVnJWQeIS0L22FP74aMVFjZ
+kBG1GPOwP73h3EqYv2Bp5mF4aIBbp0H6cwopuA/n7zOwlCKvJIgq7IOTB3r8
+dpD8vMKnSlJfNV7TnMxHfLXlOZz6w82nzRzP82+Vy5fgnIovg+kwS3V5ewgc
+P3z89lI4vnOKwwf0E/32h+EE4u1j/ubBPgXqWk/M8HsTmL/oRZ4QE33tYpjS
+qDMIhKXdK1VOwPQhH2UV5tNxNtLuAMwctO40gaPtky2IJVVFy09Owe8hhdEr
+IG7IVpsBO3pptBTCcnm/b+lkPL9chkwKcw4OLtoAm/ZOD+6FGQF2xTawJcf0
+ghb6yz8p/EUXnspY0mgPc5hvJhnAnr7RXcGw3NPungvMXmdqvZ3kqVpYngCH
+XI02PwzTwtMf6uBU7s06IczYEJtsiX7sny7lZ5H1V7/PyILb60NDDpB5nbvx
+aCw5L9vqh2NgytO5gZyXfvWhSndyv/9zrRb4yKzug5qwRFhXaIX5KIad3jeT
+eTB9A36DbVTrRtNgsRbjoZC49dRcZzKPiy/HnYdNJw+7vTVF/zfTnEk9OT1z
++ilYsv6KeTTMOF5zaSVM1eT1zYJ5Oo+ujYfpDY/Ua7C/ZH/tnVoTnL9TFiEe
+sLRGqDwGswS9xbeQh6eM7dwIMy2jaqzg3mynXE9YWaAiE2AetHZKmiMcv8qR
+842B/i5abl5IrjfYrYiBFfH7Y1xhhTK8TK6N3+9+7rgAUv95y3dIC+/fiSXO
+W2D+7yfCVsBTZ4sKBTAtkQbKNfH+D15wuILUQ+eMzYJVq6uoF3C+0Yl1Ajhs
+oovRGJJ39pmE+7D9Ax6DCednW2SzsB5vu7OPA8nf27alDh5Rqzm/DOYH6e1P
+QT+9du8jPWBxUW+jFfrleckSnGHBosxzObCcTg0xgdkakdIJyKt0zJz3k8yn
+1Pj2Zjj5boOsifTnVLaDnI8Wm/A80j/ba22CFuZVVKSa4k0cv2mxK2zaKO4a
+nY3zt4sXGkislcQTw/l3qXpvct5bbulyYLFF6TNz2OdNUflkmL03c00P1o+Q
+uFvVG2M/0ZSkdJjpcln1IMzo3lytB1/gR2WuhKnyyOrj6D9nueMuJjH5MP7/
+//Eok/4vULcBlA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.592338820250189, 12.901430589874906}, \
+{1, -1}], LineBox[{{7.9999999999976925`, 9.5}, {14.99999999999251, 9.5}}], 
+        PolygonBox[{{10.9, 9.5}, {12.1, 9.1}, {12.1, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        LineBox[{{8., 9.499999999997693}, {8., 16.49999999999251}}], 
+        PolygonBox[{{8., 13.6}, {8.4, 12.4}, {7.6, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 12.4}, {14.6, 13.6}, {15.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 16.5}, {8.000000000002592, 16.5}}], 
+        PolygonBox[{{12.1, 16.5}, {10.9, 16.9}, {10.9, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{4., 8.5}], PointBox[{8., 9.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 16.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd0gk0lesaB/A3SSqHcrJudffp7JAhlE6JBn2foiRDhtiU2irLvicdNCBT
+u2XIKV3DkUxlE6HSRKUu2SSXqOQ6G2U6XZwGzbioy/0/d69l7fXzvN/zPs9/
+f4v2BLj4KjHGMvBH36x3Eh8NnqkRFvFMdqG/SqHOsyuOtZL5MCuNLKj+jmdu
+uQEJHCy1/ZzfqMYzkb3HiSCqN6aYTczimbVdfV8J1Ue6u8RwbX/n9c+w2Ny9
+bXQmz8q/SpIstdH/0ZEn9fDhg21dp8i/jVQ3w5LBtIbnsPRYp5I69dOOj9DX
+4Zm80n17ONz64p9rAmBhbpfpHNyva70k9hos6woX1MHzkh6bD8DizDbtRMyb
+Xe2QP0cXfukvEmOfVGXPi6aw7HDCARPsO6RVfGMD2Urb5g08qnanfTM8OyKu
+1mY2z4zb2hp5mF8ekhkN98U1NS+FtzVI4i/BSU0mpd/Dver9J+/AQ+uDrn7C
+/R8fdL8ogq03nHFphNkqiWoUXN5Qve8CzWfy04g5+ZJ3ZQTtoy68cQP3S4PN
+F3vRvqnqRvWYV2Tjv2I9LN0rsajAPu2jJSZG5AXMOx37vrpwYFCb+tlEW0mQ
+T5EDV6tHPn1b1wJ5ZksSjpjDvb1Sm7kzeNas462znZ4v/WSvqsoz++fFzsfo
+fpeAqoXTeVYWu+VtGd1v/u9wsQrmL17pNETzO2g4tU6Dl4ftW4t95a68LApe
+l/Kp9ATlN+611gcuUwmIU5CtO9aEw33x01UWL6Z86zQb4OyrTeJAmN+/vMIa
+/a/fcn97CxY/UJ7sh1PPHbH6QnW7MkUe5pFMPbpXTw/POw0NBmBetYCiJw7k
+yDRdK+wz2iRPlMD8+z9NZmLfBO0zjsHkh8E/VMGmJ61dQmDpa9UJN+TTx7VE
++sPsY717DRyTt8XGAxbqczmTsEDwJWs19VecypqOfG1zDnVq6dHvEZbdhnpS
+xfjl95hPqrVbFgDHN/R01MHCTEPXFrqfX2OZS/tq3HynTO+7y4IUKe3T2jCs
+jnmFvrNEfmRl7Zdj2E9NFlbqQf26/S82Y38WE+rqSu7baJKDvALt/uK9g/q3
+rK0LUsb/zfd6U369j4WJblPxnhrkbkiB5arJPS5KmD9Kz1tO9Ysa94OnYD5X
+ud8Y3ee2yreewXM2nl1L+zYPdDvAulejr8dQPn7b7s2E580v0WmhfITF8slJ
+jrXn5Rkt0kf/WJ94I9RTY95/+IV8Yavjr3BEcnZhOSyMny/RxH2qX7b/4yss
+5peNVcIr9QT9ZgaoX+uMOo75UusW2vvCYjuBszPmjznrkRUPyyxFyxdhv3LP
+9jk5sPQ3cW8fHMFNTSii86d8y5KQR8xxy9gCOn+uQX8B8pKnT9c8S/2HRzxD
+YYv4By1RMP9YIyIfFmk19uwiT7XVzYTbpQ3XVsO9foPRHnQ+KGVsDj0viI7s
+Qn+3DwMpb2ifn0cylsHp4/cd6mBZumOXK+apOCb/vVCf3p9ZkS6YvzPqZGIy
+7XujINwM+1ko+YbHkoO/mqhi/16dSgGZ/87QpwR5mjZl+NF5+YPzF73+y7Gk
+ysGyS1TP/2ma6VeO1R91ut9M/T0bft44xrHsBHGuEuZjHbceF/6HY0Ur0t+s
+p31+DLL2H+HYaJlGYTTl1VlrnzXMsVf+PhFPqB65cesamK+LeCgwRL3ZbMsW
+WJqmVrofZvcNhmrgovSXB8qpfkbYk41+c4U1q9kSzOftolSP++pv96TxsPSp
+9aHlmMfib+HiEJh3OWH/YJxjIuMf/8yjeujAXd9vHLvuzk+rgdnEJgGb4Fj+
+xGaTVqqfX2Yehv1rO90DO8gOj67swvvzbf3ByBY6//eOu89htz26GXJY1uip
+Yoj87BtGThfAvU+XxG2ERWExadGwcPbxQj24YofpBm+aNyY96hme3+f7eLsZ
+LO4ab7aBVVXKi9WpHnJ+UgP3C49NqgxiX/meo/mWyD8+Y8u0Zpjf222th/yb
+xZpvK6iu2P+ye5Rj6X80JZdRPoPPHkUhn3Vn1jhRXuxrSNjCIeRzQKO/nuqV
+skDFJ44x98shA+SFj1QiPnDMwGRHwmzaV1EV3foW5wdXaWyifesO9XW8wn1m
+28WxVP/ri4DCAfxeUTf9mqh+eV+HYz/HWp+1XZ1nhHq7QNLWxzHjZJVjfjDL
+iz5niXrSihCl2+RfvMSH8HzRwe/9phjDrTuLxegvtFKaspm84Hxx3xuOyVx2
+7Y8hFwbtbHuH+y/GFdyB5YFPy2M/cmynZ55RjzH93ivWGXzmWOhroxnjVH/n
+l37vC8dsPXP7ppvgeYnPF128P6LQR1NnwNKEH7ydkU+El4/tBPXfynUa4/3p
+nbtp8Wty4m73Irh1uDqhEeavDNvehUdXlrYX0n0Lley8YP9fa0ukdJ65251C
+v20ls1+IqK6wT3PGfayg0nwFzdPyIfUO5onJXSnVpH41WbZNyL9svWzlGOVx
+IGqpDfJPCt4a9pqs/emhDPuHZomm9JNrbL49R372Ms2Pg5TvfiuNxX+gfkjR
++v/87u0e3tXBMXGgVY4OeYeRg9Mz5PdkVOZMlggGFbV4H6pZ2kly/ty830uR
+v6FlWRNZevpfHcnIV+FdrUV5yU9kvkqsYhZHDZfuJZu+Ppx9porJ0trNbpLp
+k1TJlOl7Kf8/bdOG9w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2847296091079567, 11.54244899022028}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gtYjNsaB/BVOjWJjEJF2UNRkdOgzUSaqXQTutmU0BSFUkbqlESzky4k
+41pOZCREYlLtomQSUXZMJrq4jVISatKhEO3/8px5np55fq3vW+t933m/tb4p
+gVu9glQJIWX4o99kcBif33jk18eYRwRXGeQezGFHupZO5ZFM4dFDUTBr/9qe
+7XCX89CJ0XBZ/+tUDtxMLmsdnswj+hP0fTRg0tt3Wx1mGflMapuC65lvVgmM
+eITXYK1RB0vU9ryVG2J8/sJrt2Bid+npPFhqXa5dDbtEXziUPQn3eZ0MldPx
+ilg3JjyYlRzXC7Nb79wSTUR8KWGbx2M9XqPLN2PYY3DfG3u6flbO9HoDHlHG
+vneMglk1ESHpcIo6K/8iLGbcfrAJ5nlcNXhB87GqN1kDu0Tk5oxC/i7Sumkb
+YenaI3t/hzlTj25IhvOmbfP8A9bvi95xnc5vU6YSAisGn5t+peOjd02IgPOq
+GkR2iCem0vv8FphVNSvsACysnr3ZFzazPLi0Cb6fVFvOgfnLnZ4aID+FMSdL
+Cy4rNNX0gDdVcE7IafytbtFRsMf4kNrDsLTwU2wSvb52b54bLPumEyiEpbmS
+nwQebE9LD4B5C5wqS1Av6Y7dqeawS1++Ygss9H7MaKHxLH1kb07H99zt3AZ3
++Q0kfGRh3su1WgO0Xgf/fF3OonV64LaF5us/PO04nLd2J+epPuLU/pK6C5ZG
+VnZbwz67bC9FwMrpD++e1EMcn4rio+CUmvZ5ajDHPdV/L50/ISwyagLyLuGN
+OAMTiZz7eTziEXRm1MBiq5LLyTCD0SLvp+sF8pSWsMhyos50xCta/2GBchyu
+N2/bthpmLfHLroVZwUODB+h4QRapgPN+eJXepJ4aYFQDS3JIdyc8mGJyrAMW
+xToZ/urX8GhNPcwvPvx8sSHtZzHHcSXMd+G+NIElmXXh2XR9edPgb/R50Pps
+1w0rIkydRtN+OndruRXyERoIDD9ifoG3z4JomKN6NUIKNyt//iyAWYYGT1Jo
+PLu/mzbC0uM5Xi4w8+1j9U7YrDZsgwpclmX7SgEPhjrJ/kL+/OAWjWpYzEtN
+DoXvb/n2Yz8sUR2ROBUWpshCbWg9H8ldbuK59FgTyXpK4z82d5wjLExw/+YH
+KyN9+hV4LqXXWu80IH9icS/+KGzmsFTLBhbn+nICYd69FW2ndTF+ctt6N7hs
+Z0S+Ksy8XDnsTp/rYknjZh3MU7XsTjjM15NntI7F/31fW56DmzX6y31hMurZ
++d7J9HeMWfOeibg+eGS7Ip7BTN2yw7DsptvjAlgwVnOkFxzT52WvRfupLn3r
+DLjrU73CFjbbt7d1EqxUhMnDaT16jXWmwSLu6xWZdHzjgSoH2KxN+qEMFiw7
+fyQS5miPOvCQ9q9zy+oimNhfudQES47323+H71t0u8tpv2nWjHRGvJkOD02r
+aD+GPLM/BIsCZyTQ/hT81ye9EY5xa3Kn/SyII+1ayL+ZH6dH49M/5393Dszs
+u1bzne6LWz13O8Ks5mee4TBvcJ2zHa3XLttVLaiHLK0j1AT2eBlbak/r9S56
+bQ+tX8/zYAn2SY5+0o3TMN/beboZtey70wJYFp1gexX75CbTWU1SxC91NLFb
+Ameaj/73fJqfs+rjITzn4uWJYocxuJ5xY2ctzOYHnNTShl1WHSqk+0ay2piG
+UbA0YXIJLDT5/CRbC/EUful8TPcRXavQ+JGoUyk3ioH5lRrmm+I0cd0RA44X
+LAkYrZvNwPdbRkE+3cfvzxzq1sD6f1sdH4N4yfj0qxthZckQJwb2aK/cPQEW
+aPrnvIL5f5oEDagjruDhj1zkL8pfxGBgnFkQl3YEZltXyB3ofDaP9j6BhS9n
+sXPp/dEZxSr0HOo438DC+tIZJwbG0X5X3pkoYdD+HL+KnkuytWEHnRGvKNjZ
+sJvO59br+VyT9k9nSz6sZJbkrkd+ihLvoBUwMYkNkcPKsUXSTsQns9M6PZXW
+4zBjIJjGP7v3tissOPX5fQvyVTT1WTnAYvG6KY6weOL6KC1YufBK1BXUT6bS
+4X6Gznel5sUkmLm08d2/YP6ZDqMj2Gd5mtnFNohHMPtBogEsqshd7Ib4hXGr
+Lxdhn2XfOK1tjXwVF/Lsg2DJN5H2GNSLdI18yaau3bGmSQ1xVbNf6tFz7LOs
+6OQI3Pex3G8i7OHg179ZFfO2GZjOh0l2QJarCuo1ruBpKCxy9PZwJJjf72R7
+MT3nLvg+qvvJJUpPpXw0jW9AVTPgB5eIFmoI6LlAgg+JVg5xieyegrTS8Rfc
++ZLvXEICfI/a0X4LMjEOh4Wzpi/Oof0VFlW/H5ZY2cd9gcnZDA7B/WzNxEXW
+tH5+4X6VsEecnW8w7Z91PRUlWI/30fpsLB2vK+LIEY+we7teJMxvu95HEC+/
+cMknT9p/Bt6qx2FpQ9r1cbBwTvuoyciPZ8edV0n7ffL+9+kwy8Xd3xNmPfmc
+9goWOM2e9xjxs0tO8Rmoj9JMJ8MRlqoaF46AFRef/JSgHsyMnV31uJ5td8yV
+1lP56sGNIBX6fBVsSdan70ldv/+N9YlBluVPnGuypNvFarAk/EfnHpiYV4Sb
+0/ibe6yMYLElz14D+QqLrzXU031/zMyq4q+od76rfybd1+NEmk4DqHcWWbKb
+nhMrePtk/8N47bbSeHq9Y7NqyCcuYWZXJ2bBCnU9oamSSwQt1isewTztyVWc
+D/h9LKIv6mE94ZS21mtdqG+wka4AlopDTZo7uIT1V6u/HOa9+hJT3o779UKe
+L0Q+QlO9puA23G+ck3EWlialvmt9DUcFXVSj/fNt5bA2xkWnpu3wpf02//T2
+PpitcpWcouPxc4Wb3sBnWIwH1PXsbd6dmD94sY+COsNxZhriUR7pVbTCQvf/
+fOrqxvj9Mw30PYrozF1j+xHjOovO7qL9+G7fHwG96C/79TpmdPx6/uGjyFeS
+Wz6ygsaXYHWR08clYj/9xEUw339P/gGY9WiidyHN726pegpM1NN6DWn9w2YG
+smBmuv7cJFrffZwBb8zHz4nV7ce5SL42b3DtwfgPb7/N9D3kjaX1nPdwKSOo
+B+ei1PeEQcxbzP+hsTWJvnesbl7GQf2YOfrx86ijXYosXiD//duHh3+dm2Mv
+RsqRn0Vt4xvqr/EWNtWI/2b+7A7d/79ni28SJX3v1uX9A3iCJcM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.4677856382145418, 5.536752147784559}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VO37B/CxJEmMQtYaPUKKhihLMpWQEGVvMSqVqJSILEnWkpB2RfaE
+hkramFRSlmhV4REqa1GeGlr8Ptf35x+vt/s+931dn3PmzDnUNu1e4y3MYDDW
+CjEY9Pv/f5gchmAcPywOQ2X2iE0K3MFr6VVU4zBE9+85qC3DYYir7v2kCfMH
+pvTUwA4NmuNasJ/PiiteUzmM4IygRhXYNkpe+AfsXxcQLQIvfvxs58FpGDe5
+2t2G9XNkr/aNkmXOmhXDXGMF1U2yHAbPr849AJZd4r3/Blyh2u6rD9vOznP5
+BvMPru5/O5PDSHeRlFOQw/5vJ7itgrnx+jKaZKkrvMoZqPfK18ss8sFNe41h
+xvFu3Ykwb7y1hq+K3//trWnDetwhExt32O/zcpsCeChZ640YzF86qOxLXhW2
+rl6Fw4hsu/hdG84ULLl5BXZIEr4ygPqH2pPzc+H6ihyxG7BDh1vlLbgjdFVk
+PMx0Ut72CS6oOS3rC/sbVwu0sP68fA15Lsx7mfQiHLZYM1d8B8z53ZXQAe+L
+0Ig6ArOtZky1Rf0jXqOq1bT++pXjt+Ei9xl7mKiHZWpQqYn+50k4yeyDmxiG
+LxNhJ/W4nD7YIeqtykc4bZf1L3/0zxX6LCSPPLv7cg1E5DmMlt6Frbrwb6mX
+vemwIGh9kSksWnfH03g61jf5GE8u8DG/+wJW0NBTovlnDNoXb1PgMNzYdhen
+wQ+nr/b7CkdW+NfT+VERLnfarojjf28+G0TnZ9SsqBHmVgzbCcFMWbWxmUro
+39CeG0H9TAwv84AjZTQ7vqH/3223rSLI5/PMtsAsuRr2UZjVbCzZgjzTbjZ0
+RcGMrU8frIV7dOsebYP9Y+cfblVGXtMSpM1oXOvI6yCYtdnjshiNh8pFa8DW
+M5THa1FPsusVry9Ux38+jfFUb/A7gyaYs2LVsA2cGfXfxXp4fd0xTVmy4i+5
+LqprseuHHvTLbc7rk8F6HaV6Uxqo/7db17nAFuF1/Q/IBl7XiuDuAY/+Z+Ss
+ufuYqLe7emniNziT4RUfBts6qTvMw/rMCe/D+lXo86V/PQwe2ihZ6Yr+ox0/
+Leyk/LJqX9+BDeK+bqe8eFo3i6civ8Vj6eKdSnQ93q10hSucD2kEYt+mVa/t
+4uD4b1WO0li3qVM95SKczpV8StdxZr1z03l4yzTtGyuwbpM1I5jOR3xYinML
+fU62qrGsYNbd5+ae+M2T8ov5ib9XKKxPfA1H1lUEpsI5cgEipjivHa17eMqw
+ZJD/0iMwI8zz7mnso9KS11z9v/Gr1yfDjLGHS7rpOpgZIh1O5yPw1/SvcObN
+xdxhyje2qI/Gm66wFHfBiVcH2bU03/6SnQA5OAxnGqbT+N6dIWkwYx/36xby
+lCE7S9jiVPsLDdi/tzKeCTsJl+Z+Qr3JE6tfjiB3weCdJZdh/vldN7/D6c5n
+3AOov7s9RyQx32DpuvUrqe9XdjFmtH6IrOZ82L/nVf1heLuZXo8mja/tPf0e
+rt1SLDCE2UbVrhzUG52Te98D5k673V8Ed4TvKzpFNhd+r4x+ed8kZ/TCnHaz
+1Dg4593jcAfK565VVh8sLuxm9RTm+Xj9Maf7R/uxE3PwOYvco8Q+DHP7a47T
+fZL/eNcJHrzFR+E9H2YUfw58BAfH/pkqjfsuM++rMR9mfo95ug52uCeyPROW
+35+XmwNzpf+7tpWug6K6gM9wx57xEVl4l8Nh61mzsN5uKZkS1JOqppGyFuZY
+KbUawroqSRoHaPyZ5CAP/eUEy3ichCPbp+1Qh0ss2X9y4MzD+Y0nkY+268XN
+l2FmX1OxBLymNtUzG3YY3R4Qj/wLlOOM0mB/eRlNWVjcpzE9HOa1py0ow33n
+79L8JC86vkfPcCvMy75gt4zWbx1p0ocLy0zNqF4Hsf9OKcK/WRpPRcjT7w0p
+wa1Vz+170R9ncr7KQrhSSXL0Jczb4LnQBy755FtaCyf3zbcthTt//DuhBo5k
+/hMpQZ/zJXMVGmn+jiML/OG/hZopHyi/+HGTNviMndtZBvV/9KSCLfqTOjPz
+jTbVW1tkfBP+rVKy15Py2skzVEQ+Fb3hMy/A7Ce/JHbCm9SGtDupfw9j1xJ4
+IHf78Xn/YDyXH/8WfjfInHwAbrpUIzYAC/+71LgWZnSft++GCyKCimXVsd9w
+iWg1XPTutNQGOFL1hCAG/ha9Sy8D5p9tV9aHx+Kk9d7CQ0WWfk8U6fOqFz1p
+Nn1/DTWvhmuUQ6Tmw/7l+74/QX9hPWPzVsKM3HAhM1jdfMs9V7L5urAS5DVk
+FDZzHdxRJvPjH1h7UT/bCWaPZb/IwvdKolbIcgtaP9edyYYVqthSOjCv5MqE
+JnwvBS2VPseEky1Wm8TCW7KV5g6jvkzrGBNn+h7/9q9GM/Xz3S90CcyZEzJa
+RuMa6TbL4KefV46dUaf7wo2nnvCs7FzHGDj5+uw/abDKqbiOEJofm9LSDkfs
+3Dk3mPLaM9HXGPUcCFq28hAdr+stlgm3Bii/OQnzusUCp6AfwQK74Rtwk5qf
+QRgc9WGu/geYMd382ie4NvBQuTzq57eIJFshnyO7EzSdYW5T8auzcHCj0NNz
+lNeUPQvewvqSBSkfqd9iDx1h5N39ydJogQY9ZyQunwr3RDu6HoKTbbZIicNR
+af1RDTCre6V9F44vfKXjLaeJ3LMjvuTAZRUBLS6wQ+/9MXu45WjC+HGYO8Mq
+vhv1KV0o9Kgie/5Npev9Zcmmli6Y6X2zqRP9Jh9N+/Ab9l+gEOYML3abwZXQ
+ghn3FB8jryHx5ipJmL9JwcQMvruZ1ysKDy1/ZnIPzxn7/EqNR3A8h+coYQs7
+yfnuboV5K92GBvHc4vLZ+xztHzlQviEP1oruEc6k/UKzHu2n5yBrS2Ykzd+p
+GrUZljRq1tkEsyzvP/SBtRMyrlpTfzLJaQmw7UTXCkPa79CnFj7M6lFXm0t5
+nJ+2RxL7f7Ic2qKtSd8nia7b4Y3zS48b0Px3es+ewRY5+fo2cLJV7hnqp3HN
+zw2+MIO5UacIlp8+lHEaZje0/pFDHi9LJ0s0Uj0rLXmBcFLHdtMp6L9jVvb6
+GnjIzN5/LdzUofpQhJ6TMsROXYTZas2R2pT30UWbBsjWk+cZwfPUr/iZzMF+
+EW4hc+n8iPjaxMJM61krROHM8rGCBpgrMD/1gM7H54jtUtqof8PWVF+43r3w
+miXMVhj1Hke9oszNsoHw0Hx71mFY9sXC6DPk8z9ifqHfwuqP+3nkLqn3O+GL
+45Ef78IOqSP5/yK/kdstFpU0bvD7gAvcp2Z45AbMMPt4+Q2e41u+n1TOgVm1
+dXLbYRO9b/yjcKT24pHJcE3inORdNF/neQa9F8hmJbyyp3r/C957Dm50+Tqq
+S+OGI4XxsEFC/jYZmGfRujEFTv2Hs1uAfjObC0OuwfxloTqfKI/3nbUDcLlj
+QkAr5eFeJ2uC/d5xT5aRIw/mWZyGX15L6P9MXtGYOA7r//Mg+y/cEXc1Zyf6
+KUvW/5eF/ZJdLIRb4R1luiyqjy/tr7ACeVgeF/jFUB7LDp7MhhnD1z0ewU0n
+JmfQe4d9lqeq5Fysp3ZJXBf5iptOSHeFm+7fi1oDiwk843PhzHMK/A3wgdcN
+wd/n0ucn6bg93d+OhoqYz0MewUd71eFqo9S3MeS8LUMf6D0n1vDDI5gXfKwr
+Du5T1rH7AzPTVoopwSaluqXaOvS8+uVAOuq3lumWsYMZSc6ysvQeFSH4upls
+c2xmLPoXVi612w0zK7W0BMjPPq65hNyx4Pmt3fAMs8apW8kibWrf8J530TOp
+dy3ctPzUgmi4/KepiCk89Oy7jDb8SettqCrMOjdJuFGaw4jdFZlN9bFqN0Yd
+gK+vXNfdRnYv618Hy3P35fPhjtO6envhnIenjAvILwa+3YaZQb6lp2DGetd6
+Bay/V0Hw5hic6fS0ehu8RDdO9jit92aFXg3MefB+/XmY3SW/ZD7qj7DepH2N
+7Dh2+gLM2Niy7zXsMGG0lK7H9f35ZaKol7vso9A+OLpluH0x5Zd+a0kzfOCR
+aEw42UQ5fQbyWyZb1fQQ9md5MdzgAnX1bKYu6myr0j8Av15kVrgRZm9KGY+C
+O+cbhxbBDmyW4x5YMJBT/FOXns/aTVfAWUkJP8zmw9yDf+h6FB9csiycrP/n
+SzZsOf9Z3TWYqThnhwGc1NTF7oA5675m30A/66qK+Qw29S0Imwd7ZQzkTIY7
+ZKtsLiKPHcK+9Uw2fV8dPM+ED377E0GONPH4KoN8hY16l9J8frGTlaIUh7Fn
+UOi5EJzp9qOWMwXPG15VC/uoHg+dtGRJ1GcxsqGeLOYhIg3v2Lx6ZxF5ScNm
+/mS8bzVMakok31r/KA/m/yoZ3A13NOl03Ydv/5GUdiN33dGg4/+2RVhYwQwf
+wcMEWNa2zN58Pn2uzUa0sX952eCRpeQbZUZ9sGTy9S57cmXDg3uo91RbUM02
+mHv4euc59GNRUTWD9ue4u5qa0vVRqeh6B2bPmnsrC673y/AcofnpIlf+wmV/
+f7QqoV9urMRaG+QnsRovHNS/+ZPCQ3D+kT2vttC4c1jyJThXO6/rKOUl6taX
+D/Nyy2+VwbwV7MoT8F3BIvUWyvdJyGJv2KX8zvgYzPquWakKm83LWqGkh+vn
+w8EbVdhfV65guiHMzjmaag/fPF38xAbmW9caXUA/bp7WvR4wSzA5KgH9BsTX
+LfOGIz9m3PFDHvIPE7t8YG6ukdga5Je41E6RzD9u4muBvEV1G3Zt1qP/Rxzg
+2ktg/3herjvMcYxcEzKJw0hYNFZsS8cv3GXSIM5hnA4MP28Gd7y1tHCAJUPv
+ntXRo/tFQIIYfJJxr12V9h/M6ByeiPe/R1svSNP6s0eey2A81G+CQIT2b086
+thl29Y75/ouuz3AJuU643/OXr4D8IjcgFvs7mP+UoHwyM85NskZ9oxulOUK0
+XzD7iwrqj5MWmErRftLWnmOw5emNX1i0Pm+/ySv0azyaIWZM/VR7H8hCHoE5
+a3860/Gy7WWuyIu3Mep3EPWTMy+2H+7NXq5+ntablCblgnw/ZHPd79N8V9NF
+KXCJfszuHnLsZcZZuMc3kC2tj+PTnxb7whsXX/MxgBmrDr+ZBN+fNDbqArN8
+fngHYX3dMEFbIMx3qN1djnpahitMk8kzmxnNkvR+aeSXC3PqHjxtRD9tQveE
+b8CRWtYPbqF/t8eXmithbvfra+nIx+XL2oFqGo+25EchPy21kLz7tB7TqzcI
++c/hcJLvUH1OYimHxXC9Myf5l9LxL20nlE3A/Uiq0DgHzjzxcLoEfLe5XOQk
+WSLoUYoo8nxk/iuajtcN/W4Lnzc46UL1M65qLTeDI5OzrLZRvXuvj3vBD7eF
+fllH/dZralTAvFWltk40f7ZFnAnWlxcWMnGk+ZPbhDrhQufXHmtpfsT0F7mo
+r5gto0jHd7yfOBqK+md5bsjYTvX8dct2R3839zq+CaXxdvHiBeg/ibljRxqN
+R3YojsM/H79+RP1xTsxKLUVeP1oHWS9o/vD466XIMzrlb8xPqsemTLsA3lk9
+o011AfqYUpDfDjvbHBBYwNyg/qgPsFzq2Uu+cKZzy8Kr8ILqSfnJMIdrnmYN
+GxfX95bR8f2Gt3jYjzcm8GkmPxwdHEA9jaa/HfvJgn0+ovD/fgxQD/1/dCLn
+/wA7d3r3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.041811450678379, 3.90656724560653}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1g1UTOsaB/CNUPoaUqJi0ncqgyjVqZ2P1Ck1FZVEY276cKIOQ0mYiCQy
+NCeVQUI6R1cTlQoZTEqlGVTiRONUblEM5SvR/b/3zlqtWb/17P2+z//Z7+yV
+MTcuYONYiqKu4Y98U8pRfGbR1Ai+9rJoipVTc2Myk6b2cCwM18Ce1s0ndOHM
+rw0jLLj+5z/ySbDAd66+GszXrxr8B/cL1sTeq51LU4wWyywhXJbNjNsL5zMd
+VtvCOfOHCtxhZVO5Z+lM1MNvcLXI9Y0f9pnBSjNH2//Y0RTtf6zzmBHuE7v0
+NcFUUX7FZ0OaYud5P78N83NFRzhw/V/LTxMzdppLnhjQVNFFX9tGmNlftjgI
+jv/8l1IBx9/UMB6YQVP26wabfpL1FzqLRHCv41n32difEi09FQUPzctO84Rp
+U51rfnBss1PZFlhhl6m2Gi5+veDlcVJnXQ3cAbdYmi0pIfWnXT1iWNSdtlEK
+S6aKWinSj/rAQhnMrmy03gDnnJtp0gwzQ9NmNsFh3KfzJWQemT3/ckYeeoa+
+5kXSz93EhCJYOm0vtRsWrEv6oIF5LLuy6SfpT1yS18aFVQ2nHZsEsyQ7uy7A
+Q3Yra+4hHzuOIWuGc2TCMQkkb/g9/gs4cR9rugWseMhzkMHRyuiBNlvMp//S
+2fOwwv1lTDrMNzrzdC0s97sS4m5L8jttGEY/R77TbmNgwau1Y/fDQz4Jro02
+uJ+/9I9h5PnqIfuSD8sfBzVGwu3VssT9sEDo0/MQ86kcvm27DWbP84pYBDeN
+BnTEEXvLrxdORw7t9MJEWEJn95vCyTrndY+Q+zPmcSr0cf1PkU0RzNDdsjsc
+ts9YntIAK9NOpprArKCKUCVMVyZyVWCb0stP9EieB1NzxsKqLyeNOhGPeNsb
+wbHWDRqhMMv9Zqc/XFwVs/l3WPJjxbAIlqu7ftwDsxmy+m+w4dZPvXyYM/BM
+zEV/ERU/WDtg+pHH3kdwmd9Nr/VkPhP2VLgh36rmnpDFZL1JgYpCmOFzwVKV
+rFeZ3knOR6/svFETyd807OIJ619MMUsjeYwOxybCKqW7zjjDrI60CZmwhtqJ
+xf1zsD5d9PEgnOqT1X4Klmhu28eFKUoSsxJmf+vYaUyub5HdHQdTW86Mv4/9
+y6rn7L5jjedVc+dsICw4w2w9BMtT73U1o3+BwZ9H18JUQNyqX+Ch3PnPnWB2
+a5DeReSXHtvhZ0Hq3v4FGvAyI4sOJkwHtW5LmkZT/Z6ND8xhSeSC60N6yCO6
+XetA1ler/M6HWZP6PvjDipGMARPY8a3HyFaY86V2xitdPF+Wk0sOzHgtvF8N
+J1ozWmpIv5nXm0rh9jyr1i5yvfGf2bUwg/U5QgX5WHbqJkPwIfuPCiNYnvt+
+phPWP/JOMWoLM7Sl2lkwR+fcu/mkXt6c8Q02nMaKmkPq/rw9UehfFF4t0SPW
+f8trg+NlA1+GSB7rrPduyGuaYVZyn+Q//vHaaXJe4mPNj5L6ml8N3sCio9Vz
+fiXW7lnDxPykTxaoUDDLL++GC2woOuhXaoX912c8/p8fPn7NgRVHG/6YBYdp
+3aicDDNtN23pwXpi3sYL9y3Rj6vvfAEsrHFdvY84eKwmOe9htV7GK2BJdGVw
+AfotLr/wVg/Or4jh6sA5SZUagxbYr7+ZlYy8xUw39w5YXLDbrgvzCtv3Jf8x
+qU/se+ELW0bvOt0K8+8uPVg7FfPe6aHWTeoNvt0+cNgzofkIqb/6/qpPB++/
+JetuGWA/6s22kHzY5x3bgSZentm5FRbn7pVEwoI6w39z4a8Px/12BBZzig7E
+wWFxnwKvkDzS9bdPwolyed0DYg+N4HY49nBaRAe5v3i6ni32/9pz1KGbOKCk
+TkD6oze1dRJ/Ck/6AXd/EsQ3k/sTZjXGIk9E8eVnJWQeIS0L22FP74aMVFjZ
+kBG1GPOwP73h3EqYv2Bp5mF4aIBbp0H6cwopuA/n7zOwlCKvJIgq7IOTB3r8
+dpD8vMKnSlJfNV7TnMxHfLXlOZz6w82nzRzP82+Vy5fgnIovg+kwS3V5ewgc
+P3z89lI4vnOKwwf0E/32h+EE4u1j/ubBPgXqWk/M8HsTmL/oRZ4QE33tYpjS
+qDMIhKXdK1VOwPQhH2UV5tNxNtLuAMwctO40gaPtky2IJVVFy09Owe8hhdEr
+IG7IVpsBO3pptBTCcnm/b+lkPL9chkwKcw4OLtoAm/ZOD+6FGQF2xTawJcf0
+ghb6yz8p/EUXnspY0mgPc5hvJhnAnr7RXcGw3NPungvMXmdqvZ3kqVpYngCH
+XI02PwzTwtMf6uBU7s06IczYEJtsiX7sny7lZ5H1V7/PyILb60NDDpB5nbvx
+aCw5L9vqh2NgytO5gZyXfvWhSndyv/9zrRb4yKzug5qwRFhXaIX5KIad3jeT
+eTB9A36DbVTrRtNgsRbjoZC49dRcZzKPiy/HnYdNJw+7vTVF/zfTnEk9OT1z
++ilYsv6KeTTMOF5zaSVM1eT1zYJ5Oo+ujYfpDY/Ua7C/ZH/tnVoTnL9TFiEe
+sLRGqDwGswS9xbeQh6eM7dwIMy2jaqzg3mynXE9YWaAiE2AetHZKmiMcv8qR
+842B/i5abl5IrjfYrYiBFfH7Y1xhhTK8TK6N3+9+7rgAUv95y3dIC+/fiSXO
+W2D+7yfCVsBTZ4sKBTAtkQbKNfH+D15wuILUQ+eMzYJVq6uoF3C+0Yl1Ajhs
+oovRGJJ39pmE+7D9Ax6DCednW2SzsB5vu7OPA8nf27alDh5Rqzm/DOYH6e1P
+QT+9du8jPWBxUW+jFfrleckSnGHBosxzObCcTg0xgdkakdIJyKt0zJz3k8yn
+1Pj2Zjj5boOsifTnVLaDnI8Wm/A80j/ba22CFuZVVKSa4k0cv2mxK2zaKO4a
+nY3zt4sXGkislcQTw/l3qXpvct5bbulyYLFF6TNz2OdNUflkmL03c00P1o+Q
+uFvVG2M/0ZSkdJjpcln1IMzo3lytB1/gR2WuhKnyyOrj6D9nueMuJjH5MP7/
+//Eok/4vULcBlA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.592338820250189, 12.901430589874906}, \
+{1, -1}], LineBox[{{7.9999999999976925`, 9.5}, {14.99999999999251, 9.5}}], 
+        PolygonBox[{{12.1, 9.5}, {10.9, 9.1}, {10.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        LineBox[{{8., 9.499999999997693}, {8., 16.49999999999251}}], 
+        PolygonBox[{{8., 12.4}, {8.4, 13.6}, {7.6, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 13.6}, {14.6, 12.4}, {15.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 16.5}, {8.000000000002592, 16.5}}], 
+        PolygonBox[{{10.9, 16.5}, {12.1, 16.9}, {12.1, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{4., 8.5}], PointBox[{8., 9.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 16.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJxN1Xs8lPkeB/AnlEnK1KIhMqF1GYWjNkXmsYhdjuSyCbUT0iCZIpelNbax
+0UVYplmpIym32GFVhEztii2Fs9albOueXCKVS2k7n985/5x5vbzm9X79fs/v
++/1+5nke6/zD3Q/IURTViD/yTc19xEeD/t+3Nk0xnKbWhMPC2hdlmmtpiqdf
+caWfRVOtT8QlzvBcnuztPtgtyz0sA5ZYjaqPrKYpy/PcsxOw92OXlES49+a1
+dh8dmuI/+95wIzyScs6jE5Z0nFaeUqcpwbu99aZsrO93iGyCu0xGi6JhanNP
+1S3YMsTI9i7cut34yzqYut/grLSOpnIPfVPZCUdaM8Ru8Nxu358UcH7TFTdG
+BjyybmKTLewWcri2GW49VpubAscHUSs/wow9k+3dcPMm9dsGuuiX5RS4AfNM
+FQc/doCbfHfVJ8BVZUWt3vCU67B/M8zqiK7kwUyW9RIV5OOmMvxsLxyz4vx9
+O5JXQLjuLpih+NL1IExPZN60gi1Ln89Hwcy4SI4OPHeic1wAL3h17vlA+j1X
+YOwJ117ydesi/c5MXGTDlHWMTQWZ73GjRifqJ9uZ7zsLC30Eu2LheAven6Gw
+5Y7R+0vhyuroxp0wJQotP435Nr28OrUNZrql9cjBgUuNBzbCvIIriRHIL2ZL
+TosJ7P30pFa/Gk25GDUJN8Nm0pntHnByqtjjC3iqZszvoSp+NwtvCz45P1S1
+yBUWVkuy0+HeB+q9vZ/QlDRNIPkVFhwIMEiC4/t1npC8KSPW+HY43ymtyhbz
+V8VaP1CGA10tvkiGDWM94qdX0ZQyL/1IG8zeP/77S3jc9+6Cph7uixfxNRT2
+V56cKPeHBVVHbT+FGYuo0Gswv0jpuh9saX/OeBD2NtDLyoXddDlmmvrYbzOh
+/JLUW2+l5Ai3MjTv0eg/074qPximDEY3ZMIKAxzPRDjtm733BmDBOlHPWZjV
+VsLiIA+pQkzEOZgXZrI2CO4xCrjzPSxM7t+eDh96UfYwkniTYlIRLFRXZvjC
+fGutu9fhTL0xUyu464yX+EeyXnt/+2pY8ijybDg53+mt1yv0L5lOYZnCaUot
+0ofwnDs/tZvkf1lRVAhbRv+tdQS2fr1uPAV2qljz8xzm8xQNdhyBzSaS+iNI
+XmbFk/thw6i0mmHkKfzcO9UXlk5eu+IFey8UFH0Np6lFGDasxP1Xt/PRYbi3
+JahtKyzkCVTJ+Ywi0atbTDx3HQmGZbBsn02cHTxnWmv/J8z09pbWq2C+P+Rt
+1Eh+RwVndODIrnupnrCMaR9dvIKmrkfGBf1I1vMmr/rDOauca/tI/n35CU4w
+P70sgLMe6/KpP/rAzXXlupGw0GZHQxYsOlTQVA33futh/hZmu39n/w5uPeCV
+fRT1lM+PVlt8ivnDYh3k0V+79tbMQJgWLXh4wjkLYvFpeM6kTa4QNvsrZ6QA
+Zu3ZeXcedmt4tbYaZr68uMoB83f5pHPr4bSOuJokmBeVevc2LJgPmbgF29t6
+Jl+H2a9FYV0wHS5+kgULG8JuDMK5f7l4xcCSatXlT+FMJ+5TL1J/2fac27BI
+0pRoRurXrIk4AedriOOUYOpqRcpnsBtlJTeM+ZKjJm/8gf4GlY9zG2DWh2lJ
+AMxot91STOZfnsBoxPyBrz5UiOFc9fqfKpCPp1aM6RmyrldzI2M57oPg7Een
+Yaqc1hEoY3/P+A6yX3qmdZnnMtxXmqbDJWS/1klvRyWa0h/2EzWT32N1oYP7
+Uly3yPrULCzTC9aNZ2DOzIAZDsnnq91yDxWRw4WEg3wy/9VdCXawVtBB4xKS
+/2z6qZElNGWyM9p5GpZW57vWLCHvpfhiKwP0+yxRj1hZLoiZBMse0llDcE9U
+n0MzWc/WPf4ZznP7dMZIxRD1rk5zCuF4kzuNzrBws3K+Bfq57uwXIiQ+XNnb
+Ck9xAstKYLPLkwbR6L8yXD6tGWb6pAZoYz7Vfb7H+sl5xkPHb8OU7PKmCZhS
+OX7HAXmwzj9QI2bPKundgpvbilrIfjdrvXJF5Ce1Lxa2kHUjfp05THMCr1TC
+Uu1964n1Y09+/IHUXyaJlYeTpT+fDyf9iVPVC3HeoN1M5hfEd/Q5bJidLDPT
+J9cnnr9+GP1IJjZfWgTzXD0sJehfMFP9egB50Lz+wTzMl/Y6T+0RLDz3u7wY
+eeTMjubdgVtdV3XGIr835vmD1SS/9kLr3YtxTm23rJ5cf9DRc4sCef79y1uJ
+izi6evKoH6pYPw5T3doWenJ4T4v0Ez9B/altpg7cRfj/cKp7nT3Jr7hy7jiF
+60WpQcdJ/51OGr995FKtBxNq62CZUNV94m8uZfaPh07yRqifExxxCKaf+793
+htliixs7YEu51flZsDDoaGkMzPcaZzwj61K1iPdwu0f7gq4x+n5/cvBXnK/Q
+33vMH5bGnVEMRH1lw5V52bBsMqP7HRzoODD/Gywc6wm/hH7NSiZ2TsJTB6pa
+HDAPT6GvZykH/Yw/7XwOMwpiHDXg1iOpF+Mw/6ZvGYXaZH1vbuMczD8qOrka
+Fn4iHtiNvHjWy54owr3X/lWeAac5mrwl55sF7w7MJ3ned/6uDWY31LWlwMm5
+P4WVETsk/GBL1t/0/TuZ+I2VWjPOZ6wyf07moUQ2aRzYW89wwIbM++vjNwHo
+T2A1PLaWzOOy5N43ZJ6FbR8U4NYo2aMozBuzmf/HNMlXdvdDPfLime0eeEHy
+ZB6eP77ApVwOzG4ZI24MLt36jkt56vjFzRJfmd+5eI5LsbwZwytIfe545PRb
+LsXYX2pjDtNDlj4r33CpqbiInr1wb7HV54JpLtWz5kbpD6T/Ik6/5isulbN8
+5HMyr1A3e1RjikvZKzv8qYp8ZEoJe4decqnexRKhH3GIbc8/4crlJxSvET8L
+TwqGa5cc2DoJUyNl/A2TXCrya4W+zSbkvZIwZYfzWHHqA9Ewmw7LN0M9+6E6
+j5/h3ItNx1zRz6Ca/qlhWCbWVTv7mkspTwaZMzfg+vf8wSfofzByw1emsCyv
+tHj9DJeSBO0R2MHUYTVX31n0pxTBd4Fple/PhCAPraUSyZfEv90ssZvnUsyB
+gSYbsv9trkY33FwZZWAM8x6Mz+ggz4WEUOsVZH9NZxITVi2xfDKOfig/49hr
+2G8ypLGsifTnqMHuw/kxXfTCZZj3YlfYL6j/pin3eTzcyxzr8kB/CslbPviQ
++dxD1+ag//jwGhcbkodCUnch5tUyyJAakuvZcYtTkM/C6+Hba8j5Kheassfh
+25evskh9zaQClRHkd7bfgU2u19q2MWuAS1lXJspbEM8oRVx6hjw2jrW7kf0i
+Sru+g0sdWizkxhIXVShmtGC9NNavhNgrXemvX3D/nNLuHyLWv3Ah5Aae1/R+
+MwOSjzR4gnOZi/e6XGAYMdWxf0c07sexx4E3/+v/+2yk/wOlpIPo
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.683481921675783, 10.839657665452343}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV2HkgVFscB/CbpYUwRCliJBGJkERxlZJ9QkLKFsmSiSRRzZPsvaYoKpWK
+yhbZipSJlK2MFkKhxWuTJllaed/z132fd879nd8yc+dKxSfU0U+IoijbKRRF
+rpwPk5OTh3RpiglQM2lqq9bmLZ6w1/WRh47iNM/z21baBOaU6Ms/EaOpxDf7
+GmXJfv0dpnHwFbGMjd06sNZh/RB4RoXchhSYNl0Q8q8YzdG+6DVuStzk2/of
+7L9ib934UsQzkS0IE6c5EzHu/JswU+PI1CU4v/Vd+zCHOHf+AzEJmqNXK3rc
+GaYm/eaJStKcl3MlMvTJ/c56AikpmqOpqxCkBGc3baySYtCcqRpPPsjCXG2R
+ljQGTXmkCHxmw143LzhKStOcHLd1BSpkXZU7ECVNU1FvU5nL4ZLix43tcPm2
+tHv2ZN3ZX0NGhqZcImssgmFWj6eFkQzNybzRo5cCswenHl+D9YH6BSJ5xLkS
+TbqwTvmT1fUk3u8qgTBcWux0rBNm5Ixb3UX8/vRtX96S+rZ1r/SFZet/5v1H
+6ln/kDmOfGue6yT2kvMC5NUPwcnDmc3NJP5EOjUF9dV1i68qIPVKzHASlaKp
+yO0MPdIvr889tCz6s1t3LNGa9Es10swY/Wufdue0OInf+av8H/S345uFZoM2
+8vhSe/A7+u9qd8g1CuaIWCadEqepYPmT/2jCVMLXg6FYX6a9aFHPErhk2XEO
+fCnufetRmCPo3dYEVzz4+c4C7tfN+LF+Js0Zf+ycJ0TWOabCI7DJjMypTVqw
+be9YowRNRXuEx50m3iYVWYN8C77e0I+AveR6efWoxySh6qIHzJ9zLH0n6rWf
+YDxxIPu9bzh+RT+i9640tSfr2nlLQtC/8H97elxgtt4Q9xXm63p1UiMAppTG
+U0wwr6m77q3mwPSSTUKH4fgr199kkXXm+/4SzCcrtzn/NsyzHaLrybqdKKOb
++Mi2g1Vw0KNO7igsWO9rlg53TRY8Ekd97Hf3gjfB5+9X5MyDS6aHKVCIF/hy
+3JoJ0yvCAzKRn3WfvbcCzNiTsEEV+X0MThEh9/NNZthfQX1HQns7hxCfuyBh
+hzrq83muOOMhybdqg4Eb+tFpes0+nTitNyJSkqa+35Tt2wwz/+twLkc/j0l9
+8ZkF96cNaM7FvC8fX/W6URP9Kr4SU4R5y22vu7of9hL2uLgXrh4b0NEiDl8Z
+Fwlf0s6f8mox/JQZW0I+H0UjJ0/A1C1PP2XE7zkTv9Iezja/eKgW3jf++5s0
+zKPe9ichn8Jfkv59GjjP8v21CHwf5TQNm2/C/dLlK1ahvpJ7nCdnyXqaimc9
+6hPS2pyfAtN5U2yt0R/3v4eG42FWg71QC+xoz2lIhbkto4/N0N8zB1XryP00
+pzr5Mpx04LpCKcybVtrxDV4xjyp+BDNHjzqoz6Kpe45XFAbJeeu2VZjPwvfB
+ta5PjOT/Z1yUhnlGeyLUYdaD5sQF2O9oHsE2I/Xyz7R8wvx46vFnWDB/5Tru
+WcTflOcr4QazB7YX4vtPKW2SttoMM2c5vXyAee4Y2bPOmvTjaFqKDWzcF35w
+GSxwNzrZinotG4R/zST3m6lPOqAfxi7vLV+R/K3b/G9iviF+c6Mvk355hER8
+Qj/NNunP9yb1fmaOr4FX2fkoysPZRY5TmjDfqPa75c3q2F8weiIW9rvKcImG
+mZML7MMxn2ea+glLYCokzC4LHjYObOxfhHhDInP+YH9hoMjeM3C2a1fRv4hP
+Xb1cuAVmHrzAs8P8DEXCdBfB1ONvUfLIP0nY3/W3GvL1lluQAUveTJroIR6s
+XT0f8/pm8DeiEc52ie/OgX3XL07gwYIJ9xF19O9Rsn1YPcx+uLgmG6474vij
+jdwfIvpyBuah3+uz8x3MXPGgYhvmYVxUd2uC7LcwOX0W9rLpSlck+b4J+3oH
++23tA2JN4P5lSm73sd5xLO+nK8zlFdy9Du99P3k4jNjEY+NBeFFS74sjxIct
+DiyH29ak/+CSfix73dqJeY6yeWtPkHgvEmt3wjtTt/2bCPN9c9IFmOftukTt
+cLL/rLxkGOrrGnCY3AizQsuWjGCe59fZBquR/D5XfIxBfw6ffuYzhPy5HRUC
+abjthoztddIfC8VqNuatWxzx2x/m7O78/QH9/8Zfe3oeTHuEWKbBVg6WSS0L
+sX+u83A4no96+bX2MTAv4cHTVLhz5utdOjC9WEPnFfb7xK1yeq+K/PkFNd6Y
+X1ZHsPYVmF/1eYcY+f374PwqhKxbMuwikW+elVKPGVziYFU/jPV6j19q82HO
+P2qbIlGvXgjbaCrMKGQtmIQP3bon9HsB5lB8dGEc+qPalfP5F8yICN5LYR6h
+sQ6dIthP/TyQuQvWOxBtMAdm2XXfaILvlz+S1CXxTgg3ScjS1O7FD9XsyHkn
+kodXyNKcxzF604Jh3sjG8PVwvvILrWTYa3HvMyM48ZiGXC6JN1D/SQqWGuQE
+VsO6u0YbHyG+K79UtpHED/YqiID/lqW6tJJ4Wr/axDFv/flrXzeQev3HLU7i
+8yem3PK2jKxHRRbNgZktu2VPwVy5LZN4XnMW5puVk3zoKvvVynDxTCrViPRT
+1FS3BP3z40q+JfVTs4JVN6J/3oEu7ApYV9z+ylSsjxjqrw8k/bolfP0a5v1y
+h3K1AkynFIRGYT75j+2sWlXweXe8qhoLu2iyow/C9Hrnljr450KhBgM4uzgn
+SBHxlg1GBH5jIr5O2aVQeKfeSb9KmGnAD+mEH+9wsD9CXBxs6oB8j58X3eDJ
+JPMbaiLvM2fP6IxYwDT/saUb6r1wbizQEM7Wj67owzxnuika65N17htFT/Rr
+fJ9xoDHMrwnqbkc/B4sUk63J+R4L+/TQ/6+ni2u9yXlGSoMH4JSsO68OwIK+
+NfeLMV8zu/0Hssj6vE2OD7D+abhk3m3Yi+1zj4f1zfE2yzph3uL4+AtwwNwX
+7kPkfKOULdvh6rOlgRNkv1Chpgzub+xOTBBFPzgxWwcLkV9LvIS5EMyurNy3
+EvmlXu/J/k7q9cywv4P68l3vL++CqQUaTqaoL9JuytwymHs5L7UO/XmeLfXl
+H5Lf3Ls96BeV9sO0Yz3Mjguq/Ix+7g2xDREm66nUhzOYL6vDxi1cGa5udfWG
+zU/7lnYqoV5F835zWD/Fpc0IZiinq5rC41NP156dj/r2s2Nd4Hd5egdE4X79
+EzLJ8PBsh9L9ijhP8Uh+B9wxtC92UgH9vTz1txHyGSwRcs+A6dL+ikI4xuZF
+gwXMXhrBW4J63Occ3zQDFvhfCy2DS1apJA3MQ72dgc3G6M+bSqrlBUxPPGur
+gbWrxSNfw3zH83f00d+vrc1f/sA8VrnTGfhZsFmZOjn/2AvpQVhStSVjKzn/
+T1iwmhyej7dZH0/DJXlLxtbC5UyH/E6YWhEUsx5mnQ9tlUY9nPZtctrwptld
+QWth3thfpZ+IN7eeOz0AFrz6tbQIviywvB1N1s/tGrGFYzO0fIlZd87NfIV8
+H+3Jat4Olxi3t/rAzhnMe4Ywf3Wt8DvUu2f71sXfcD6jzbvCHy60j/iVTvIP
+2fJMQJ7PxrcMFpL8TRf9SYD5IZrNF0m9UeY6y2DX+yPR0nD2kHeWAP038XW6
+HjkX606uIU3wXcb05V3yqEdh6OId+Ni1onkmcL94yI9HsFpqvN+lOTjfaeDd
+T9ir9sDLWXBJZmaGGZmXCqMtbTacZSqTBet8LnmjBlOcxTbiyNdY5s/7VvTJ
+q6/QIxF2ViuqSob5w2fuSqDetBW9i7xgRopBwkn4ctbRj7YwM/R4yVz062X3
+izwHuN/O0TMdTp5okPAn8Q5vU6dw3SH9+lkqmYtUgo0rrhLfAyZqcaVUFo5m
+4vpUwebHL1x1XzC9yf/fLXjwzGg2eZ/dTjXD0fvXxu2BdQeUk2/By2JuMPJg
+7m/lyRTYsOFeZzvcv33meTL/73vW3fsEs5Qkmz4jn615xqECcv8ehd5DsLy8
+o18/2c+8JTwdzrk5f1EV6YfK4cEk1FeacdxiP7l/6+Z08ry2bZu+cyHM7JH6
+dQL9Cb1ywqoK52TXqnepwfrBr0+akHo2sP2b0N+L1xo6ryNu9sNhmVhp0t+r
+VnNgQUDrZifYLvZNThTi6ioEHCXzGShz+tSNOIKc0TZL8nz0PKVOw2yW93AQ
+fHz2DZPruHJs/Dj5uCYbvz23GFduQFYbeb9vczRcXIm5My49UgqCP7QZfyXf
+c3YVVUc+n1u7hWUlYQHTxS0A58oWSQdW4XdAIKPEEMCBH9VuHYEZU6xfRyBP
+ltCFvwdhql229zv5Pv6Um32RvCdwc8K3o84NqjMmBuDsqD2FdfBA8u2Zqoiv
+25YQKIY+PZHKXO8BM9uqM8gcN/T4PD1N8mP8trKBFzhrXiXPGXb03S5zOOhz
+1F0J1MNk3/ioCLcf03Yzhlm/zD17Ef9LjY6eK1mP97RNgv+7lH6D/J3K/Rne
+ogI/738w2x32KlnVVoh8uZ86MlcSq9/6oAPXFO2OngJnH2sXvYF6bXgJc0rJ
++V2NWoawZbVppy3pz1CCbgP6VVdaaU1+J1m5C/b6kvfvhNaLp/Bew72QWyAH
+9yoUtwbjPZZjMO9UH+IaiKhQBvg7hcVc964etlC/zBwTQ75d6lL34QdH7O3v
+zIBjKzf0w4GtgpC06bg/42gUfu+pE6Kvy/+ZhufD8jq7HXDwk9eruFPRrwBD
+Viu8qGRaboMo8gvVnbUG+TJ9qfuLYL6K6/Z68vdCr01opQjW628mWaPe6Zsp
+9wgR8n4wEtcOL9U/P9MHZvbnujmiX0/GNo7tg+l/s5wewumFnafKyf3ybVZa
+6L98nEytBOKXjH7ujoLFdnkPRMNeFrzsYpgR+SRplORTo+DaDMd6nMtlI19W
+2NbfjbD/jybmW5I/I+xxATzT58KGtajP61PlFvI95u4NNU+EKff/vMlzKGY0
+cVc+zHZ9XUY+T0pWR1suw8z5fPGN8OM5Mvpssl/42tPnqCd4zcZjEjD/4MUB
+F/jup/zhaJxHZSdYdqMftOaLU3eQH1dv2js/+My8jroO1EeZmqybRD+5flWZ
+j4RxnukVpwLS/86KR3lCyPdqmuIuOHkg12HPFOz3jb9kDf+YWPHSkMJ5km+r
+yL+vaNxQmT/+14zqF4747gLTLy3aM3+bUayU5pPx5Hvc43zb76cZpbu8MrcN
+jjHc/2DXONa9jv9dinxGIj8q1I2aUYy8pWHZcHDytZjAETPKS79ZWBn1NO5y
+r9/13Yzi/L0lnwuXH+5Kax+GxRbVLkE/BnPsVh2Hs490DRfDe5LUmq7CzLsd
+bzXIc/OPiI047s/WTjc+AT/rCLW5DvPFilzewxonnwdycB7v3ZIjC/E74Rp3
+hxmKfJi+P7Qs4T+rLU76jyFfcZcPdrDz0+9JjsifMax7wQg2umZrqfwD9191
+OTgd5vcqxVXDrMaLQ7WIb2CluEoW9fO8yiJ94PuhbUHKcElN/KkR5Gs04p73
+BPs5OxsSo+HCjVSaBtxvsU7qL+qNYW2RZOI8gV6sJnlex7wM2FSD/NidWs+m
+wa7PavgiyJ+vJlSVhf4tSTjPE0H9PHWjMfL9oGRmhJ38ivMWBr2aQP+p0rHB
+tk9mFG3w9d5TYutz6n0DyLfmfns9ma/5fqfP/ehX1JQ/ZF4c/RmpK1+YUVRJ
+18A4+f7Pc4sJeIz9ts1DeL+jeNUsBYManCdctjaNnEf+0bL4DsUg/yFL/w/m
++JGP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.109669593634097, 3.3111655299750593}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000005002`, 17.000000000003638`}, {
+          6.500000000004093, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.013283961763, 16.423466606479796}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.540947421444628, 7.668074278969414}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwtlA1Qk3Ucx/9jMJ7xdihk0J0xYSF5pkD4kkD9B4o6phBQSxIdeCqWtIaK
+XiT9DaTi1qzbialBgI4DIZyhRfj2QHBDXhISktsGTba43YGSynkNUPr9vJ67
+53nuc9/v//f63LMkR522240QshFufDMBPiIpeX75UKbeM1BTCVw1ezHve2Dr
+UTHlUR/qKfbzpUxr7B+0A7Nd2vupvpSc/ufeJi4K2FuRpQK+rDj8yXJgamLG
+WGBOVilPAbatCZqzQzydMq9ejf7gi2y7DyWmJyertcBEL/3igjdlW94YzDEA
+V+m8lw55UXJe3CP/FePl5rkcYkpWzE5MmFA/v/SqnaNM0ByycADjW21jFk/K
+XqRzHYMYTxC0clhEmUqj2XgH842ER9k9KDGOPwjsA5ZcjzKLgPWLwqzt6Dc5
+/RTulO0zaA9fAVYlXklqFVLiCFjpeF6P+uN1SiFl60j/6pPAfGZQbTjo+cHR
+35Rg/tIIyTLQTbf7/A+h/2wqlw1sTv66dy/mS9ig6wKe8VlwMwvzLcruf9+d
+krD2OV6J+Y53+Qd6UCa8wRe9i/FP/P7MCfUFJq3XZKLfWrhgQERJ11l+eBfG
+F+2cavOkpOWue2s+zic+7i8jR8ntY3S0FM+rB+L0MC/ne8qhH7B/wy+TO2Ce
+wiWGmWvIhw50e3lT0nfjaeEIxmv08DkB8z/4eUUOiQbee7P8b+BbyroKKTCT
+X5d5wb5CSzt9NwOrlKuEs6C7irZ9ux+YGOtFLcBRB4b9dejP8GtIBL6W1lDW
+CCyJeJJbA/k1Ja+8bML4rbZqM9R32RzwwgjGO3c1cxr2WXzm04n76G/TOv6F
+/h6+FveOC/X5uYJH0H9MgUw2j+wMbJuAeY1WJ5mRedv4wSmY55Y/n5XMYvx7
+wXc8gZuNvZZHwPT0ptg3YV8RRyLrxpHF051n3Ciz1a0y30X/BtVkGPB8fHwR
+1sfveSlhVEBZwJj+0s/Y39HwxF4BJctWp5bXAtvKHq99AOwufZr0HXJ37JoE
+N9Czyru1eF7xOLIDuLJ+m/g4ziMxW/oR7P+3mvH2Y+hPL9m+FurTJQeVFqNe
+MNMRDP3kxj+8UIbnNRYFB99v+Tnr1lOYPyAtwwXsmtyfXo/1hiZLxmA+hVzt
+Th770W1NaYH9r0/ptFvQ/3aZPB/mm7V4RwjOgx98q8nTi7KQpi9fXfw6+KWh
+Bg3sY3lM9wxF/rAtugH0ZoX8yG5k0/C+S6BP/Wj57CtgW9UKbTHoMkfGdAOw
+KqJxYRjoevbTrR5g8kd6BX5vqR8U+TuBJU2dPWbu//9KDDC+OfofUZmlXA==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.931801948466052, 1.6274136392623755}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1wk8lNsbB/ApQqUaSxpbTZImhKSM5WoqIVFjSZIyZBm3zRqlxb3pUknK
+kizXZMlSoRKKNP43JclSaFxi1IgSzbU17f/fudfn4/P4et855zzPc94zM4t9
+Djr7TadQKAP4JfG/Hz3Wf3EFi1LFdB2wgEMqX1i267Mo7IjQviDY1fzjxmw4
+SHJvdhbsc+Oykw8sXhb1uhbudS0aWgjzhx/ZdMCHNhV2diK2joxf6EOMS7Bd
+EI8YNO6a/grx0T5hHQtRrmiovAVxdL5gfEoXrz80fLMC/lOz/l4ZLHx+sD0J
+HnrC/HkQFnx2qefCY2dkg9fA7H71301hjltP+AyYfptjNx2+3tGo1rsc8wUU
+H3+K/+fYhc+sg+3qczJS4NbJ1b+VwDSlHPk98K3oi65XYV5gpgYZN91YabiA
+XL8a0kOFxZO/2t6CW89nzJlEtLQtU3iIyImZRhUh2hz5Jb8bUdDV8oLMm6BY
+tPgTovuJ/7UMICoqLDuujHHK2nd+k8Amtmf/XAmnaRm3L0Bk/aMU6EDyT3Da
+sY78v069xweR8+3IojDEzpAXWqGIdqqdHiWIIpF+YRTJ//3xsRHEKVeTZcR0
+Z8NUI+TvX2JQFQQ3jGp3hsIlppNdO2FGnIPlHdizYEWEJVylVuo3RuoVyBhU
+JPN1qKovRx85XTvf92GdjI3TudtJ3y/ycvJgiuq9kihY8vV4rA/MKlh8Nxk2
+eSuzXR0WJ+jXX4FLpp5JtTGQ77TK+By4dXEL7xQsKfGwuwTXcL9utoA5Ujo3
+ouHU1B20iWUsipGb44AXHGd1SXITFicvjlkDP08ZKj4E2/U3hMvAzUtlCzbA
+acHew21Yv3DzzHlqcMMcT+sMuHGqJPeLDotSaCWZ9IVl1mfWDMBpsX3BK8n+
+Gm6z7obFs97KS8F/tMRW/w3H+U2+7UYdErZzzN7Awki1jvtw8tfaw+MwqyZt
+SzHc49A/OBPz8YIe7cqBlbeuKtWGCz87plwl/bi8pnkdTLfYMKsSHvvFTM8L
+dp9h7/ICtrorU3wE5rA747/A61feXneR5OPr4aOH9WjL8hTyYDlDaY1/1/9U
+GFYCJ45FleWQfpkxlcpIPXRHukRw8Y3vowVkvvDoFQzUZ/qGnQdTYL6Wq8mv
+pJ9pR/wj4ehj/8QUwrQFHCUnWNBp2iOElR28F9FhRl+1iQLOgXY2+9JbUo/7
+Rd2m8NSdHGE+zJ3p/LsL3PtD6poXTDO6vnkPHCkY6p1P7k9a3+EPa1u/PN24
+FPPR9C12w603DZ+cgLnS71Xs4dHjzuWmMLt39WE9eNYbKdsJbewvn5+9UrB9
+zYhDJVy4XV6rA+uTmaW09Xc4yL7Lj+yvmLKJk24wrzl62l5Y3nj2XyawEf9c
+gAlcdkrlqCbs7nlLngIvjMm6RYWZkYFbWlEvN/rT73Ngu/exHgVwYWJxvDKZ
+7+g9WixsHZlqsARmtAlUguHk7pNeTFjsJoj0J/ttuGi7M7n+Q3okgPRHZUDz
+IBxp8jkvnJxz2Qsy48l4FVku58l+S7tTXghzX240KoeVu7Lc6+BEzYYfr+ED
+F3ZntsOc4rUaaljvxODMJiHJ58HYefL8SVqfHRWR6/+ULroMJzpfzuglbmvx
+74HVqk0jm2H6kZHRhajfH00Hmm6T+WvcNpH6N8h11iYQa69gpMEJUZv6vUg+
+q00ONcJ5TbJ6DFjY57ZvHL5uXjU6tAT9uTUjT8EAfYl90JQL80ZLl2rDdM3g
+HA9Y3FgXogvb2TcemgfTz/HPkOsxguN+D7VQb97WYUU484nh6SjYaO/Cs1MY
+3+DsjYE1MHfbeEsrbBKh4yJZjP0/Yh6dC6c+p+2tgykny8qCYLH2s4gkmNf2
+qsQc1jgmFXAQpkmz35H9kjBvF38bbDQR0dmMejiPi7JtYIaNWXcWbMQQl68j
+468yNA6F3aw4G8l1dvjVdjZcXqOz2oVclzf3Z8LF8dUKAbCd/8ASPThHmro4
+GmammL/893xc7xuaCUdmsZrJfqO223y6CwdVOAo2k/Nstzihk9z/5bvtAdjn
+3UIdMbG58Zd0WGR7/rE08o972OzdSsaXrLmpSOoh5F+SRz76mfv9aTAtN/+A
+I3ked9g/UIYj19qeToR/sFMnZOCqLLnQF7DMAUHBKMZ3n7PhrhKpN3PZ4FNY
+OC9Reivc8Heafjapz9fPRifh5I9uOwJhyWFV3xLSr4a463okHzcLegtcNRlc
+MUjH/RkNLiJYfqW9XTZxtZPvCKxSF+7tCieeaTR5D3NThWozYd7pCp1u+FtA
+rtaJRai/p5lKHRyva5A9vhDrUTdxyiLzXXkZEgpT/Z+eDobLVw18nAYLovof
+roVrbmi0XdFEfXhmG2fBNEGS5jbYyEsjjOSb5lCnpAmztQ80ZMFDNlc1vmhg
+v6Sb3dgLh4WlPB6G7VrKuWthued1zWKYY/iXtDrcM9dfW5aM9/qtGfnc477l
+m6w+XPX9yC4x+pFJvablCdt9G3H5AOu31hUlwWVpZ2InYFZk/6lmWKJjIJLD
+6xPvWh6Tw/rZuTQBA6Z4WHr9AhdSm3eQ85K1qt4wELYLbRr7A7Ze682Ogxnd
+Bc11cPmtnPxLMOWM+Nk05OsgsqpMhrma9ExrUj/llCfHYM6ua49j4aaPaR+d
+SP2WsLobYN8lAcoKMD9HN2KGIeoTRv9WjfXRa7sDLWCjL9MsXWHuxMVHXFhU
+N1u3B/UYurXu81nYPbP3oRss3v93Zy78Ibgx+bE61if0KSqFy2iOscZwdLqD
+KTFvQ9SjDDXMM/i4PgfOC/l0ThYWTErmk/FqqCY/D6tiPm39XYFwpnb91BQN
+7wPyHsy1MENwRPQbLOd9NGMuzFzUX6AJG4153e8i+4+eFNK0AOOdeEjJhdvT
+k2+eh8v4Fd37YBY//UcAzNq9pNaM7O9v3arbyP0pRZLZcNDn/A/EnAs38wZI
+v2/8mcyFGfvuJzTAnh8sIs6Q1z9sX1IBC5mFnlUwP7/Rp5Scf1Y/E0dhdtNk
+Wzk5P4fOzFqO9fHZ9YcfwfJZh5L2wENFgaI3cIy//eRlsv7jKVrymJ8fvF+7
+geRnsrTjF9KvttHA97Awc5NFBFy2fOD0dzg6Ote6AqZ2CEQ/YDo95aoEjlve
+d/EDGe/yyDjpn8h7S0Q9zON/vnMMllO3cjgNs1I/naqGaRLPfCYZz29g6Tjc
+lPr9XTvWL1nYuVnBCO83fZdsOHCYXjdNG54wdk19pYL+2M51XwnnnYjbyIap
+d3p4TOKt7gY187FPDR0bzGAqfyBoKcycXfPaBP6mW2qXqIz6vpHboAtzEp8L
+KXCarVWEGkxX/8qIUkKecp3rZWBfjYrr0+G45uIVrwxJXV8cSFdEHqFLqUVk
+/yhvabSG3VcpxoXA0pypHVKwkenOmZZw5JqBwU4F8j0iVlYOLjd083sA82K4
+PQLyfNRuGK6GmYOtpWVwnkzNX40wherkfYGcN9/PRb2DW1NehR0l+2lB2ldl
+jG/nx5AKhVtX3C7cBHOfOpaEw2IDcdxJeGiLfUYMbLm3cF8tub/laFC2Aflc
+UKU6Ra5vst5RDyur6UboID/ex6S5k6TfXicrN8OSn9oifdIPY8VoH5hiXtv1
+KzwUeXE2F06M7S29Die+a7HxgOlxkz8+wtHTVd+aKpHzUpOhivrxPfJDKDDz
+0vkM0p8gR9+t5Yrk/cNg9TbST/60O66KpM9PRvbDwjub8t8gX5bW+re/wa5X
+9nXugY3M4oMS4arKL6kCKtZbUqFyGT76rPLaRji66np2Brke4ey0ex55DmMU
+0mCea/8547nIP8zqZgLpb/jWEOqc/743RsNy5A951v8BbdEu9Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.235352284295374, 12.365864399803508}, \
+{-1, 0}], LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 10.4}, {6.9, 11.6}, {6.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.355394937518537, 13.000446064907765}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 7.5}, {13.49999999999251, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.1}, {9.4, 7.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.5548}, {0, 1}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 11.6}, {13.9, 10.4}, {13.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.5}], PointBox[{16.5, 3.5}], 
+         PointBox[{6.5, 14.5}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJxN1Xs8lPkeB/AnlEnK1KIhMqF1GYWjNkXmsYhdjuSyCbUT0iCZIpelNbax
+0UVYplmpIym32GFVhEztii2Fs9albOueXCKVS2k7n985/5x5vbzm9X79fs/v
++/1+5nke6/zD3Q/IURTViD/yTc19xEeD/t+3Nk0xnKbWhMPC2hdlmmtpiqdf
+caWfRVOtT8QlzvBcnuztPtgtyz0sA5ZYjaqPrKYpy/PcsxOw92OXlES49+a1
+dh8dmuI/+95wIzyScs6jE5Z0nFaeUqcpwbu99aZsrO93iGyCu0xGi6JhanNP
+1S3YMsTI9i7cut34yzqYut/grLSOpnIPfVPZCUdaM8Ru8Nxu358UcH7TFTdG
+BjyybmKTLewWcri2GW49VpubAscHUSs/wow9k+3dcPMm9dsGuuiX5RS4AfNM
+FQc/doCbfHfVJ8BVZUWt3vCU67B/M8zqiK7kwUyW9RIV5OOmMvxsLxyz4vx9
+O5JXQLjuLpih+NL1IExPZN60gi1Ln89Hwcy4SI4OPHeic1wAL3h17vlA+j1X
+YOwJ117ydesi/c5MXGTDlHWMTQWZ73GjRifqJ9uZ7zsLC30Eu2LheAven6Gw
+5Y7R+0vhyuroxp0wJQotP435Nr28OrUNZrql9cjBgUuNBzbCvIIriRHIL2ZL
+TosJ7P30pFa/Gk25GDUJN8Nm0pntHnByqtjjC3iqZszvoSp+NwtvCz45P1S1
+yBUWVkuy0+HeB+q9vZ/QlDRNIPkVFhwIMEiC4/t1npC8KSPW+HY43ymtyhbz
+V8VaP1CGA10tvkiGDWM94qdX0ZQyL/1IG8zeP/77S3jc9+6Cph7uixfxNRT2
+V56cKPeHBVVHbT+FGYuo0Gswv0jpuh9saX/OeBD2NtDLyoXddDlmmvrYbzOh
+/JLUW2+l5Ai3MjTv0eg/074qPximDEY3ZMIKAxzPRDjtm733BmDBOlHPWZjV
+VsLiIA+pQkzEOZgXZrI2CO4xCrjzPSxM7t+eDh96UfYwkniTYlIRLFRXZvjC
+fGutu9fhTL0xUyu464yX+EeyXnt/+2pY8ijybDg53+mt1yv0L5lOYZnCaUot
+0ofwnDs/tZvkf1lRVAhbRv+tdQS2fr1uPAV2qljz8xzm8xQNdhyBzSaS+iNI
+XmbFk/thw6i0mmHkKfzcO9UXlk5eu+IFey8UFH0Np6lFGDasxP1Xt/PRYbi3
+JahtKyzkCVTJ+Ywi0atbTDx3HQmGZbBsn02cHTxnWmv/J8z09pbWq2C+P+Rt
+1Eh+RwVndODIrnupnrCMaR9dvIKmrkfGBf1I1vMmr/rDOauca/tI/n35CU4w
+P70sgLMe6/KpP/rAzXXlupGw0GZHQxYsOlTQVA33futh/hZmu39n/w5uPeCV
+fRT1lM+PVlt8ivnDYh3k0V+79tbMQJgWLXh4wjkLYvFpeM6kTa4QNvsrZ6QA
+Zu3ZeXcedmt4tbYaZr68uMoB83f5pHPr4bSOuJokmBeVevc2LJgPmbgF29t6
+Jl+H2a9FYV0wHS5+kgULG8JuDMK5f7l4xcCSatXlT+FMJ+5TL1J/2fac27BI
+0pRoRurXrIk4AedriOOUYOpqRcpnsBtlJTeM+ZKjJm/8gf4GlY9zG2DWh2lJ
+AMxot91STOZfnsBoxPyBrz5UiOFc9fqfKpCPp1aM6RmyrldzI2M57oPg7Een
+Yaqc1hEoY3/P+A6yX3qmdZnnMtxXmqbDJWS/1klvRyWa0h/2EzWT32N1oYP7
+Uly3yPrULCzTC9aNZ2DOzIAZDsnnq91yDxWRw4WEg3wy/9VdCXawVtBB4xKS
+/2z6qZElNGWyM9p5GpZW57vWLCHvpfhiKwP0+yxRj1hZLoiZBMse0llDcE9U
+n0MzWc/WPf4ZznP7dMZIxRD1rk5zCuF4kzuNzrBws3K+Bfq57uwXIiQ+XNnb
+Ck9xAstKYLPLkwbR6L8yXD6tGWb6pAZoYz7Vfb7H+sl5xkPHb8OU7PKmCZhS
+OX7HAXmwzj9QI2bPKundgpvbilrIfjdrvXJF5Ce1Lxa2kHUjfp05THMCr1TC
+Uu1964n1Y09+/IHUXyaJlYeTpT+fDyf9iVPVC3HeoN1M5hfEd/Q5bJidLDPT
+J9cnnr9+GP1IJjZfWgTzXD0sJehfMFP9egB50Lz+wTzMl/Y6T+0RLDz3u7wY
+eeTMjubdgVtdV3XGIr835vmD1SS/9kLr3YtxTm23rJ5cf9DRc4sCef79y1uJ
+izi6evKoH6pYPw5T3doWenJ4T4v0Ez9B/altpg7cRfj/cKp7nT3Jr7hy7jiF
+60WpQcdJ/51OGr995FKtBxNq62CZUNV94m8uZfaPh07yRqifExxxCKaf+793
+htliixs7YEu51flZsDDoaGkMzPcaZzwj61K1iPdwu0f7gq4x+n5/cvBXnK/Q
+33vMH5bGnVEMRH1lw5V52bBsMqP7HRzoODD/Gywc6wm/hH7NSiZ2TsJTB6pa
+HDAPT6GvZykH/Yw/7XwOMwpiHDXg1iOpF+Mw/6ZvGYXaZH1vbuMczD8qOrka
+Fn4iHtiNvHjWy54owr3X/lWeAac5mrwl55sF7w7MJ3ned/6uDWY31LWlwMm5
+P4WVETsk/GBL1t/0/TuZ+I2VWjPOZ6wyf07moUQ2aRzYW89wwIbM++vjNwHo
+T2A1PLaWzOOy5N43ZJ6FbR8U4NYo2aMozBuzmf/HNMlXdvdDPfLime0eeEHy
+ZB6eP77ApVwOzG4ZI24MLt36jkt56vjFzRJfmd+5eI5LsbwZwytIfe545PRb
+LsXYX2pjDtNDlj4r33CpqbiInr1wb7HV54JpLtWz5kbpD6T/Ik6/5isulbN8
+5HMyr1A3e1RjikvZKzv8qYp8ZEoJe4decqnexRKhH3GIbc8/4crlJxSvET8L
+TwqGa5cc2DoJUyNl/A2TXCrya4W+zSbkvZIwZYfzWHHqA9Ewmw7LN0M9+6E6
+j5/h3ItNx1zRz6Ca/qlhWCbWVTv7mkspTwaZMzfg+vf8wSfofzByw1emsCyv
+tHj9DJeSBO0R2MHUYTVX31n0pxTBd4Fple/PhCAPraUSyZfEv90ssZvnUsyB
+gSYbsv9trkY33FwZZWAM8x6Mz+ggz4WEUOsVZH9NZxITVi2xfDKOfig/49hr
+2G8ypLGsifTnqMHuw/kxXfTCZZj3YlfYL6j/pin3eTzcyxzr8kB/CslbPviQ
++dxD1+ag//jwGhcbkodCUnch5tUyyJAakuvZcYtTkM/C6+Hba8j5Kheassfh
+25evskh9zaQClRHkd7bfgU2u19q2MWuAS1lXJspbEM8oRVx6hjw2jrW7kf0i
+Sru+g0sdWizkxhIXVShmtGC9NNavhNgrXemvX3D/nNLuHyLWv3Ah5Aae1/R+
+MwOSjzR4gnOZi/e6XGAYMdWxf0c07sexx4E3/+v/+2yk/wOlpIPo
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.683481921675783, 10.839657665452343}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV2HkgVFscB/CbpYUwRCliJBGJkERxlZJ9QkLKFsmSiSRRzZPsvaYoKpWK
+yhbZipSJlK2MFkKhxWuTJllaed/z132fd879nd8yc+dKxSfU0U+IoijbKRRF
+rpwPk5OTh3RpiglQM2lqq9bmLZ6w1/WRh47iNM/z21baBOaU6Ms/EaOpxDf7
+GmXJfv0dpnHwFbGMjd06sNZh/RB4RoXchhSYNl0Q8q8YzdG+6DVuStzk2/of
+7L9ib934UsQzkS0IE6c5EzHu/JswU+PI1CU4v/Vd+zCHOHf+AzEJmqNXK3rc
+GaYm/eaJStKcl3MlMvTJ/c56AikpmqOpqxCkBGc3baySYtCcqRpPPsjCXG2R
+ljQGTXmkCHxmw143LzhKStOcHLd1BSpkXZU7ECVNU1FvU5nL4ZLix43tcPm2
+tHv2ZN3ZX0NGhqZcImssgmFWj6eFkQzNybzRo5cCswenHl+D9YH6BSJ5xLkS
+TbqwTvmT1fUk3u8qgTBcWux0rBNm5Ixb3UX8/vRtX96S+rZ1r/SFZet/5v1H
+6ln/kDmOfGue6yT2kvMC5NUPwcnDmc3NJP5EOjUF9dV1i68qIPVKzHASlaKp
+yO0MPdIvr889tCz6s1t3LNGa9Es10swY/Wufdue0OInf+av8H/S345uFZoM2
+8vhSe/A7+u9qd8g1CuaIWCadEqepYPmT/2jCVMLXg6FYX6a9aFHPErhk2XEO
+fCnufetRmCPo3dYEVzz4+c4C7tfN+LF+Js0Zf+ycJ0TWOabCI7DJjMypTVqw
+be9YowRNRXuEx50m3iYVWYN8C77e0I+AveR6efWoxySh6qIHzJ9zLH0n6rWf
+YDxxIPu9bzh+RT+i9640tSfr2nlLQtC/8H97elxgtt4Q9xXm63p1UiMAppTG
+U0wwr6m77q3mwPSSTUKH4fgr199kkXXm+/4SzCcrtzn/NsyzHaLrybqdKKOb
++Mi2g1Vw0KNO7igsWO9rlg53TRY8Ekd97Hf3gjfB5+9X5MyDS6aHKVCIF/hy
+3JoJ0yvCAzKRn3WfvbcCzNiTsEEV+X0MThEh9/NNZthfQX1HQns7hxCfuyBh
+hzrq83muOOMhybdqg4Eb+tFpes0+nTitNyJSkqa+35Tt2wwz/+twLkc/j0l9
+8ZkF96cNaM7FvC8fX/W6URP9Kr4SU4R5y22vu7of9hL2uLgXrh4b0NEiDl8Z
+Fwlf0s6f8mox/JQZW0I+H0UjJ0/A1C1PP2XE7zkTv9Iezja/eKgW3jf++5s0
+zKPe9ichn8Jfkv59GjjP8v21CHwf5TQNm2/C/dLlK1ahvpJ7nCdnyXqaimc9
+6hPS2pyfAtN5U2yt0R/3v4eG42FWg71QC+xoz2lIhbkto4/N0N8zB1XryP00
+pzr5Mpx04LpCKcybVtrxDV4xjyp+BDNHjzqoz6Kpe45XFAbJeeu2VZjPwvfB
+ta5PjOT/Z1yUhnlGeyLUYdaD5sQF2O9oHsE2I/Xyz7R8wvx46vFnWDB/5Tru
+WcTflOcr4QazB7YX4vtPKW2SttoMM2c5vXyAee4Y2bPOmvTjaFqKDWzcF35w
+GSxwNzrZinotG4R/zST3m6lPOqAfxi7vLV+R/K3b/G9iviF+c6Mvk355hER8
+Qj/NNunP9yb1fmaOr4FX2fkoysPZRY5TmjDfqPa75c3q2F8weiIW9rvKcImG
+mZML7MMxn2ea+glLYCokzC4LHjYObOxfhHhDInP+YH9hoMjeM3C2a1fRv4hP
+Xb1cuAVmHrzAs8P8DEXCdBfB1ONvUfLIP0nY3/W3GvL1lluQAUveTJroIR6s
+XT0f8/pm8DeiEc52ie/OgX3XL07gwYIJ9xF19O9Rsn1YPcx+uLgmG6474vij
+jdwfIvpyBuah3+uz8x3MXPGgYhvmYVxUd2uC7LcwOX0W9rLpSlck+b4J+3oH
++23tA2JN4P5lSm73sd5xLO+nK8zlFdy9Du99P3k4jNjEY+NBeFFS74sjxIct
+DiyH29ak/+CSfix73dqJeY6yeWtPkHgvEmt3wjtTt/2bCPN9c9IFmOftukTt
+cLL/rLxkGOrrGnCY3AizQsuWjGCe59fZBquR/D5XfIxBfw6ffuYzhPy5HRUC
+abjthoztddIfC8VqNuatWxzx2x/m7O78/QH9/8Zfe3oeTHuEWKbBVg6WSS0L
+sX+u83A4no96+bX2MTAv4cHTVLhz5utdOjC9WEPnFfb7xK1yeq+K/PkFNd6Y
+X1ZHsPYVmF/1eYcY+f374PwqhKxbMuwikW+elVKPGVziYFU/jPV6j19q82HO
+P2qbIlGvXgjbaCrMKGQtmIQP3bon9HsB5lB8dGEc+qPalfP5F8yICN5LYR6h
+sQ6dIthP/TyQuQvWOxBtMAdm2XXfaILvlz+S1CXxTgg3ScjS1O7FD9XsyHkn
+kodXyNKcxzF604Jh3sjG8PVwvvILrWTYa3HvMyM48ZiGXC6JN1D/SQqWGuQE
+VsO6u0YbHyG+K79UtpHED/YqiID/lqW6tJJ4Wr/axDFv/flrXzeQev3HLU7i
+8yem3PK2jKxHRRbNgZktu2VPwVy5LZN4XnMW5puVk3zoKvvVynDxTCrViPRT
+1FS3BP3z40q+JfVTs4JVN6J/3oEu7ApYV9z+ylSsjxjqrw8k/bolfP0a5v1y
+h3K1AkynFIRGYT75j+2sWlXweXe8qhoLu2iyow/C9Hrnljr450KhBgM4uzgn
+SBHxlg1GBH5jIr5O2aVQeKfeSb9KmGnAD+mEH+9wsD9CXBxs6oB8j58X3eDJ
+JPMbaiLvM2fP6IxYwDT/saUb6r1wbizQEM7Wj67owzxnuika65N17htFT/Rr
+fJ9xoDHMrwnqbkc/B4sUk63J+R4L+/TQ/6+ni2u9yXlGSoMH4JSsO68OwIK+
+NfeLMV8zu/0Hssj6vE2OD7D+abhk3m3Yi+1zj4f1zfE2yzph3uL4+AtwwNwX
+7kPkfKOULdvh6rOlgRNkv1Chpgzub+xOTBBFPzgxWwcLkV9LvIS5EMyurNy3
+EvmlXu/J/k7q9cywv4P68l3vL++CqQUaTqaoL9JuytwymHs5L7UO/XmeLfXl
+H5Lf3Ls96BeV9sO0Yz3Mjguq/Ix+7g2xDREm66nUhzOYL6vDxi1cGa5udfWG
+zU/7lnYqoV5F835zWD/Fpc0IZiinq5rC41NP156dj/r2s2Nd4Hd5egdE4X79
+EzLJ8PBsh9L9ijhP8Uh+B9wxtC92UgH9vTz1txHyGSwRcs+A6dL+ikI4xuZF
+gwXMXhrBW4J63Occ3zQDFvhfCy2DS1apJA3MQ72dgc3G6M+bSqrlBUxPPGur
+gbWrxSNfw3zH83f00d+vrc1f/sA8VrnTGfhZsFmZOjn/2AvpQVhStSVjKzn/
+T1iwmhyej7dZH0/DJXlLxtbC5UyH/E6YWhEUsx5mnQ9tlUY9nPZtctrwptld
+QWth3thfpZ+IN7eeOz0AFrz6tbQIviywvB1N1s/tGrGFYzO0fIlZd87NfIV8
+H+3Jat4Olxi3t/rAzhnMe4Ywf3Wt8DvUu2f71sXfcD6jzbvCHy60j/iVTvIP
+2fJMQJ7PxrcMFpL8TRf9SYD5IZrNF0m9UeY6y2DX+yPR0nD2kHeWAP038XW6
+HjkX606uIU3wXcb05V3yqEdh6OId+Ni1onkmcL94yI9HsFpqvN+lOTjfaeDd
+T9ir9sDLWXBJZmaGGZmXCqMtbTacZSqTBet8LnmjBlOcxTbiyNdY5s/7VvTJ
+q6/QIxF2ViuqSob5w2fuSqDetBW9i7xgRopBwkn4ctbRj7YwM/R4yVz062X3
+izwHuN/O0TMdTp5okPAn8Q5vU6dw3SH9+lkqmYtUgo0rrhLfAyZqcaVUFo5m
+4vpUwebHL1x1XzC9yf/fLXjwzGg2eZ/dTjXD0fvXxu2BdQeUk2/By2JuMPJg
+7m/lyRTYsOFeZzvcv33meTL/73vW3fsEs5Qkmz4jn615xqECcv8ehd5DsLy8
+o18/2c+8JTwdzrk5f1EV6YfK4cEk1FeacdxiP7l/6+Z08ry2bZu+cyHM7JH6
+dQL9Cb1ywqoK52TXqnepwfrBr0+akHo2sP2b0N+L1xo6ryNu9sNhmVhp0t+r
+VnNgQUDrZifYLvZNThTi6ioEHCXzGShz+tSNOIKc0TZL8nz0PKVOw2yW93AQ
+fHz2DZPruHJs/Dj5uCYbvz23GFduQFYbeb9vczRcXIm5My49UgqCP7QZfyXf
+c3YVVUc+n1u7hWUlYQHTxS0A58oWSQdW4XdAIKPEEMCBH9VuHYEZU6xfRyBP
+ltCFvwdhql229zv5Pv6Um32RvCdwc8K3o84NqjMmBuDsqD2FdfBA8u2Zqoiv
+25YQKIY+PZHKXO8BM9uqM8gcN/T4PD1N8mP8trKBFzhrXiXPGXb03S5zOOhz
+1F0J1MNk3/ioCLcf03Yzhlm/zD17Ef9LjY6eK1mP97RNgv+7lH6D/J3K/Rne
+ogI/738w2x32KlnVVoh8uZ86MlcSq9/6oAPXFO2OngJnH2sXvYF6bXgJc0rJ
++V2NWoawZbVppy3pz1CCbgP6VVdaaU1+J1m5C/b6kvfvhNaLp/Bew72QWyAH
+9yoUtwbjPZZjMO9UH+IaiKhQBvg7hcVc964etlC/zBwTQ75d6lL34QdH7O3v
+zIBjKzf0w4GtgpC06bg/42gUfu+pE6Kvy/+ZhufD8jq7HXDwk9eruFPRrwBD
+Viu8qGRaboMo8gvVnbUG+TJ9qfuLYL6K6/Z68vdCr01opQjW628mWaPe6Zsp
+9wgR8n4wEtcOL9U/P9MHZvbnujmiX0/GNo7tg+l/s5wewumFnafKyf3ybVZa
+6L98nEytBOKXjH7ujoLFdnkPRMNeFrzsYpgR+SRplORTo+DaDMd6nMtlI19W
+2NbfjbD/jybmW5I/I+xxATzT58KGtajP61PlFvI95u4NNU+EKff/vMlzKGY0
+cVc+zHZ9XUY+T0pWR1suw8z5fPGN8OM5Mvpssl/42tPnqCd4zcZjEjD/4MUB
+F/jup/zhaJxHZSdYdqMftOaLU3eQH1dv2js/+My8jroO1EeZmqybRD+5flWZ
+j4RxnukVpwLS/86KR3lCyPdqmuIuOHkg12HPFOz3jb9kDf+YWPHSkMJ5km+r
+yL+vaNxQmT/+14zqF4747gLTLy3aM3+bUayU5pPx5Hvc43zb76cZpbu8MrcN
+jjHc/2DXONa9jv9dinxGIj8q1I2aUYy8pWHZcHDytZjAETPKS79ZWBn1NO5y
+r9/13Yzi/L0lnwuXH+5Kax+GxRbVLkE/BnPsVh2Hs490DRfDe5LUmq7CzLsd
+bzXIc/OPiI047s/WTjc+AT/rCLW5DvPFilzewxonnwdycB7v3ZIjC/E74Rp3
+hxmKfJi+P7Qs4T+rLU76jyFfcZcPdrDz0+9JjsifMax7wQg2umZrqfwD9191
+OTgd5vcqxVXDrMaLQ7WIb2CluEoW9fO8yiJ94PuhbUHKcElN/KkR5Gs04p73
+BPs5OxsSo+HCjVSaBtxvsU7qL+qNYW2RZOI8gV6sJnlex7wM2FSD/NidWs+m
+wa7PavgiyJ+vJlSVhf4tSTjPE0H9PHWjMfL9oGRmhJ38ivMWBr2aQP+p0rHB
+tk9mFG3w9d5TYutz6n0DyLfmfns9ma/5fqfP/ehX1JQ/ZF4c/RmpK1+YUVRJ
+18A4+f7Pc4sJeIz9ts1DeL+jeNUsBYManCdctjaNnEf+0bL4DsUg/yFL/w/m
++JGP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.109669593634097, 3.3111655299750593}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000005002`, 17.000000000003638`}, {
+          6.500000000004093, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.013283961763, 16.423466606479796}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.540947421444628, 7.668074278969414}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwtlA1Qk3Ucx/9jMJ7xdihk0J0xYSF5pkD4kkD9B4o6phBQSxIdeCqWtIaK
+XiT9DaTi1qzbialBgI4DIZyhRfj2QHBDXhISktsGTba43YGSynkNUPr9vJ67
+53nuc9/v//f63LMkR522240QshFufDMBPiIpeX75UKbeM1BTCVw1ezHve2Dr
+UTHlUR/qKfbzpUxr7B+0A7Nd2vupvpSc/ufeJi4K2FuRpQK+rDj8yXJgamLG
+WGBOVilPAbatCZqzQzydMq9ejf7gi2y7DyWmJyertcBEL/3igjdlW94YzDEA
+V+m8lw55UXJe3CP/FePl5rkcYkpWzE5MmFA/v/SqnaNM0ByycADjW21jFk/K
+XqRzHYMYTxC0clhEmUqj2XgH842ER9k9KDGOPwjsA5ZcjzKLgPWLwqzt6Dc5
+/RTulO0zaA9fAVYlXklqFVLiCFjpeF6P+uN1SiFl60j/6pPAfGZQbTjo+cHR
+35Rg/tIIyTLQTbf7/A+h/2wqlw1sTv66dy/mS9ig6wKe8VlwMwvzLcruf9+d
+krD2OV6J+Y53+Qd6UCa8wRe9i/FP/P7MCfUFJq3XZKLfWrhgQERJ11l+eBfG
+F+2cavOkpOWue2s+zic+7i8jR8ntY3S0FM+rB+L0MC/ne8qhH7B/wy+TO2Ce
+wiWGmWvIhw50e3lT0nfjaeEIxmv08DkB8z/4eUUOiQbee7P8b+BbyroKKTCT
+X5d5wb5CSzt9NwOrlKuEs6C7irZ9ux+YGOtFLcBRB4b9dejP8GtIBL6W1lDW
+CCyJeJJbA/k1Ja+8bML4rbZqM9R32RzwwgjGO3c1cxr2WXzm04n76G/TOv6F
+/h6+FveOC/X5uYJH0H9MgUw2j+wMbJuAeY1WJ5mRedv4wSmY55Y/n5XMYvx7
+wXc8gZuNvZZHwPT0ptg3YV8RRyLrxpHF051n3Ciz1a0y30X/BtVkGPB8fHwR
+1sfveSlhVEBZwJj+0s/Y39HwxF4BJctWp5bXAtvKHq99AOwufZr0HXJ37JoE
+N9Czyru1eF7xOLIDuLJ+m/g4ziMxW/oR7P+3mvH2Y+hPL9m+FurTJQeVFqNe
+MNMRDP3kxj+8UIbnNRYFB99v+Tnr1lOYPyAtwwXsmtyfXo/1hiZLxmA+hVzt
+Th770W1NaYH9r0/ptFvQ/3aZPB/mm7V4RwjOgx98q8nTi7KQpi9fXfw6+KWh
+Bg3sY3lM9wxF/rAtugH0ZoX8yG5k0/C+S6BP/Wj57CtgW9UKbTHoMkfGdAOw
+KqJxYRjoevbTrR5g8kd6BX5vqR8U+TuBJU2dPWbu//9KDDC+OfofUZmlXA==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.931801948466052, 1.6274136392623755}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1wk8lNsbB/ApQqUaSxpbTZImhKSM5WoqIVFjSZIyZBm3zRqlxb3pUknK
+kizXZMlSoRKKNP43JclSaFxi1IgSzbU17f/fudfn4/P4et855zzPc94zM4t9
+Djr7TadQKAP4JfG/Hz3Wf3EFi1LFdB2wgEMqX1i267Mo7IjQviDY1fzjxmw4
+SHJvdhbsc+Oykw8sXhb1uhbudS0aWgjzhx/ZdMCHNhV2diK2joxf6EOMS7Bd
+EI8YNO6a/grx0T5hHQtRrmiovAVxdL5gfEoXrz80fLMC/lOz/l4ZLHx+sD0J
+HnrC/HkQFnx2qefCY2dkg9fA7H71301hjltP+AyYfptjNx2+3tGo1rsc8wUU
+H3+K/+fYhc+sg+3qczJS4NbJ1b+VwDSlHPk98K3oi65XYV5gpgYZN91YabiA
+XL8a0kOFxZO/2t6CW89nzJlEtLQtU3iIyImZRhUh2hz5Jb8bUdDV8oLMm6BY
+tPgTovuJ/7UMICoqLDuujHHK2nd+k8Amtmf/XAmnaRm3L0Bk/aMU6EDyT3Da
+sY78v069xweR8+3IojDEzpAXWqGIdqqdHiWIIpF+YRTJ//3xsRHEKVeTZcR0
+Z8NUI+TvX2JQFQQ3jGp3hsIlppNdO2FGnIPlHdizYEWEJVylVuo3RuoVyBhU
+JPN1qKovRx85XTvf92GdjI3TudtJ3y/ycvJgiuq9kihY8vV4rA/MKlh8Nxk2
+eSuzXR0WJ+jXX4FLpp5JtTGQ77TK+By4dXEL7xQsKfGwuwTXcL9utoA5Ujo3
+ouHU1B20iWUsipGb44AXHGd1SXITFicvjlkDP08ZKj4E2/U3hMvAzUtlCzbA
+acHew21Yv3DzzHlqcMMcT+sMuHGqJPeLDotSaCWZ9IVl1mfWDMBpsX3BK8n+
+Gm6z7obFs97KS8F/tMRW/w3H+U2+7UYdErZzzN7Awki1jvtw8tfaw+MwqyZt
+SzHc49A/OBPz8YIe7cqBlbeuKtWGCz87plwl/bi8pnkdTLfYMKsSHvvFTM8L
+dp9h7/ICtrorU3wE5rA747/A61feXneR5OPr4aOH9WjL8hTyYDlDaY1/1/9U
+GFYCJ45FleWQfpkxlcpIPXRHukRw8Y3vowVkvvDoFQzUZ/qGnQdTYL6Wq8mv
+pJ9pR/wj4ehj/8QUwrQFHCUnWNBp2iOElR28F9FhRl+1iQLOgXY2+9JbUo/7
+Rd2m8NSdHGE+zJ3p/LsL3PtD6poXTDO6vnkPHCkY6p1P7k9a3+EPa1u/PN24
+FPPR9C12w603DZ+cgLnS71Xs4dHjzuWmMLt39WE9eNYbKdsJbewvn5+9UrB9
+zYhDJVy4XV6rA+uTmaW09Xc4yL7Lj+yvmLKJk24wrzl62l5Y3nj2XyawEf9c
+gAlcdkrlqCbs7nlLngIvjMm6RYWZkYFbWlEvN/rT73Ngu/exHgVwYWJxvDKZ
+7+g9WixsHZlqsARmtAlUguHk7pNeTFjsJoj0J/ttuGi7M7n+Q3okgPRHZUDz
+IBxp8jkvnJxz2Qsy48l4FVku58l+S7tTXghzX240KoeVu7Lc6+BEzYYfr+ED
+F3ZntsOc4rUaaljvxODMJiHJ58HYefL8SVqfHRWR6/+ULroMJzpfzuglbmvx
+74HVqk0jm2H6kZHRhajfH00Hmm6T+WvcNpH6N8h11iYQa69gpMEJUZv6vUg+
+q00ONcJ5TbJ6DFjY57ZvHL5uXjU6tAT9uTUjT8EAfYl90JQL80ZLl2rDdM3g
+HA9Y3FgXogvb2TcemgfTz/HPkOsxguN+D7VQb97WYUU484nh6SjYaO/Cs1MY
+3+DsjYE1MHfbeEsrbBKh4yJZjP0/Yh6dC6c+p+2tgykny8qCYLH2s4gkmNf2
+qsQc1jgmFXAQpkmz35H9kjBvF38bbDQR0dmMejiPi7JtYIaNWXcWbMQQl68j
+468yNA6F3aw4G8l1dvjVdjZcXqOz2oVclzf3Z8LF8dUKAbCd/8ASPThHmro4
+GmammL/893xc7xuaCUdmsZrJfqO223y6CwdVOAo2k/Nstzihk9z/5bvtAdjn
+3UIdMbG58Zd0WGR7/rE08o972OzdSsaXrLmpSOoh5F+SRz76mfv9aTAtN/+A
+I3ked9g/UIYj19qeToR/sFMnZOCqLLnQF7DMAUHBKMZ3n7PhrhKpN3PZ4FNY
+OC9Reivc8Heafjapz9fPRifh5I9uOwJhyWFV3xLSr4a463okHzcLegtcNRlc
+MUjH/RkNLiJYfqW9XTZxtZPvCKxSF+7tCieeaTR5D3NThWozYd7pCp1u+FtA
+rtaJRai/p5lKHRyva5A9vhDrUTdxyiLzXXkZEgpT/Z+eDobLVw18nAYLovof
+roVrbmi0XdFEfXhmG2fBNEGS5jbYyEsjjOSb5lCnpAmztQ80ZMFDNlc1vmhg
+v6Sb3dgLh4WlPB6G7VrKuWthued1zWKYY/iXtDrcM9dfW5aM9/qtGfnc477l
+m6w+XPX9yC4x+pFJvablCdt9G3H5AOu31hUlwWVpZ2InYFZk/6lmWKJjIJLD
+6xPvWh6Tw/rZuTQBA6Z4WHr9AhdSm3eQ85K1qt4wELYLbRr7A7Ze682Ogxnd
+Bc11cPmtnPxLMOWM+Nk05OsgsqpMhrma9ExrUj/llCfHYM6ua49j4aaPaR+d
+SP2WsLobYN8lAcoKMD9HN2KGIeoTRv9WjfXRa7sDLWCjL9MsXWHuxMVHXFhU
+N1u3B/UYurXu81nYPbP3oRss3v93Zy78Ibgx+bE61if0KSqFy2iOscZwdLqD
+KTFvQ9SjDDXMM/i4PgfOC/l0ThYWTErmk/FqqCY/D6tiPm39XYFwpnb91BQN
+7wPyHsy1MENwRPQbLOd9NGMuzFzUX6AJG4153e8i+4+eFNK0AOOdeEjJhdvT
+k2+eh8v4Fd37YBY//UcAzNq9pNaM7O9v3arbyP0pRZLZcNDn/A/EnAs38wZI
+v2/8mcyFGfvuJzTAnh8sIs6Q1z9sX1IBC5mFnlUwP7/Rp5Scf1Y/E0dhdtNk
+Wzk5P4fOzFqO9fHZ9YcfwfJZh5L2wENFgaI3cIy//eRlsv7jKVrymJ8fvF+7
+geRnsrTjF9KvttHA97Awc5NFBFy2fOD0dzg6Ote6AqZ2CEQ/YDo95aoEjlve
+d/EDGe/yyDjpn8h7S0Q9zON/vnMMllO3cjgNs1I/naqGaRLPfCYZz29g6Tjc
+lPr9XTvWL1nYuVnBCO83fZdsOHCYXjdNG54wdk19pYL+2M51XwnnnYjbyIap
+d3p4TOKt7gY187FPDR0bzGAqfyBoKcycXfPaBP6mW2qXqIz6vpHboAtzEp8L
+KXCarVWEGkxX/8qIUkKecp3rZWBfjYrr0+G45uIVrwxJXV8cSFdEHqFLqUVk
+/yhvabSG3VcpxoXA0pypHVKwkenOmZZw5JqBwU4F8j0iVlYOLjd083sA82K4
+PQLyfNRuGK6GmYOtpWVwnkzNX40wherkfYGcN9/PRb2DW1NehR0l+2lB2ldl
+jG/nx5AKhVtX3C7cBHOfOpaEw2IDcdxJeGiLfUYMbLm3cF8tub/laFC2Aflc
+UKU6Ra5vst5RDyur6UboID/ex6S5k6TfXicrN8OSn9oifdIPY8VoH5hiXtv1
+KzwUeXE2F06M7S29Die+a7HxgOlxkz8+wtHTVd+aKpHzUpOhivrxPfJDKDDz
+0vkM0p8gR9+t5Yrk/cNg9TbST/60O66KpM9PRvbDwjub8t8gX5bW+re/wa5X
+9nXugY3M4oMS4arKL6kCKtZbUqFyGT76rPLaRji66np2Brke4ey0ex55DmMU
+0mCea/8547nIP8zqZgLpb/jWEOqc/743RsNy5A951v8BbdEu9Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.235352284295374, 12.365864399803508}, \
+{-1, 0}], LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 11.6}, {6.9, 10.4}, {6.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.355394937518537, 13.000446064907765}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 7.5}, {13.49999999999251, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.1}, {10.6, 7.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.5548}, {0, 1}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 10.4}, {13.9, 11.6}, {13.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.5}], PointBox[{16.5, 3.5}], 
+         PointBox[{6.5, 14.5}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 10.4}, {6.1, 11.6}, {6.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 11.6}, {13.1, 10.4}, {13.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P1", " ", "N9"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{{3.781961611532447*^9, 3.781961623302053*^9}},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"2b913ad1-b614-498f-89aa-00e8df81124c"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", "dB4", "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.781961625471493*^9, 3.781961631046711*^9}},
+ CellLabel->
+  "In[126]:=",ExpressionUUID->"48303888-883d-46b4-a53c-0e49eb956a35"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961631303892*^9, 3.781965298184515*^9},
+ CellLabel->
+  "During evaluation of \
+In[126]:=",ExpressionUUID->"b75b01f0-ebbf-4e5c-b518-fd40b9763316"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdieg/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961631303892*^9, 3.781965298190607*^9},
+ CellLabel->
+  "During evaluation of \
+In[126]:=",ExpressionUUID->"0ac61c0a-7637-4600-8e79-3732d4b01165"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfhgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbg/chdiei/ijfgfhgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961631303892*^9, 3.781965298197063*^9},
+ CellLabel->
+  "During evaluation of \
+In[126]:=",ExpressionUUID->"5f95f51e-ebb6-45a1-b85d-92fd14031b04"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfjghhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbg/chdiei/ijfgfjghhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961631303892*^9, 3.781965298200405*^9},
+ CellLabel->
+  "During evaluation of \
+In[126]:=",ExpressionUUID->"6e21bdf4-9a1f-49a7-a2c7-0c77719d87d2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfhfjghgj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdiei/ijfhfjghgj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781961631303892*^9, 3.7819652982037373`*^9},
+ CellLabel->
+  "During evaluation of \
+In[126]:=",ExpressionUUID->"6670231a-1df0-472f-a312-d696b12867d7"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 11.6}, {6.1, 10.4}, {6.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 10.4}, {13.1, 11.6}, {13.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.296859253185694, 9.004142007228563}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.487957619455987, 11.899719917065077}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1A1MU1cUB/AHiCmEyGOCsIGxTOa6xWBX2OjGNA+ZXQkUKxhogpIXmyIr
+OOrXRNeZzmwiWweFaXykdakKg2YS60RnRaUoFMbXqmsBQ8iKm0jZgh0rzSBI
+97/ZS5qTX+895557381L3ldVoAqlKCoHPxL/f15hqP4gnvUMxXTQ4Zmw1V1Y
+dBKmdu/sYmGmdJjvT2Io86UBcRVMF9hZFcxO+tUqMn7zQ8loIkPZ6bScbPjs
+uU3hubDzYml3BMzPOmXpQ/Q9Sfvx9ssMdeX19LmdsH03Pa6ATU/Ydc8QhdF9
+1mcJWP+wZ7AednLtxRXwB78/DMuDrV8XlszEM1Rz15HZJFhez9UpYYU3fiyU
+zO8NG5tax1BDXJP0BfLsvpKl/XC52DQbSfI31hxYikMf0+9efgPWNP6w6QKs
+oCxtRTD/6EdHCmGOnb9QB1OHHk5sgD3qhhvDsLnt6EoY/H5203g0+mfjzbUU
+7Nw15JTDntCSLXEkf83CYT3Z75pvLQxsLr4/cg92jov6dHB528eyP8h4wbVT
+j+AzeQbPImx4/mayCP2ao7ikF7Cup1dhhP3Hbxf8RfJtbm0E9rvqRPYlB0xx
+S+3H4GrzxRCynrxLGjUF89yD27aS+uJqL4NzOGNfDkyQ81LHLTbClDbhtBrW
+vfpA+yu8eaJs7k9E+jWHOog4c8doUyJq4mXfxGIeb7LC5UZdulbUFAO7VlLK
+JLDwXH5mAPNi9d4WG/q0z4wkPiDnLpNeTYN9nYfGjsNDpufFt7BPzWnfXBLc
+HyPk5RLrhe1XUcc//PT8XCzyHqvC34HTQ0VvtcC+hX3qDtThFYne08AMM2ze
+Ams5o0QO882r666Q93lnMGYH7Jx3hAthe3f95zLYEFnJ3UMUVOmu7UcUNgWV
+exClpbrVDYjyslFvFGI63ZjjIPV/1s4+Wot+D/7dT96zp1qZY4UrBxJP7oD5
+EZrFFviL5m0ZNWTdgPif63Aeq7zfQ+bf2vX2Y3iV1phA7plm6PLIWtTVtx6s
+2Yi+NSr1PAtrLQujW2Fqe1jcXXhmekItgRlZJZ2CPO2/JXszYfZ6IL8B1k3Z
+GhPJeEL1UpDcH5u1Z5rcq9zY1Ar8v2dZ+iW5x9TKd4IR2PDLsjiL9Ndb91kK
+zjMqpIznwjo6tna7GmYNvAEFOb/IjgwTXD65/inZt/N7gfcnWOzWp0pgNiSj
+vxM21R/rvvkS1ps9kNlK7p/B7xLAzqCj+QTsSm01mGOw/lc39mbAy58GppJh
+ekOW5Tf042w2FlppnD/TafoE5roE3nyYJt8fMk6+P9HMf1UepsE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.441371117808147, 6.3681225377691}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 10.4}, {6.1, 11.6}, {6.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 11.6}, {13.9, 10.4}, {13.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 7.5}], PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.296859253185694, 9.004142007228563}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.487957619455987, 11.899719917065077}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1A1MU1cUB/AHiCmEyGOCsIGxTOa6xWBX2OjGNA+ZXQkUKxhogpIXmyIr
+OOrXRNeZzmwiWweFaXykdakKg2YS60RnRaUoFMbXqmsBQ8iKm0jZgh0rzSBI
+97/ZS5qTX+895557381L3ldVoAqlKCoHPxL/f15hqP4gnvUMxXTQ4Zmw1V1Y
+dBKmdu/sYmGmdJjvT2Io86UBcRVMF9hZFcxO+tUqMn7zQ8loIkPZ6bScbPjs
+uU3hubDzYml3BMzPOmXpQ/Q9Sfvx9ssMdeX19LmdsH03Pa6ATU/Ydc8QhdF9
+1mcJWP+wZ7AednLtxRXwB78/DMuDrV8XlszEM1Rz15HZJFhez9UpYYU3fiyU
+zO8NG5tax1BDXJP0BfLsvpKl/XC52DQbSfI31hxYikMf0+9efgPWNP6w6QKs
+oCxtRTD/6EdHCmGOnb9QB1OHHk5sgD3qhhvDsLnt6EoY/H5203g0+mfjzbUU
+7Nw15JTDntCSLXEkf83CYT3Z75pvLQxsLr4/cg92jov6dHB528eyP8h4wbVT
+j+AzeQbPImx4/mayCP2ao7ikF7Cup1dhhP3Hbxf8RfJtbm0E9rvqRPYlB0xx
+S+3H4GrzxRCynrxLGjUF89yD27aS+uJqL4NzOGNfDkyQ81LHLTbClDbhtBrW
+vfpA+yu8eaJs7k9E+jWHOog4c8doUyJq4mXfxGIeb7LC5UZdulbUFAO7VlLK
+JLDwXH5mAPNi9d4WG/q0z4wkPiDnLpNeTYN9nYfGjsNDpufFt7BPzWnfXBLc
+HyPk5RLrhe1XUcc//PT8XCzyHqvC34HTQ0VvtcC+hX3qDtThFYne08AMM2ze
+Ams5o0QO882r666Q93lnMGYH7Jx3hAthe3f95zLYEFnJ3UMUVOmu7UcUNgWV
+exClpbrVDYjyslFvFGI63ZjjIPV/1s4+Wot+D/7dT96zp1qZY4UrBxJP7oD5
+EZrFFviL5m0ZNWTdgPif63Aeq7zfQ+bf2vX2Y3iV1phA7plm6PLIWtTVtx6s
+2Yi+NSr1PAtrLQujW2Fqe1jcXXhmekItgRlZJZ2CPO2/JXszYfZ6IL8B1k3Z
+GhPJeEL1UpDcH5u1Z5rcq9zY1Ar8v2dZ+iW5x9TKd4IR2PDLsjiL9Ndb91kK
+zjMqpIznwjo6tna7GmYNvAEFOb/IjgwTXD65/inZt/N7gfcnWOzWp0pgNiSj
+vxM21R/rvvkS1ps9kNlK7p/B7xLAzqCj+QTsSm01mGOw/lc39mbAy58GppJh
+ekOW5Tf042w2FlppnD/TafoE5roE3nyYJt8fMk6+P9HMf1UepsE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.441371117808147, 6.3681225377691}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 11.6}, {6.1, 10.4}, {6.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 10.4}, {13.9, 11.6}, {13.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 7.5}], PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Q8wlGkcB/DHfxNlSZ1SYpLZkb+J3RTvKxXXFUuq5VjOnR1xsRn5d9LW
+SXtXBl3uuLqr64S9IuW6XKid8Xf9O1Rjr4jUsRdXRNkjue9zdzuz+85nnmff
+3/f3e96dtYlODI7RJoSI8aZXspF+mLPk35cDS7R9bf2zlrJEaG2p7l/PkriC
+yslJM5Zwe3TONsL2Zv0WkbDCPZpXA+fnaFm3mbJE42V6gjrqN6GUBxO/4rIm
+OMSqr/gKhyWqEDEzCHsozbLtYY1tp1gX9djnsY2JJiwpaqqudYM1redTK5bA
+Fw4nxMPGJUdrzOAaWfReObxlvUHypcUsEQzo647BrcmjnRFwzXOfPxwdWdKx
+ap/5NpirNN2fSK051RIM+yf82XwVZm2rfz4By/SiOp/Cxn5Wa/vo+k8m/mZO
+uI/zE1MW9Qz5uRIPWLjc7fMamLPu+MsAOFM3sZeHvBNzK8fC4I1ay0xvwqyv
+M4d63/yh6qXoTxKhKNwFt/1wjO8LV7XIPd3gjDirgBiYm3vOywR2+oCpTYGF
+9jcDh5Enyd1yNhkeGhEcr4Sf5QXuEcGtBxtcUmAXddiEK73f7LuRzbCu+H3l
+IOrzZ+x3aMOZ/VGhG2DF1D51O+Zja23oF4n8ssL0bedgfqR4IB79Rk2qv0qC
+ORZtDSJjlqTNHbi9Bx6aWvILY4Q8j1SuLOzSHOn63iL04719lk/P49p9ixeG
+mFePY543fLq+aW+nAc6rP2BYQM9zRJVar4/5TG8OT4TVoQ+EzXrIw9wZLoLH
+K1e3vtBlSWzFjWc0X7g80mcLXLNTHaeP/EWZeddv6KC/V/6OO+DGx/JdIbAk
+K/aKDFZ76KTYwPnzh/zaYf6cTZ0FrDAPijbCPKPKA7EF+T9Rp+6AZWE8m1Q4
+VrTOMwPmc1etuUfXN3XJS+BxXnKiL+oLHRfWN8Lln3Ga7sKcgcRzfbDGNymI
+QX4Lp5aQx/R5eJK79le4eyHNSwWzoQsnbdFv0djTxiZa365MnA53G/w4WAbX
+9SiKq+Dy+e3zR2F1ULtnIyzRDGgC6fcDDIevwfw8Pb2VsMOm0QcSmI33PDuE
+/qouRXD1YYXpSe9SuHXbhEKC+jKHossHYU76QnA18pbfPSDcBAt232F70Z+a
+W3/LCBY6G316Txt9iKX9I5i3Q4XtTL0Wcvp7HuuA73cMzxQTzEee8LKenreH
+yGfoHUNkrg2TtXC3j7LpzFuGaHrS25vhojzO6ohZhuT3nHd/TB3fNRKoYYih
+avYjLdSzTnczyXjDEFVHr44zzZsjclJPM8RlRW9EDNxdoCQlUwyxyO0KuQRz
+raTvql8xhO+alEN/jy6nc5ZZUg8+i7aj8zkk+lI1yRBOYKR/LHwxQ7MwCqub
+si6Uwq0Pa0t9sF+Rw52h56N2K81/COdPdFuZOOM5tdfYXUY9xddG3u6w7IuM
+ugLkYZ+I1YHwxUcbPfJeMyStpN5BRL0/q+EU8gumQy9EwoLUiu8OzzCkdUOm
+KASeyA5t2Yx+WfkyUy/qI3YNXfCQoHFwJcxPSfC0+ZshVbwPY1/S/IuUp7mw
+NPfI1Tp4KPrA1gE6rxiDt9lwmkl2OL1f98cO/Tthybdh0q2oJ9AXjnNgQaHl
+3GvkE+6dUv5Oz/uvuO/Dkb+7j5kug8vFi1Ol6Nf/dsr1I/DFMWVUwgTWC3a/
+CYeHXplr4sbRX7ha4AeTthXLO0cZEnXCUuVF9y/SZNg9RZ6tN9b4wFIH61b3
+AYZMfMPbEET3Z+iriu8zhMxm59PnTbpHJkxSMkTCWPIK6Xq4eaXzLZxnsLG8
+2fH//5EzXv9dndh/AIX0Veo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.9412613040609137, 16.101506520304568}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Qs0VHkcB/B/5FGhmWS8a7QrTkpjk93Ezq2k9kzlYhWVjCK0tlQe2dAU
+SrY9hpZjHTRGG0nLZotNZbKK6DFbUauHQaLjsZZk8tzv/+zZOce55+P///9e
+994Zq90HvII1CCHh+KNXMjiNjyHz39WcIXH635wqg5m0Y9eC4WI5R8LAiiTu
+4TYzhvjWx++unIf10oSKSPiGxQoPM1isE+dkB8/vMLgUwWUI/4goXxvmn7Us
+quUwJIK9tFIXVsojq01gxfXmVnu4atRs9QcDhnBaurgxsO7TW1Ed+gxhD8e4
+vqDn2wIlGvBgVM9Hb9RTNStjX4Ae4hUcyHwOq99U7Z2aw5DysZC8AAuGSEWK
+KBXMnH4W0wZz1rds1cB+gfWh6S2W+P9G7xs7YZWvg8kFmO0Oqn0DK0oNV7yG
+pX3vz51BPtl0UdUQLA7IPOmG+shXhd7tsKBJWDhuQOPc5ZXQ/YkFywvm4vyX
+pUc9YHKcvT2P9ueS5dyC/OGysFOusPJizaQb/HWg/zkRzM8wGSlE/eKCMOkq
+WHBgnecE+g2fcOnTgqWL3H/ZBm8MPXF/N+Ir7UNiakwxh5J4aTzyK54u3OIC
+P5+0Sg1GvdK41vhmE4Y05Kb72qAfkhycLIX5vo46j2djXp7ymxHU+5aZRs/C
++T2Wn8TAqhB13Ke68G8z3eWwJG91bL825hZ0PHAALtcWnW/Twpxmfcz2Qb5Q
+c5tRbVi13WubErZ1mjEnfCbiXlne6IN6BSTnB0NYkC46+BK2PeE5MqmJeUW/
+rNqOfgXOV2Nt6P6yzzLr6f1UEc8Uuv9WmZE55pPiUWxvhPgK27quLfCgWedY
+DcxY36nYBatlWZVHUF/5o/kxG+l+YpFkr4N4m5ek61Ef3VemhCXDgfWXEV9l
+5Vbvgf74emNGDnDoCoez+bD0FS8gD/WJjXf2XqFOGxwbQz9H5hb7n4Ql7msF
+3nS+BxOzeDBTdzavDPNgrjecDEZ8Nq4/1xROGVrjFot6JLEdl34yxrWt8cIO
+1KtUZrY7wT1PthWboj/Jw4SjH3h4rs7NzqjVwPlHrikv4Gzrm5ohM1CHXe/V
+t3CD3f0uY4I813Q38HCeDcotbZwUEtJ9z36vMa3Dx716XEj4VW+9lHRdI/QP
+kzEhYWWNA5tQj9hhMmhYLSRM6mPuE5i1ffKdNxyh/lHgh374fX4vv6DrCWM1
+zbBUK7Q3BxZ0blYKMQ9FHssP+ygknKzw/DS4PPkw7wziK4Xt3Bo6L2dX3W7k
+H+zsWdhI389dx+R+qE+11Fy/DGYNTnBrp4RE5n/m9H5YEpO8eHpaSCSJsp/n
+wA0d366Kpf3tXy/7nj4/Ikfz23BEUHX6CK2Xyz3+gK4/91Z7wqF607HZMGdD
+lH0J+lXEmbrwCe3j/GMdmP8wIfEh8rFZznaRmN9g/rW1PRPIZ1GSNmqE9fcV
+bnLUT6aGVdkwWeO01Bj9ciz/MvWHy5cPTQWP4Hxl76Q7LJV5LSsfwv4l8r6t
+sOLB6CHjQSERJ7u/SIVVqvGgmF4hKb9rHf2aOuPG64PdmJ9e514R8ouH8vRF
+bzCfnujqe9R7NE5bdSD+bY8QFvXKjp16qtmO+5EU0NJM6y9Ojvxbhfk6KlJY
++v4tKuL9Sdfr9C9X0vs5NNyU3AnnXizTxLzESf7Mqy7EUyuv2sMk9V5Tbg+c
+XjnhCCs+tCxJRH2qlnyeEcy0qeWbBtCv12wNJX3/m/yKdqAfWX22aRjN12p+
+Yd0/QiINTXnVhXoEOZ+vvwOzh7bnbKbPc9yO8QewuJkZKqb9PGvo9YKZ/lZ2
+BsyJnM7yRDxGy8ZLjHlIBoa0Zf1CfD/tWvxoPvIt+LWy6h36UxdN+MCyoDCu
+CeofZAwTxunvzEih17s21LPWP7DOkL4/3bVmzYh3kV1QAZPfV5Zk1mG+ucV3
+6qnpR3rz/9+tfwEFv4pt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.075655548348861, 5.165661129127848}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.000000000003638`}, {
+          12.000000000010914`, 14.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54353952593509, 16.112427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1AswXFccBvCrjYioZjfJIqwgmRAJwkzrudZV2qDitTHtILVeaZBhPaKx
+rGFI0xKtVxEbsolGjdjYpmy9GiYeFdKZVbQqKtYWExK2mso2pPod0zuzc+c3
+59xzv+8/O9ciOjkk7jWKooLxI3fq1RYuK5ravtg0VbA3s9vnKE3JmkPk0bCL
+596IGlgSbc6ph1mnFwfVsPrpxSfdsF7BP2UnrbEeld4ihUPrBwJriDUCtww4
+UeH38x+w4lnm8gH4r7SE7MPHaMr8/bqKOhOamj04JeTBgo59Zm/A7y3l/Z0K
+yyLG/000pqlKd70TeWT/o8HSoQM4p6igNAfmh3gn2cB/sr2+OQ8HPZ+S3jCi
+qTJRDhVAfDuRdoAFLxJ0LOHZGAfenCHuBX0DGuQxf3d5ogMutGm+PgxTlpGW
+nfCmY9EuCaxO+22R7OeGzjiKyP6gSF1ynkZlMR1H/Kb1yzo4dLVmPoL0u6na
+dQR5Wve4+8US94YvdsDVX2s/yYb5poO+PPQpMNAXNpDneVuVCzDLOrD8MSzr
+f1kbj/7DblO9R5CXCuN6j8FazAd3LsC0c48FG/PjfuUSPQLnTn67xYUd5Cmi
+Q8exzhh1cIHLmPWFGbDi4qH+3fCdt/19+uAg1lGhHOcFHzde22GDOVgVX/eE
+q7bO5TnDue6Z0u+QZ2GDqQwn60biYRY8fpbBTCLOy7JLRZ9PXcVOycQx5alj
+6K8+V1LHJ+ZOTnvB1yoja71hgZGy5SHmV72xKjgI238Zd+UCHMJ02LFG8pi1
+rHjBZ6P0pCQf30CucIVPqWzmqkj+Y/afhMG9M7dWUrfXNeclcI2voPFDWLbM
+lurgfbUdD+z8iZceaD6D8yvutwaS/cW+PBPkNXlRER5LzjszJW6FV674mBXC
+Jen6bn7oN6+n/qUHFggNJ0fh20sin9eRl3J+rvsO5tOXPxMQDCvy8jVlcHLV
+wz0NMN9wcu4efNrgR/dXpF97V959eKz0XlSILfpdVXjUwvtGiqxuwL2ff+EV
+DOe3MRrn4dwugZ8K7+M46Tez7fB/8Bz5IAzeDLBTecGU9vecHuQNLW/UC4Nl
+UaZabLhd2K4TCTMWNp2y0Le68OpjHvFmjN8i5lOcNt7iCtMJnIF4+HDX/ksG
+5Hn5aNtueD5szWoZ71c3bZkpDGhq/13b6W5Y0s+t+gG2tL5rWAIzriVrjcPR
+Sg/HeJhvnX2ZiefPiCfs/GGFaqI1BbZfnwjkkPPc5X3P4IRAwU5iQZQuU4R8
+q+msNrKfPuUtYyF/QFOPOAmWPfVmSWF9m1tjEth8fXbIGf09RJKPlGReQwx2
+C9yU4eNrS/oUdP6kg/mxRlJ+zyV9VrSrObDpzk7lr6S/Z7/YF95Yf6S0PYFc
+/V03bWF7t3VhDmwe+/FbSzjv5KXGhgGYoRjMyjemc7e/e/b/f/+M6f8ASfvM
+Jg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.72092184717428, 5.122174777394248}, \
+{0, 1}], LineBox[{{5., 14.000000000002307`}, {5., 6.999999999998607}}], 
+        PolygonBox[{{5., 11.1}, {4.6, 9.9}, {5.4, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 10.5}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 14.}, {11.99999999999251, 14.}}], 
+        PolygonBox[{{9.1, 14.}, {7.9, 13.6}, {7.9, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 14.9452}, {0, -1}], 
+        LineBox[{{4.9999999999976925`, 7.}, {11.99999999999251, 7.}}], 
+        PolygonBox[{{7.9, 7.}, {9.1, 6.6}, {9.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 6.0548}, {0, 1}], 
+        LineBox[{{12., 14.000000000002307`}, {12., 6.999999999998607}}], 
+        PolygonBox[{{12., 9.9}, {11.6, 11.1}, {12.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.9452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{5., 14.}], PointBox[{5., 7.}], 
+         PointBox[{12., 14.}], PointBox[{16., 6.5}], PointBox[{12., 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfhgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfhgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Q8wlGkcB/DHfxNlSZ1SYpLZkb+J3RTvKxXXFUuq5VjOnR1xsRn5d9LW
+SXtXBl3uuLqr64S9IuW6XKid8Xf9O1Rjr4jUsRdXRNkjue9zdzuz+85nnmff
+3/f3e96dtYlODI7RJoSI8aZXspF+mLPk35cDS7R9bf2zlrJEaG2p7l/PkriC
+yslJM5Zwe3TONsL2Zv0WkbDCPZpXA+fnaFm3mbJE42V6gjrqN6GUBxO/4rIm
+OMSqr/gKhyWqEDEzCHsozbLtYY1tp1gX9djnsY2JJiwpaqqudYM1redTK5bA
+Fw4nxMPGJUdrzOAaWfReObxlvUHypcUsEQzo647BrcmjnRFwzXOfPxwdWdKx
+ap/5NpirNN2fSK051RIM+yf82XwVZm2rfz4By/SiOp/Cxn5Wa/vo+k8m/mZO
+uI/zE1MW9Qz5uRIPWLjc7fMamLPu+MsAOFM3sZeHvBNzK8fC4I1ay0xvwqyv
+M4d63/yh6qXoTxKhKNwFt/1wjO8LV7XIPd3gjDirgBiYm3vOywR2+oCpTYGF
+9jcDh5Enyd1yNhkeGhEcr4Sf5QXuEcGtBxtcUmAXddiEK73f7LuRzbCu+H3l
+IOrzZ+x3aMOZ/VGhG2DF1D51O+Zja23oF4n8ssL0bedgfqR4IB79Rk2qv0qC
+ORZtDSJjlqTNHbi9Bx6aWvILY4Q8j1SuLOzSHOn63iL04719lk/P49p9ixeG
+mFePY543fLq+aW+nAc6rP2BYQM9zRJVar4/5TG8OT4TVoQ+EzXrIw9wZLoLH
+K1e3vtBlSWzFjWc0X7g80mcLXLNTHaeP/EWZeddv6KC/V/6OO+DGx/JdIbAk
+K/aKDFZ76KTYwPnzh/zaYf6cTZ0FrDAPijbCPKPKA7EF+T9Rp+6AZWE8m1Q4
+VrTOMwPmc1etuUfXN3XJS+BxXnKiL+oLHRfWN8Lln3Ga7sKcgcRzfbDGNymI
+QX4Lp5aQx/R5eJK79le4eyHNSwWzoQsnbdFv0djTxiZa365MnA53G/w4WAbX
+9SiKq+Dy+e3zR2F1ULtnIyzRDGgC6fcDDIevwfw8Pb2VsMOm0QcSmI33PDuE
+/qouRXD1YYXpSe9SuHXbhEKC+jKHossHYU76QnA18pbfPSDcBAt232F70Z+a
+W3/LCBY6G316Txt9iKX9I5i3Q4XtTL0Wcvp7HuuA73cMzxQTzEee8LKenreH
+yGfoHUNkrg2TtXC3j7LpzFuGaHrS25vhojzO6ohZhuT3nHd/TB3fNRKoYYih
+avYjLdSzTnczyXjDEFVHr44zzZsjclJPM8RlRW9EDNxdoCQlUwyxyO0KuQRz
+raTvql8xhO+alEN/jy6nc5ZZUg8+i7aj8zkk+lI1yRBOYKR/LHwxQ7MwCqub
+si6Uwq0Pa0t9sF+Rw52h56N2K81/COdPdFuZOOM5tdfYXUY9xddG3u6w7IuM
+ugLkYZ+I1YHwxUcbPfJeMyStpN5BRL0/q+EU8gumQy9EwoLUiu8OzzCkdUOm
+KASeyA5t2Yx+WfkyUy/qI3YNXfCQoHFwJcxPSfC0+ZshVbwPY1/S/IuUp7mw
+NPfI1Tp4KPrA1gE6rxiDt9lwmkl2OL1f98cO/Tthybdh0q2oJ9AXjnNgQaHl
+3GvkE+6dUv5Oz/uvuO/Dkb+7j5kug8vFi1Ol6Nf/dsr1I/DFMWVUwgTWC3a/
+CYeHXplr4sbRX7ha4AeTthXLO0cZEnXCUuVF9y/SZNg9RZ6tN9b4wFIH61b3
+AYZMfMPbEET3Z+iriu8zhMxm59PnTbpHJkxSMkTCWPIK6Xq4eaXzLZxnsLG8
+2fH//5EzXv9dndh/AIX0Veo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.9412613040609137, 16.101506520304568}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Qs0VHkcB/B/5FGhmWS8a7QrTkpjk93Ezq2k9kzlYhWVjCK0tlQe2dAU
+SrY9hpZjHTRGG0nLZotNZbKK6DFbUauHQaLjsZZk8tzv/+zZOce55+P///9e
+994Zq90HvII1CCHh+KNXMjiNjyHz39WcIXH635wqg5m0Y9eC4WI5R8LAiiTu
+4TYzhvjWx++unIf10oSKSPiGxQoPM1isE+dkB8/vMLgUwWUI/4goXxvmn7Us
+quUwJIK9tFIXVsojq01gxfXmVnu4atRs9QcDhnBaurgxsO7TW1Ed+gxhD8e4
+vqDn2wIlGvBgVM9Hb9RTNStjX4Ae4hUcyHwOq99U7Z2aw5DysZC8AAuGSEWK
+KBXMnH4W0wZz1rds1cB+gfWh6S2W+P9G7xs7YZWvg8kFmO0Oqn0DK0oNV7yG
+pX3vz51BPtl0UdUQLA7IPOmG+shXhd7tsKBJWDhuQOPc5ZXQ/YkFywvm4vyX
+pUc9YHKcvT2P9ueS5dyC/OGysFOusPJizaQb/HWg/zkRzM8wGSlE/eKCMOkq
+WHBgnecE+g2fcOnTgqWL3H/ZBm8MPXF/N+Ir7UNiakwxh5J4aTzyK54u3OIC
+P5+0Sg1GvdK41vhmE4Y05Kb72qAfkhycLIX5vo46j2djXp7ymxHU+5aZRs/C
++T2Wn8TAqhB13Ke68G8z3eWwJG91bL825hZ0PHAALtcWnW/Twpxmfcz2Qb5Q
+c5tRbVi13WubErZ1mjEnfCbiXlne6IN6BSTnB0NYkC46+BK2PeE5MqmJeUW/
+rNqOfgXOV2Nt6P6yzzLr6f1UEc8Uuv9WmZE55pPiUWxvhPgK27quLfCgWedY
+DcxY36nYBatlWZVHUF/5o/kxG+l+YpFkr4N4m5ek61Ef3VemhCXDgfWXEV9l
+5Vbvgf74emNGDnDoCoez+bD0FS8gD/WJjXf2XqFOGxwbQz9H5hb7n4Ql7msF
+3nS+BxOzeDBTdzavDPNgrjecDEZ8Nq4/1xROGVrjFot6JLEdl34yxrWt8cIO
+1KtUZrY7wT1PthWboj/Jw4SjH3h4rs7NzqjVwPlHrikv4Gzrm5ohM1CHXe/V
+t3CD3f0uY4I813Q38HCeDcotbZwUEtJ9z36vMa3Dx716XEj4VW+9lHRdI/QP
+kzEhYWWNA5tQj9hhMmhYLSRM6mPuE5i1ffKdNxyh/lHgh374fX4vv6DrCWM1
+zbBUK7Q3BxZ0blYKMQ9FHssP+ygknKzw/DS4PPkw7wziK4Xt3Bo6L2dX3W7k
+H+zsWdhI389dx+R+qE+11Fy/DGYNTnBrp4RE5n/m9H5YEpO8eHpaSCSJsp/n
+wA0d366Kpf3tXy/7nj4/Ikfz23BEUHX6CK2Xyz3+gK4/91Z7wqF607HZMGdD
+lH0J+lXEmbrwCe3j/GMdmP8wIfEh8rFZznaRmN9g/rW1PRPIZ1GSNmqE9fcV
+bnLUT6aGVdkwWeO01Bj9ciz/MvWHy5cPTQWP4Hxl76Q7LJV5LSsfwv4l8r6t
+sOLB6CHjQSERJ7u/SIVVqvGgmF4hKb9rHf2aOuPG64PdmJ9e514R8ouH8vRF
+bzCfnujqe9R7NE5bdSD+bY8QFvXKjp16qtmO+5EU0NJM6y9Ojvxbhfk6KlJY
++v4tKuL9Sdfr9C9X0vs5NNyU3AnnXizTxLzESf7Mqy7EUyuv2sMk9V5Tbg+c
+XjnhCCs+tCxJRH2qlnyeEcy0qeWbBtCv12wNJX3/m/yKdqAfWX22aRjN12p+
+Yd0/QiINTXnVhXoEOZ+vvwOzh7bnbKbPc9yO8QewuJkZKqb9PGvo9YKZ/lZ2
+BsyJnM7yRDxGy8ZLjHlIBoa0Zf1CfD/tWvxoPvIt+LWy6h36UxdN+MCyoDCu
+CeofZAwTxunvzEih17s21LPWP7DOkL4/3bVmzYh3kV1QAZPfV5Zk1mG+ucV3
+6qnpR3rz/9+tfwEFv4pt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.075655548348861, 5.165661129127848}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.000000000003638`}, {
+          12.000000000010914`, 14.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54353952593509, 16.112427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1AswXFccBvCrjYioZjfJIqwgmRAJwkzrudZV2qDitTHtILVeaZBhPaKx
+rGFI0xKtVxEbsolGjdjYpmy9GiYeFdKZVbQqKtYWExK2mso2pPod0zuzc+c3
+59xzv+8/O9ciOjkk7jWKooLxI3fq1RYuK5ravtg0VbA3s9vnKE3JmkPk0bCL
+596IGlgSbc6ph1mnFwfVsPrpxSfdsF7BP2UnrbEeld4ihUPrBwJriDUCtww4
+UeH38x+w4lnm8gH4r7SE7MPHaMr8/bqKOhOamj04JeTBgo59Zm/A7y3l/Z0K
+yyLG/000pqlKd70TeWT/o8HSoQM4p6igNAfmh3gn2cB/sr2+OQ8HPZ+S3jCi
+qTJRDhVAfDuRdoAFLxJ0LOHZGAfenCHuBX0DGuQxf3d5ogMutGm+PgxTlpGW
+nfCmY9EuCaxO+22R7OeGzjiKyP6gSF1ynkZlMR1H/Kb1yzo4dLVmPoL0u6na
+dQR5Wve4+8US94YvdsDVX2s/yYb5poO+PPQpMNAXNpDneVuVCzDLOrD8MSzr
+f1kbj/7DblO9R5CXCuN6j8FazAd3LsC0c48FG/PjfuUSPQLnTn67xYUd5Cmi
+Q8exzhh1cIHLmPWFGbDi4qH+3fCdt/19+uAg1lGhHOcFHzde22GDOVgVX/eE
+q7bO5TnDue6Z0u+QZ2GDqQwn60biYRY8fpbBTCLOy7JLRZ9PXcVOycQx5alj
+6K8+V1LHJ+ZOTnvB1yoja71hgZGy5SHmV72xKjgI238Zd+UCHMJ02LFG8pi1
+rHjBZ6P0pCQf30CucIVPqWzmqkj+Y/afhMG9M7dWUrfXNeclcI2voPFDWLbM
+lurgfbUdD+z8iZceaD6D8yvutwaS/cW+PBPkNXlRER5LzjszJW6FV674mBXC
+Jen6bn7oN6+n/qUHFggNJ0fh20sin9eRl3J+rvsO5tOXPxMQDCvy8jVlcHLV
+wz0NMN9wcu4efNrgR/dXpF97V959eKz0XlSILfpdVXjUwvtGiqxuwL2ff+EV
+DOe3MRrn4dwugZ8K7+M46Tez7fB/8Bz5IAzeDLBTecGU9vecHuQNLW/UC4Nl
+UaZabLhd2K4TCTMWNp2y0Le68OpjHvFmjN8i5lOcNt7iCtMJnIF4+HDX/ksG
+5Hn5aNtueD5szWoZ71c3bZkpDGhq/13b6W5Y0s+t+gG2tL5rWAIzriVrjcPR
+Sg/HeJhvnX2ZiefPiCfs/GGFaqI1BbZfnwjkkPPc5X3P4IRAwU5iQZQuU4R8
+q+msNrKfPuUtYyF/QFOPOAmWPfVmSWF9m1tjEth8fXbIGf09RJKPlGReQwx2
+C9yU4eNrS/oUdP6kg/mxRlJ+zyV9VrSrObDpzk7lr6S/Z7/YF95Yf6S0PYFc
+/V03bWF7t3VhDmwe+/FbSzjv5KXGhgGYoRjMyjemc7e/e/b/f/+M6f8ASfvM
+Jg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.72092184717428, 5.122174777394248}, \
+{0, 1}], LineBox[{{5., 14.000000000002307`}, {5., 6.999999999998607}}], 
+        PolygonBox[{{5., 9.9}, {4.6, 11.1}, {5.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 10.5}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 14.}, {11.99999999999251, 14.}}], 
+        PolygonBox[{{7.9, 14.}, {9.1, 13.6}, {9.1, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 14.9452}, {0, -1}], 
+        LineBox[{{4.9999999999976925`, 7.}, {11.99999999999251, 7.}}], 
+        PolygonBox[{{9.1, 7.}, {7.9, 6.6}, {7.9, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 6.0548}, {0, 1}], 
+        LineBox[{{12., 14.000000000002307`}, {12., 6.999999999998607}}], 
+        PolygonBox[{{12., 11.1}, {11.6, 9.9}, {12.4, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.9452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{5., 14.}], PointBox[{5., 7.}], 
+         PointBox[{12., 14.}], PointBox[{16., 6.5}], PointBox[{12., 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfhgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfhgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/B3HUIGIyqJHMJg6OgwOfQOqRxKIpqidhwqW2hqVZO0OUah
+RqWwQ6OVnbUJ0aZSqaRJJ/qy6WAb0iZRimpyWPt/vp3rcrl+nue5n/99z2su
+zCK2Bm5QoijqIb7I9/9ehlxKMY7XdC7Vot3sGjmNSwXo95ibGnEp0/G9P943
+4FKcCyWVobBoUe8xLzjzsF5aNcwbzO+9PxUWNs01Mca++13tsXCVw69GJXBS
+D7+MBQs7K6XzZnApSXJi4NgU/HzQKf4BLCywSfwAt2z6ThxnwqUoAWMtWU+c
+25EywZRLDSyMbbTAeeqV6M+VsLVOYkAELC5lCo/DLR5Ze6rhOd8pv2uF5cHG
+3QzkG2LYs5TMcP7wYE4cvCzU/JwlLJrdYN8CK+oGq13J+k9XhWz029038HUR
+LGd5xifADfLPSjQsUQ64fgGOD7L6Zg/XaafL/yLrazYVTIKllR8398FyS3/L
+D7jf22G6O1lfdaPQq4nk26lypAZO6yl7VQgrfHoYsbBDn0BbQPbLbKsZsNdv
+k5u9Sb+sN7I8Mt81kvcsOMkl9DLpR+yop8yETU+4t+1Ev9KOrcbKMC/2iuoz
+zMvAZpVMCa5LSDjqBi/L2P1BB5Zus7lfOplL5WtpP7aF1dktFw1gniJBIwjO
+P3DwXpE+l3I7fT0hg7hIfJIDG9FsIckfneByqU8POZ8X3dNCv5mP/46shy3e
+ZD5dS/rPKcqQwtEBanXlsEGQs7SKrL89um4Y5iwv+PsR8c59N5aYY/5bIqYx
+UJ8n81DPgVt4vUOrYYHf9aJmuD3thEc1zN/W9P0Ysc8L40nIKxqlamfOxL5P
+J7zj4bBBnyI34v2zBK3wvTxz2VJ4QGNrykz0H3P10aHFxEoh36LI89b1acgJ
+5th1mebC1raFhcYwb8qBwFLYK+/RryO4T9AQNlMMM0+HVP8P5v/wc8ouuPbm
+wAkpyV/Buu0Ei/cZRO2FB9oW/v4c98sXF5gEw9T6X5x+gF94sirnwZmeK/Jf
+oR+JlazCgJw/k/txBWx3+i8/DVjRMn9yLebDke2eP4F4Tbv7FLjx7JIfmXD0
+I+driZPwPO2bvc0a5j4x/qNfF/lnrXy9nMxv3PByHCydntmxjzjrys8qMPfG
+xjv1cFJZi3ENk0vJVMZzlNBvS+gvDxPh6LxUiT/snVXzJgJOcxFYFcPRviGO
+G+CquyXT3sOmX0xmpsAi9bw4Vwvk3NDf/Adcu6bHJRWOXicyHIfDti94dgPO
+vO2vFoL7A5qydRSw+lHp/fOwfn2+mZkl3k9ldxcD9JPtd3jADRZMdFTshAUT
+glT8YGFTYOddeIAXdYR44EO1ny7mIQ5320PDdXERKz1huw9OtDXcs2WVdij8
+ou7EOzWYcz6jlQefSS6kOnE/f4Uu7QK7VbSt/ANmin3Cx1E/LeenroNwj5Gv
+9Dd49EHgtXBYYXX9iStsGqze7g4bdFDdF5E/X5P9zAzOz1JqsIbFvIU6THhO
+cduMQ+j/2O0H9EQ4YJLZarkOPi84XWJdWCAo3VmujTlHdFdZkfsHQ4f3a+Hz
+o/EBzwcemNu/OpmB3G+7bgnJ+szsrF80cc6tM6MGrhqsKPg8Eea6nvxK7FRs
+sxe2q1573BP9BhwadneHX6RekeSSee4u1naCrZ+FXe2EG7Z2qm6AhbeKO2db
+YR5TfTsbYUnFp8m74QC2wdBy3CdTzD59CZYsXZv5BXbY9deCT2S/3Y01Ncg3
+xLswasxCvyILCyHyz1Hv/d0N5roXLOSgP3Xb8fLlsMgm1/UNbLEud+JKsu4x
+nL4b8+BsTshYSlx6drAbXrZ7X/I8OClp+BQT83Ob/emtHjkf0+GtT55PPXP2
+e9zPDI86+BX7DdY+1miEKZ/k33Pgvl8XpeTDLc2r6X7cZ9offioOrrIb9JgO
+R3ktiPSBk4bMzU2QV6qxKpVN1vX2RyqhH6Of1aKmwqJtXlYtmIdXH++dNtmv
+sbHwmAbmwlRs0SP139VtCFPH+zSQcsyS5NHsUnZQw3zDXm1cTOrR+6xZE/D8
+9DtytsPybBabq4p6i1wvlhOnF6ZlqCC3tGdCPzyn/nikMty+f8kNJ9Kvbun6
+C8rIw4ublQ63+FYtKYWF/nZBbXBVdb2RDG5Ydcjcwhr7V5iwZ+C8NSP9ZBzc
+UjfV4yTcYHJW+RwsOdWo5alK+tzc9Q5mhg7njcAcVspSQxvMKcjq2jXkrTd/
+/tAVDhgJ70lGPwqPsUsryPpOi4OO6LdH7dhQMMwvqXz8AG6g4yaTdZFsw+JF
+mE/apY+hbnDSWyn7IOzlHCE2gZmq56cUwWLGDZsR3C/QncgSwrxcQV0r3JAa
+ThvCjcu+uZbBVbNuTUpHfaP7N6/vIfnjJutcQR5O3h7fYFieq2V5B3mNPk8t
+dYSTjA8IzqEf/sfIJSbEJetupaJ/B0XTfH1Sf8cuKx/MK37/05eT4YDuYXsd
+JfiMmrEluc//bWwXhfmzbSd5kvrbA08VjdNU2oxCTgy53yhf4+oYTcVUP4k4
+RerVaHQ5j9JUYvvWu12w6f5hkcEITfVFRLHZ6JeKcdoUPUxTBueH/xSSeWxs
+cbaF5/DTXsrI/I5EO4TCma92cAxscf5SBXMQvmf/pSMS5q7nbelGvVHV8WEp
+LFkRu8sY9/Md7bReww2zozsy/6EpeVu8yhQ25pmSF6WG/FFj7utc4Cq3Cs27
+cPThvfNXwkyF5E7Kd/j76fLI8rUwN+dWoTn6T3SzNAuBG/5WLT8JS3t97yyG
++WFtTwdgwYYTo7ZwwKYtzjqYX/6smM9qsKlHQeAXrKtvdw55iTzyRd07SuEe
+Cyv1WpJXbFpvCHPMVk85AIs27lFah/uj7fkZ4SS/Z+mFbchnt0TTmUv2547p
+30Q/FkOzz7HIPJrqFbGY76qxbVMMbcnvSWzdyDeaktbs/UrmJT9SHJH+laYY
+9/T9LImbKxZYfKYpWXpPGE3qBYfGD3yiKVP7580bSb2HWZrUR7w/R9sPFJL5
+Ule9776nqVJv9cF2OCmq0vv7PppySz7XboL+qKC9Xx700lSj5cOSGGJR+mpz
+uF2pa3M9md/cxLkh8ONpabYMO6xres0Pe0dT3uK7T3jEPJ3y6f00JS45IzoJ
+cwdbL27/QFMqnNirHcRtt1WMkKdeme+kaw8/Zm8qRl7+66XBHLhBmpnDGqKp
+btlE/UA4ya2fXYz+GJFn9dfDVGOX/O0XmgrTHSkLgyVZlT8MYR5RmQcb/YmP
+3rpcrqApio5XcSJeuvvzGFwXMD9DH+b3mhh2w8Lam8/7kKdhqr+IB9d7+768
+TvIvGA0NQ70hB3n+cTip+JzuF9yvouSnF0f231mfOhf51OelO/nBkvR3tibI
+b1QxdmoOWf9nsKYM/Qq71otMST0Tle3NmFe2bkq1EXGC1uLnr2kqv/PjDCtS
+n13WqtmJ81kMH3fi73VXGz7F/Nbv+BROnH2v1aCVpo65GM0/Ss7vFEmuN9IU
+s7429SGxXanZtVqaitdmtJL+KPXskbFCmupJ8z7OJ6Yc04K8rlGmxU2jlf/3
+f69R8v+NPfdfycmXuQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5107511663023216, 12.046515310090086}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4lGsbB/A3VCI1GFG2EWnyUSRROs04kiFpjqVoFTqWEyYh7aPl5Fiy
+HNspJDl2GlkqRVPJfjRK6KAmWiRJQirL93++z3W55vp5n7mf+/7PM+MdLfcA
+hwMSFEW9xC95pPpn8LOYTQ2Tx/+wKTbLXTR3CTzaFlgGSz8zcv6K61LJ6yK9
+4c6RUMUW2K427YYGLKbWpEfBha5zNzzXY1NmBQtj18CjM1W2l+AJ2Y9H61XY
+lJCaqfSAhUUDtVvgqG8VcqZk/Vnt5AfKbIrZqOGiBPcbVMYbwTohQ6YzK9BH
+x5KbaYvYlOGN7OZRmN2ZypgPH7ReXzEG3ypqexKmxKa8a5YtnoXni8ZGwyTh
+GkF9DqkXvjluXyIdczAuCYzg4abhwfUwLzbN0FGPzPeqbVyRTenftn9/BGaW
+FrU0wufYSkfTYGrAO/ImfOJfk+D7sMuIb/FdONRM99wrmHeY1doJsxcvO/ID
+ptHexs9D/ZS3M/vlkA9TXFmyBWavkhQokTyrPq68DNMMVpsowtzQOce+wOFz
+Zcxnk3w9UzO3oX+pL1bhH1CPPa59MR8evbzNoxbmxIavmoH1TS1iksg83Wuq
+OcgjJf0vyz2k/zGjgTNw0J+TGmrE65bJ5sPDhjFKz5AX76A+5w7s6SvYFQHX
+u76pKINrjMa2boT5Ifa8RFhQ57fjC5NN5d5IvbQH7j5n11EAu2hd9loA29nJ
+zfWFKePsuaS/oCOmvavg/ghRnDGskvWANrMc89wy6S3GfGsWyzzrhG+tHQhg
+wGWFitNVcK6vo1o08qO9uPeiGOYYf5/6poD8TS1tC2B+juqKg/Bd54VJN+B6
+ulNovzz2SVp09SHMHK/ecRjmyKiKu+H+gqYEGuy2/oz/JNnP7umahzQ2NWkw
+vpSB/lIsVztFw8KskWwrWFC0ZSEPFj/5KZbMw+PzQn6DNymZHo8i80qvjD4F
+S6v36OTBDEtZ5xy4+Wfe2Wpy3YLd1wuPfsjqbiT17I/zDbA/92RQZzPJw2xn
+6xk4VlcY8xDOYL+c/QKmW+smFcMiZo/cesyn9uuV6WiYm6gpioPLeIKd7nDo
+9/H9Ypjftb5MH+a8a9yghbwSWgzODGG+iVrfAC7Jb+OfKXmwyiHJBl+Y45lN
+dyPXZ7354QdLb262opN8i9IqXOC2ae+Eel3M89eOG3qwaOSa12mYNtVd/hr7
+2TWZyZrD3ASt6HB4fklg0tQyXK8sGlOBJ9Pcn9XDnDYh/y/yerjYmKTDzJe8
+gwvg3AaZ8lOwyvKA4BPIJ4Pj9K8vTOW1bW5diHlYgwXupB4VpiNYgPNJ9yk5
+QK7rFQVdkcP7381hIhAWVL4Nyp2P13NTkMYfcEZLh+1TWeRnMOqWDbMdIwp0
+YaHNmeukH0bmrvgcGfzdr/3BRzjW/I6MK6ymftZEEfOIOiUWboBpdrT0tTAv
+UHRyG8zxsshzhqlpZ91YuDvL29gfjh1R+TABc4dK952CDaNyvp3BfjVdwYXn
+SL0Hb+i66K+MdlGST/LjNQx1wncPb6wNIPWlyqPjMM/usMGnjqS+s9ZtK8wb
+qn0+Up/UY371/gA3iw7XfUe/biFdq48in3qBS9s9kodFneAtTCvodT8JSztu
+9l+EPGtMvYJN4JR4o5XasJoBZTugg3XKqS+U4RP31X9Oh4Xl1inv8PzRpqR6
+R1gU757pD4d3/2IqB7MHzLPqsL+bTXZVszacIb/7K/p1iYniJMCMnu82UnCs
+8KrfAXg4leYzjvnPDfe6WpDri4I725HPwdk9NUxYyBs6cn0e9rve3a8K837n
+noiQxudD+WH+EljsYEsFzsX1Y/4N2uS6wCEpYA7m8lwcvZb4Fw9x5Gz0eeW4
+wS+knstnoxYpnLfx8YpDsEBGm70BpjhRY4mw6E1233NJ9FHXHXUHztgnGsqF
+1Xb2yoth7pv7i/Ngt67Ny2ZhXu6z47M7Yf3fzKPViBnXnY1QL+hsxVZDmJ+7
+XlwMM6do1ethRqX9MAf9uL1cdJmYp7n70jhcdrCOvgo2dPtJvRj9M5+s7FCG
+M/4ItTuA+RI0v8mNkf6D6DPyZP6IZPc6ki/X9lQ+/Fpy/lgMbGi959My5JWx
+M28bl/SfuajsBDyxcOt2GdK/S2NVLpywtcFIuBT5Z+18/Dc8OWefWRBseNK3
+4BDM9eS0MWFGY63+fJj+2NtHrEX+P09aH8F+g54W5mkwt2HOeAX6k6q3ctoP
+G66QnteK/p22pwesJOuvPRtsxnxmvrZvZ8PUtsXbS5FHbggvo5+B8zV9uC8a
++RWanZDtgAWfC8p+lcD5FYYotcLiwr2T1rNwvqSbDNph3vd3seYUPodj/Le8
+gRkNPInEaRbVn6s3MUls7eT5bZJFhRtHuqliP76VnHzJDxYl7qnx2ggzyuo3
+P/rOojJ6b1d7wG7mfzuawzr2S6fCSb+FH3fRYX7eozsF5PnX87duhbm/5RY3
+wBlXFSRewkF6tGqSB3/Bwchq1N/kYK/+CWbbKxb2YH/adte9X8j6kwmH/oP+
+XAz2hQ0Sj1t8TJhBvYKcmeekH1XTWWfJPD9xW++Qfj7fZ5hgXrPUTL94Ur/X
+qa8d1kmSqN1L8kvZMG8f8kmVyjdfCguCa30ewW3embEvSF7FK+wkkSf38pW2
+RJKnU71Akbg90t6W5L0778IXrA9dcrhuUhP1DJ63XoUZfvE/vGFu+KZCTZj2
+pVrco4H36c/Jljzsz7uacG8fnLH8WkkK+hWyHR1H1PE4Ly6ShXlCbxlfTVEn
+5/tksOoUi/JeerLDCc5IbrndgbwmHghNmGT9qjGb8AkWFctgzygQM+qSLMaR
+V6B8KB1mVzWVKI+yqHoXrY96MNWZGqg+wqIYaytrHcn6Tzl5HsMsildemxVJ
+rmfRnwx/ZFFsictnW2D+7mvtzR9YlJlL6Ttl9EsZ2vzkM8Cict9HLPCA+VoJ
+N5resyjpJyFLC4jpEcGfiddyAz6Q9T45wY+x3oUuSNREHsLXe5scBlGfEVNp
+CbPHfpzfP8SiUjwtS5xgtxrFPj/0w+lQ0ODCGUW/R7V8xn43e2PWEPdcl2B9
+YVG3WIMxs8jz+wq68zEfI7Mp+yb2c/untG9qDFa8sd2FmOn6Secr8ir9JvOW
+5ClpVbEAeYnu/jPlQfKJS4oohCnr2UrtaujXo+vbCCyYLr7JhtmHRDb/kvWP
+VdNzVXEevl5q3gtPNASmK8CUbK90GOrTDk0fOYv78gxHxTIr5D/x8tAVct/O
+cJU/XY7+xDWuCyJhvsPxm93IP7y9UXkFuf4q+X4j5s110N3UTe7DX69+tRT5
+pzw5bZINU6YPw8P7cR6iWxMvEN9X0PvUx6LcFO4v5KuQeu/bpl/g9WdaOlwk
+TtB0FLbj/dA5riEg6xuueT1twfnJv+TeS1zO+BHwAO9HxbjtWtifOqM541+C
+ehvn5HsT06o2iC9i3qBxQSmxKPnd+ah7FHWOnjxFzL++l/PnPUocfiDBAvNS
+lPx5Sct7FNPYWes4Mb20/v017HdBlplNrKYzUHMLeZh9MLxHbJXGL36E83bK
+Kfzh/9bvurNChDxi5HeXEPeHPep6hs+fbP3HF4iXa3qldmGerB2S1jD/YpxU
+tBjno/6U8jDJU2NqXAJ5dDYkqp4nVqh+JPsG9Qq0v0vD7HNFogtvWZShc5jL
+aZJv95rgPe9wPm10AgbxPYbKLlp2DFaJ+LvLiTggyfgp1nOMj/pX4T6aypi2
+/BX1hkOPjevBwvjVPuuwn1nhhfmZuI/m18WId5J+/Hxe6cKUSvaQ8Dleb7fl
+tCrcR1NlP9b908qimAl3Q7yIe5vLNyB/b07nIiYx+eFX/f/7nSL7v9BwJ/Q=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0993812489835673, 6.458569381796186}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999992724`, 
+          13.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.81002436929973, 16.075547199850586}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1X00VHkYB/C7DpIUabyslZi8TFOKTKWi7lJMqKymVydHhgmxstnJtpOd
+JuUl1bSxXrZE7Wp6URaVvBQ6aRJDZWRzTIqdYzPZqUaLauz3t3/ce8/n/O59
+nt/zvfec6xSVFBZjQFEUHwe5/n8Se9CULYEdTd2ZemLjYdgx7/rKX+BVHyPe
+5sA9DSkG876iKWbXr4ozcOanprlVcM09j6xKWBzb/XiRPU1Z1FHidjg0UdZT
+BJ84bNOtIfWm6Nq1sEqfITL3pCluXoD3otk0VV18ZBUH1oavu8KDRecWdmyH
+PV4b90TCpv5xPWlwhVeylKwbTmebnofFbOqOJzwjKmVeM2yxuyv4I+oX28Y7
+qOCadduMbsATEQ+pUVK/vC+eD5vxgpjGizFPGSttGiw0EljPhMUfvLIqMQ/D
+duEtK7ixvOHlTjh14LMrA2a92XDVEq6uf6swgwv4+0uVyOfV+JIdFLztbu+z
+yzDHh3/tH/RL/ZSWlwdv8Fz9sheWtoezC+C2pi0LWmBv/ZiyCo7mTKquw6xw
+19tDMMMmYmMRnDme3rUE/YyHmY+Owp13h2cVwkNzSjOFZN6drgJz7H/vdV1B
+PNz/bPJFLqx92tHLJ/kOmvztjHyGog+ORsGxA3Z7a2EfTnZgLCzvX+0S6kBT
+11LiNPtIPobxN/vhWKuAm0dI3ofXmO2eg7plMzzPknkqBekqWLjrt4u3YV2L
+22knR5ry+/R2/nM4ujlmiAvLGo6XfoadD6oWRhMzEluZyIcxsaXvOzg72nYz
+dzHpnzmRAn97vH44Ab7qpbTfAw/2J/qfhM8k5fC3wHLzEfY1OMHyy3hvWLcm
+pEAO0+nnlsyCU9rvVffB3vsfrXyC/UnbvlFryPtqtYr5Aa4ozO0ehbkPJSud
+4DP8MuEYuV9eNa0D8wpZDyZ1xAb/9mXAAQcU2mGYsmnxIflIVktMVHBkxAC1
+AJ6YPsu3Da5IFrg4wDXr5/xxi7z/wvLfWbDoeG1ZKdzfXiMIgVcwpycfI+ut
+2gVZsNrXI0YIh2oUxX1wp/B9Kx8eawzkBWJ/fvLlCh4sE3HfNcMcQV5yEOzx
+11GWK+a9fLJOshY2WdaxOQnWS3inAsj32u2yp5bk0SQdWg/Xpw/WGzrRVLdD
++7FwOHOKvSwYzrFPWJpE8vG9VZEDJ2xSR2TCIZWvzt6H7V6M+JSRfJX7Tuvg
+J2kxTx6Q+tbubrZM1JtS8YHkU5A/vHcRzAkc58/0wvNLjaxWMMl30XB/KczZ
+Fsn1hq1NKfkO2KfUWsGGm2OFriLixoYRS9jSwqiuEKbYtXHv0E/WpMquhPsf
+++96BNNxNx/fh7n5X/iVwOLGQ6ZP4XRR2MV9cJlZ3OifcOrZQ75cWEuXFD2H
+qzOWX3CEF1tMDVKS581ygyeRD9vtfH4rWT9qH6WGG9doeHWw7XLDymdwUa40
+Q0b6d1w41QULDKp2noYdR72e9sG87u8dD8LarXvq3sM/53JddsMsv0S9FfoV
+vLl0JwzuUcy/5w+HqE3dvybz+diU/wgLRn+SesFm6ivDdbBz1UAvGzY54L7R
+AHmI1uofusGMpvO7QmDTS+5Ksi5r1kny4ZodI54cmGegNX4J03pJmz+sG+vc
+5DoXcw0q122HNVn6yWj4dUz2tBS4JLX4TRGsEZsvI/P0bJVHtcDSzqi7N+Dc
+qX6z1XCLHSOZ5FeiGYgchw3Jf4GD/ZGrM/0fbeE9zg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.236190257669733, 7.2638097423302685}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1Q0w1GkcB/C/l2t211tIceccc8hrLVHI6J8Uxp62Lto0SS9swx2bFJHs
+SQllHN0qb3db6c5LZ69ORE2L2tZrSyJutpauQ5lahD2jc9+nnfnPzmee5//8
+Xp7fzN/mYMLOaG2Kog7hIf+ULh4hm6YYBJ/TlP/rt/mVsMPQ45ZpC5o6sbac
+7oDNTbN8umCrDLV8Ej5fV/DoAmxdcvyDnhtNsad8//KEd37hdMcefm76cand
+nKZkWunrfImnxL9yYG6lcU8IfF5XZdC6iqao3X1OYbDD2YnP1sK5TVrrebB1
+5ta2yytpapRjaUvWNTMRFbrwVZYwgQNTXbsHk81o6p7FbJ8frEpeEzG/gqYE
+JuGbXeHL5bvPZcOpcQ3D5uT8rOFFZ/hPx9yX2mR/3cCJMVOaqvjIuUrq8XrD
+v9EMx8clpAzC0p8Dv66CtzWb1jyE2YmMw3Ww6vm+I/Uwz8D7YReseD9XXw0X
+mDsU/webP9gfTfoXZHRs22bEOzgjYt2An/vopBXAuZtOz9bCas310DFYLgpe
+0wQL1+hk0agnys/meDeJfy27VQQvvF8I+Ie8/23S079h/+KcIR3kLxCmKe3Q
+j3ezSxvsiP1dy8JgQ29/n2CYK5EWCGBF47KyeLjgO5ZTErxes515CWasHRyJ
+hD1+KHFthI+4RoSyyXnWxm1DMK96zH4C8cpqLcTzsPDwo415cOqrovbl7uhH
+avwBC9hjxD3JFqaMvLjFqEfkl7DKHY5itp9kwrrpNfHesPBmyEAS+sMTBKT7
+wJrvK2pemNBUz5XYfE+yv8NgBwd+uEHm5gz/cipoutUY+eboe1rC49LAXYGw
+VeuTEiZMT/ZUKJejf8rp/A+k3g61Sw58LnHrnhfkfrsbYzjwrluqUDnsdeVm
+pQPMmJ5svQ1LjsbYWcFZ0vR5MRwU+YpygaVn3YxIfzQrZb5cWDToReXBy7Xn
+ldmwoGxPTjax/LbeE5gbE+eYS+K3Z260QX4p6363KCLrHWbRJ+FL7r4hV8k8
+J3du7INNmm/zG+AUxqY4e9TrozZ+1gsrbN37BbDDV4X31OR+Xpo/roXLEres
+MEW9Xvxq7wE4s3SsegN8pMV4dgI++LbQcx/M+HCz6TUc7p8YmQnzFu7tk8NS
+HcP+Slie1an4ES6s2MuTwaqL2+23wLZ7pnpGYcGtmKwXyK/kzd3gBVhyJkCf
+D0fkiUz11+F93dg7KtQr6zzeuIpYtcmO9Me2NJP1JSyUeaqSjDD/LmxbS1gg
+N+4LNkT+XD2+GXHd0gNHA9yfKjKZCVNNnC4rfZqaW6H0+BfxFBmDq931MH/j
+Yslrkt80syqOhTnopGwUZN7ucBJ7mTTl61f19C7x4lQNH27skVpdJ/NX2rCL
+Dfe3le0oIPlrPjo5w/bLOiozSH2nG+rC4PAthm7HyP7H7/xr4HxL7aE42Hq4
+nGeHeO/GeoNiYe7etLZmOH/hykQ8rJ7km0Qjv7maeuVJMs/f7FhcifxZ4vVL
+uSTe3uZnMjh27KcRMYlXJGHFot7F8ryB+6Se7t+K52DtmWezShI/jDp1CP3R
+vi9arUX6wR+1roLPR/Wy7WG630DSAoceSG0JgdUNheFk3UEr5YwAjnK6KIiE
+U06NOxbB1objpSM4fy5gKeMW6fcw9w9PONT3yYluWKWovbYf+Y06H3Z7Rc7T
+nAmM0SP3KjacgSVpE7o7UW/o3FHJIll33J/sgv58+kh40NSnH4P+H+y3Mbo=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.263809742330267, 3.7638097423302685}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt0w1MjHEcB/B/kkTZzcupK3OnEKo7RJHu/r1HRTunSy/kiIy4OGNJ3bRJ
+b6SXUd5CRxm50jSNOmPdLqObqbxMpShEy8sunF2+f/Nsz5599nue///3/T3P
+I1DslSaPI4T442RXYh7DsZCSf4cLJYnlab+CF1Giq/ILl8Mmm91Bp2BjAW0u
+ghe87M59yxw763Y17LK+zn+JByWioI4d5+HLXJUhC+ZUrJi/F87MTmtthXVl
+ZQF8eI3PJOF4T7h196cGZ0qsQ/fnL4OL7of9XgKbFki4G+HKg+5nLvEoORRf
+2pkKi3Kr2yfCnw2FtftZfeZbpzQnSswzvibsYs9/G+vpc6SkWzhnXwxsDG2z
+JMPqkZ++PvCIj0RqBTepjKUcmG8/PbppJiUXZus736O/otODd0rhsqnVBU0w
+MXXFFMMBEllkMZwkqDXVw5mahkwlrF3uIf8B8ywhnrHwSGWUTIr1FZr5HRFs
+vcLCOXp4IDA0MIrNI7emKgL9Wjs9VCXC/Pah512wsEdQnAFHVw36bUW+lqVO
+/TVs/+a21PfwDdO87n7Y2Ds+Jwbz6bGOErujf6Uf59ItOPnKVTcVnORV7jsE
+j80aCHzE6oddsmww753FIfYzvLD+m8CSP6iPenE/KWA1v/GcEfa19Cmvw8rk
+V4Zs+MndaSUfWL3mkJAHp8wWPOUJkcc9oaAc/XR+ubdOAkd3iH+w95FH9ZwN
+sOilzQ4l8tSmHX0Xz+6vi4l7gfwTXOcelsFJ4s2rVsOv5Ro5hTnSKaNtmN/Q
+A9ldAazd/D19G/zuREW6GftTcV6sM5xvaBwwwpXhfanfuZRMy7TN1cCiZ4qb
+w7B3W/7PDFi7yUwccL9HQvvlOJi07IyIhBee9SgPYPlk2TnVsJ0kZas3nPS5
+3toF/bgeF79iFh30u3MRlk13sA9mlm3RLEKek3wvz3/zCjuQ2Aj7pHwpPQH3
+KoZTVyK/oyZYr2f1cPnADdhw0Zg3meVf2/HYFvMraGyyk7O8wiPqELghXGu+
+Cuu607kKeLgrvXMUrnywKi+evc9r3lauInxPx4J7FztTteCFzjYM1ln63QZ5
+VC3ds1S1Hdb2f4zKgi34fbNE//9fHv0LInZaNQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.630102278562946, 5.135413671377677}, \
+{0, 1}], LineBox[{{6.5, 6.9999999999976925`}, {6.5, 13.99999999999251}}], 
+        PolygonBox[{{6.5, 9.9}, {6.9, 11.1}, {6.1, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 10.5}, {-1, 0}], 
+        LineBox[{{6.4999999999976925`, 7.}, {13.49999999999251, 7.}}], 
+        PolygonBox[{{10.6, 7.}, {9.4, 6.6}, {9.4, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.}, {13.49999999999251, 14.}}], 
+        PolygonBox[{{9.4, 14.}, {10.6, 13.6}, {10.6, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.9452}, {0, -1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 11.1}, {13.1, 9.9}, {13.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.}], PointBox[{6.5, 14.}], 
+         PointBox[{13.5, 14.}], PointBox[{16.5, 6.5}], PointBox[{13.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfjghhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfjghhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/B3HUIGIyqJHMJg6OgwOfQOqRxKIpqidhwqW2hqVZO0OUah
+RqWwQ6OVnbUJ0aZSqaRJJ/qy6WAb0iZRimpyWPt/vp3rcrl+nue5n/99z2su
+zCK2Bm5QoijqIb7I9/9ehlxKMY7XdC7Vot3sGjmNSwXo95ibGnEp0/G9P943
+4FKcCyWVobBoUe8xLzjzsF5aNcwbzO+9PxUWNs01Mca++13tsXCVw69GJXBS
+D7+MBQs7K6XzZnApSXJi4NgU/HzQKf4BLCywSfwAt2z6ThxnwqUoAWMtWU+c
+25EywZRLDSyMbbTAeeqV6M+VsLVOYkAELC5lCo/DLR5Ze6rhOd8pv2uF5cHG
+3QzkG2LYs5TMcP7wYE4cvCzU/JwlLJrdYN8CK+oGq13J+k9XhWz029038HUR
+LGd5xifADfLPSjQsUQ64fgGOD7L6Zg/XaafL/yLrazYVTIKllR8398FyS3/L
+D7jf22G6O1lfdaPQq4nk26lypAZO6yl7VQgrfHoYsbBDn0BbQPbLbKsZsNdv
+k5u9Sb+sN7I8Mt81kvcsOMkl9DLpR+yop8yETU+4t+1Ev9KOrcbKMC/2iuoz
+zMvAZpVMCa5LSDjqBi/L2P1BB5Zus7lfOplL5WtpP7aF1dktFw1gniJBIwjO
+P3DwXpE+l3I7fT0hg7hIfJIDG9FsIckfneByqU8POZ8X3dNCv5mP/46shy3e
+ZD5dS/rPKcqQwtEBanXlsEGQs7SKrL89um4Y5iwv+PsR8c59N5aYY/5bIqYx
+UJ8n81DPgVt4vUOrYYHf9aJmuD3thEc1zN/W9P0Ysc8L40nIKxqlamfOxL5P
+J7zj4bBBnyI34v2zBK3wvTxz2VJ4QGNrykz0H3P10aHFxEoh36LI89b1acgJ
+5th1mebC1raFhcYwb8qBwFLYK+/RryO4T9AQNlMMM0+HVP8P5v/wc8ouuPbm
+wAkpyV/Buu0Ei/cZRO2FB9oW/v4c98sXF5gEw9T6X5x+gF94sirnwZmeK/Jf
+oR+JlazCgJw/k/txBWx3+i8/DVjRMn9yLebDke2eP4F4Tbv7FLjx7JIfmXD0
+I+driZPwPO2bvc0a5j4x/qNfF/lnrXy9nMxv3PByHCydntmxjzjrys8qMPfG
+xjv1cFJZi3ENk0vJVMZzlNBvS+gvDxPh6LxUiT/snVXzJgJOcxFYFcPRviGO
+G+CquyXT3sOmX0xmpsAi9bw4Vwvk3NDf/Adcu6bHJRWOXicyHIfDti94dgPO
+vO2vFoL7A5qydRSw+lHp/fOwfn2+mZkl3k9ldxcD9JPtd3jADRZMdFTshAUT
+glT8YGFTYOddeIAXdYR44EO1ny7mIQ5320PDdXERKz1huw9OtDXcs2WVdij8
+ou7EOzWYcz6jlQefSS6kOnE/f4Uu7QK7VbSt/ANmin3Cx1E/LeenroNwj5Gv
+9Dd49EHgtXBYYXX9iStsGqze7g4bdFDdF5E/X5P9zAzOz1JqsIbFvIU6THhO
+cduMQ+j/2O0H9EQ4YJLZarkOPi84XWJdWCAo3VmujTlHdFdZkfsHQ4f3a+Hz
+o/EBzwcemNu/OpmB3G+7bgnJ+szsrF80cc6tM6MGrhqsKPg8Eea6nvxK7FRs
+sxe2q1573BP9BhwadneHX6RekeSSee4u1naCrZ+FXe2EG7Z2qm6AhbeKO2db
+YR5TfTsbYUnFp8m74QC2wdBy3CdTzD59CZYsXZv5BXbY9deCT2S/3Y01Ncg3
+xLswasxCvyILCyHyz1Hv/d0N5roXLOSgP3Xb8fLlsMgm1/UNbLEud+JKsu4x
+nL4b8+BsTshYSlx6drAbXrZ7X/I8OClp+BQT83Ob/emtHjkf0+GtT55PPXP2
+e9zPDI86+BX7DdY+1miEKZ/k33Pgvl8XpeTDLc2r6X7cZ9offioOrrIb9JgO
+R3ktiPSBk4bMzU2QV6qxKpVN1vX2RyqhH6Of1aKmwqJtXlYtmIdXH++dNtmv
+sbHwmAbmwlRs0SP139VtCFPH+zSQcsyS5NHsUnZQw3zDXm1cTOrR+6xZE/D8
+9DtytsPybBabq4p6i1wvlhOnF6ZlqCC3tGdCPzyn/nikMty+f8kNJ9Kvbun6
+C8rIw4ublQ63+FYtKYWF/nZBbXBVdb2RDG5Ydcjcwhr7V5iwZ+C8NSP9ZBzc
+UjfV4yTcYHJW+RwsOdWo5alK+tzc9Q5mhg7njcAcVspSQxvMKcjq2jXkrTd/
+/tAVDhgJ70lGPwqPsUsryPpOi4OO6LdH7dhQMMwvqXz8AG6g4yaTdZFsw+JF
+mE/apY+hbnDSWyn7IOzlHCE2gZmq56cUwWLGDZsR3C/QncgSwrxcQV0r3JAa
+ThvCjcu+uZbBVbNuTUpHfaP7N6/vIfnjJutcQR5O3h7fYFieq2V5B3mNPk8t
+dYSTjA8IzqEf/sfIJSbEJetupaJ/B0XTfH1Sf8cuKx/MK37/05eT4YDuYXsd
+JfiMmrEluc//bWwXhfmzbSd5kvrbA08VjdNU2oxCTgy53yhf4+oYTcVUP4k4
+RerVaHQ5j9JUYvvWu12w6f5hkcEITfVFRLHZ6JeKcdoUPUxTBueH/xSSeWxs
+cbaF5/DTXsrI/I5EO4TCma92cAxscf5SBXMQvmf/pSMS5q7nbelGvVHV8WEp
+LFkRu8sY9/Md7bReww2zozsy/6EpeVu8yhQ25pmSF6WG/FFj7utc4Cq3Cs27
+cPThvfNXwkyF5E7Kd/j76fLI8rUwN+dWoTn6T3SzNAuBG/5WLT8JS3t97yyG
++WFtTwdgwYYTo7ZwwKYtzjqYX/6smM9qsKlHQeAXrKtvdw55iTzyRd07SuEe
+Cyv1WpJXbFpvCHPMVk85AIs27lFah/uj7fkZ4SS/Z+mFbchnt0TTmUv2547p
+30Q/FkOzz7HIPJrqFbGY76qxbVMMbcnvSWzdyDeaktbs/UrmJT9SHJH+laYY
+9/T9LImbKxZYfKYpWXpPGE3qBYfGD3yiKVP7580bSb2HWZrUR7w/R9sPFJL5
+Ule9776nqVJv9cF2OCmq0vv7PppySz7XboL+qKC9Xx700lSj5cOSGGJR+mpz
+uF2pa3M9md/cxLkh8ONpabYMO6xres0Pe0dT3uK7T3jEPJ3y6f00JS45IzoJ
+cwdbL27/QFMqnNirHcRtt1WMkKdeme+kaw8/Zm8qRl7+66XBHLhBmpnDGqKp
+btlE/UA4ya2fXYz+GJFn9dfDVGOX/O0XmgrTHSkLgyVZlT8MYR5RmQcb/YmP
+3rpcrqApio5XcSJeuvvzGFwXMD9DH+b3mhh2w8Lam8/7kKdhqr+IB9d7+768
+TvIvGA0NQ70hB3n+cTip+JzuF9yvouSnF0f231mfOhf51OelO/nBkvR3tibI
+b1QxdmoOWf9nsKYM/Qq71otMST0Tle3NmFe2bkq1EXGC1uLnr2kqv/PjDCtS
+n13WqtmJ81kMH3fi73VXGz7F/Nbv+BROnH2v1aCVpo65GM0/Ss7vFEmuN9IU
+s7429SGxXanZtVqaitdmtJL+KPXskbFCmupJ8z7OJ6Yc04K8rlGmxU2jlf/3
+f69R8v+NPfdfycmXuQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5107511663023216, 12.046515310090086}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4lGsbB/A3VCI1GFG2EWnyUSRROs04kiFpjqVoFTqWEyYh7aPl5Fiy
+HNspJDl2GlkqRVPJfjRK6KAmWiRJQirL93++z3W55vp5n7mf+/7PM+MdLfcA
+hwMSFEW9xC95pPpn8LOYTQ2Tx/+wKTbLXTR3CTzaFlgGSz8zcv6K61LJ6yK9
+4c6RUMUW2K427YYGLKbWpEfBha5zNzzXY1NmBQtj18CjM1W2l+AJ2Y9H61XY
+lJCaqfSAhUUDtVvgqG8VcqZk/Vnt5AfKbIrZqOGiBPcbVMYbwTohQ6YzK9BH
+x5KbaYvYlOGN7OZRmN2ZypgPH7ReXzEG3ypqexKmxKa8a5YtnoXni8ZGwyTh
+GkF9DqkXvjluXyIdczAuCYzg4abhwfUwLzbN0FGPzPeqbVyRTenftn9/BGaW
+FrU0wufYSkfTYGrAO/ImfOJfk+D7sMuIb/FdONRM99wrmHeY1doJsxcvO/ID
+ptHexs9D/ZS3M/vlkA9TXFmyBWavkhQokTyrPq68DNMMVpsowtzQOce+wOFz
+Zcxnk3w9UzO3oX+pL1bhH1CPPa59MR8evbzNoxbmxIavmoH1TS1iksg83Wuq
+OcgjJf0vyz2k/zGjgTNw0J+TGmrE65bJ5sPDhjFKz5AX76A+5w7s6SvYFQHX
+u76pKINrjMa2boT5Ifa8RFhQ57fjC5NN5d5IvbQH7j5n11EAu2hd9loA29nJ
+zfWFKePsuaS/oCOmvavg/ghRnDGskvWANrMc89wy6S3GfGsWyzzrhG+tHQhg
+wGWFitNVcK6vo1o08qO9uPeiGOYYf5/6poD8TS1tC2B+juqKg/Bd54VJN+B6
+ulNovzz2SVp09SHMHK/ecRjmyKiKu+H+gqYEGuy2/oz/JNnP7umahzQ2NWkw
+vpSB/lIsVztFw8KskWwrWFC0ZSEPFj/5KZbMw+PzQn6DNymZHo8i80qvjD4F
+S6v36OTBDEtZ5xy4+Wfe2Wpy3YLd1wuPfsjqbiT17I/zDbA/92RQZzPJw2xn
+6xk4VlcY8xDOYL+c/QKmW+smFcMiZo/cesyn9uuV6WiYm6gpioPLeIKd7nDo
+9/H9Ypjftb5MH+a8a9yghbwSWgzODGG+iVrfAC7Jb+OfKXmwyiHJBl+Y45lN
+dyPXZ7354QdLb262opN8i9IqXOC2ae+Eel3M89eOG3qwaOSa12mYNtVd/hr7
+2TWZyZrD3ASt6HB4fklg0tQyXK8sGlOBJ9Pcn9XDnDYh/y/yerjYmKTDzJe8
+gwvg3AaZ8lOwyvKA4BPIJ4Pj9K8vTOW1bW5diHlYgwXupB4VpiNYgPNJ9yk5
+QK7rFQVdkcP7381hIhAWVL4Nyp2P13NTkMYfcEZLh+1TWeRnMOqWDbMdIwp0
+YaHNmeukH0bmrvgcGfzdr/3BRzjW/I6MK6ymftZEEfOIOiUWboBpdrT0tTAv
+UHRyG8zxsshzhqlpZ91YuDvL29gfjh1R+TABc4dK952CDaNyvp3BfjVdwYXn
+SL0Hb+i66K+MdlGST/LjNQx1wncPb6wNIPWlyqPjMM/usMGnjqS+s9ZtK8wb
+qn0+Up/UY371/gA3iw7XfUe/biFdq48in3qBS9s9kodFneAtTCvodT8JSztu
+9l+EPGtMvYJN4JR4o5XasJoBZTugg3XKqS+U4RP31X9Oh4Xl1inv8PzRpqR6
+R1gU757pD4d3/2IqB7MHzLPqsL+bTXZVszacIb/7K/p1iYniJMCMnu82UnCs
+8KrfAXg4leYzjvnPDfe6WpDri4I725HPwdk9NUxYyBs6cn0e9rve3a8K837n
+noiQxudD+WH+EljsYEsFzsX1Y/4N2uS6wCEpYA7m8lwcvZb4Fw9x5Gz0eeW4
+wS+knstnoxYpnLfx8YpDsEBGm70BpjhRY4mw6E1233NJ9FHXHXUHztgnGsqF
+1Xb2yoth7pv7i/Ngt67Ny2ZhXu6z47M7Yf3fzKPViBnXnY1QL+hsxVZDmJ+7
+XlwMM6do1ethRqX9MAf9uL1cdJmYp7n70jhcdrCOvgo2dPtJvRj9M5+s7FCG
+M/4ItTuA+RI0v8mNkf6D6DPyZP6IZPc6ki/X9lQ+/Fpy/lgMbGi959My5JWx
+M28bl/SfuajsBDyxcOt2GdK/S2NVLpywtcFIuBT5Z+18/Dc8OWefWRBseNK3
+4BDM9eS0MWFGY63+fJj+2NtHrEX+P09aH8F+g54W5mkwt2HOeAX6k6q3ctoP
+G66QnteK/p22pwesJOuvPRtsxnxmvrZvZ8PUtsXbS5FHbggvo5+B8zV9uC8a
++RWanZDtgAWfC8p+lcD5FYYotcLiwr2T1rNwvqSbDNph3vd3seYUPodj/Le8
+gRkNPInEaRbVn6s3MUls7eT5bZJFhRtHuqliP76VnHzJDxYl7qnx2ggzyuo3
+P/rOojJ6b1d7wG7mfzuawzr2S6fCSb+FH3fRYX7eozsF5PnX87duhbm/5RY3
+wBlXFSRewkF6tGqSB3/Bwchq1N/kYK/+CWbbKxb2YH/adte9X8j6kwmH/oP+
+XAz2hQ0Sj1t8TJhBvYKcmeekH1XTWWfJPD9xW++Qfj7fZ5hgXrPUTL94Ur/X
+qa8d1kmSqN1L8kvZMG8f8kmVyjdfCguCa30ewW3embEvSF7FK+wkkSf38pW2
+RJKnU71Akbg90t6W5L0778IXrA9dcrhuUhP1DJ63XoUZfvE/vGFu+KZCTZj2
+pVrco4H36c/Jljzsz7uacG8fnLH8WkkK+hWyHR1H1PE4Ly6ShXlCbxlfTVEn
+5/tksOoUi/JeerLDCc5IbrndgbwmHghNmGT9qjGb8AkWFctgzygQM+qSLMaR
+V6B8KB1mVzWVKI+yqHoXrY96MNWZGqg+wqIYaytrHcn6Tzl5HsMsildemxVJ
+rmfRnwx/ZFFsictnW2D+7mvtzR9YlJlL6Ttl9EsZ2vzkM8Cict9HLPCA+VoJ
+N5resyjpJyFLC4jpEcGfiddyAz6Q9T45wY+x3oUuSNREHsLXe5scBlGfEVNp
+CbPHfpzfP8SiUjwtS5xgtxrFPj/0w+lQ0ODCGUW/R7V8xn43e2PWEPdcl2B9
+YVG3WIMxs8jz+wq68zEfI7Mp+yb2c/untG9qDFa8sd2FmOn6Secr8ir9JvOW
+5ClpVbEAeYnu/jPlQfKJS4oohCnr2UrtaujXo+vbCCyYLr7JhtmHRDb/kvWP
+VdNzVXEevl5q3gtPNASmK8CUbK90GOrTDk0fOYv78gxHxTIr5D/x8tAVct/O
+cJU/XY7+xDWuCyJhvsPxm93IP7y9UXkFuf4q+X4j5s110N3UTe7DX69+tRT5
+pzw5bZINU6YPw8P7cR6iWxMvEN9X0PvUx6LcFO4v5KuQeu/bpl/g9WdaOlwk
+TtB0FLbj/dA5riEg6xuueT1twfnJv+TeS1zO+BHwAO9HxbjtWtifOqM541+C
+ehvn5HsT06o2iC9i3qBxQSmxKPnd+ah7FHWOnjxFzL++l/PnPUocfiDBAvNS
+lPx5Sct7FNPYWes4Mb20/v017HdBlplNrKYzUHMLeZh9MLxHbJXGL36E83bK
+Kfzh/9bvurNChDxi5HeXEPeHPep6hs+fbP3HF4iXa3qldmGerB2S1jD/YpxU
+tBjno/6U8jDJU2NqXAJ5dDYkqp4nVqh+JPsG9Qq0v0vD7HNFogtvWZShc5jL
+aZJv95rgPe9wPm10AgbxPYbKLlp2DFaJ+LvLiTggyfgp1nOMj/pX4T6aypi2
+/BX1hkOPjevBwvjVPuuwn1nhhfmZuI/m18WId5J+/Hxe6cKUSvaQ8Dleb7fl
+tCrcR1NlP9b908qimAl3Q7yIe5vLNyB/b07nIiYx+eFX/f/7nSL7v9BwJ/Q=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0993812489835673, 6.458569381796186}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999992724`, 
+          13.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.81002436929973, 16.075547199850586}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1X00VHkYB/C7DpIUabyslZi8TFOKTKWi7lJMqKymVydHhgmxstnJtpOd
+JuUl1bSxXrZE7Wp6URaVvBQ6aRJDZWRzTIqdYzPZqUaLauz3t3/ce8/n/O59
+nt/zvfec6xSVFBZjQFEUHwe5/n8Se9CULYEdTd2ZemLjYdgx7/rKX+BVHyPe
+5sA9DSkG876iKWbXr4ozcOanprlVcM09j6xKWBzb/XiRPU1Z1FHidjg0UdZT
+BJ84bNOtIfWm6Nq1sEqfITL3pCluXoD3otk0VV18ZBUH1oavu8KDRecWdmyH
+PV4b90TCpv5xPWlwhVeylKwbTmebnofFbOqOJzwjKmVeM2yxuyv4I+oX28Y7
+qOCadduMbsATEQ+pUVK/vC+eD5vxgpjGizFPGSttGiw0EljPhMUfvLIqMQ/D
+duEtK7ixvOHlTjh14LMrA2a92XDVEq6uf6swgwv4+0uVyOfV+JIdFLztbu+z
+yzDHh3/tH/RL/ZSWlwdv8Fz9sheWtoezC+C2pi0LWmBv/ZiyCo7mTKquw6xw
+19tDMMMmYmMRnDme3rUE/YyHmY+Owp13h2cVwkNzSjOFZN6drgJz7H/vdV1B
+PNz/bPJFLqx92tHLJ/kOmvztjHyGog+ORsGxA3Z7a2EfTnZgLCzvX+0S6kBT
+11LiNPtIPobxN/vhWKuAm0dI3ofXmO2eg7plMzzPknkqBekqWLjrt4u3YV2L
+22knR5ry+/R2/nM4ujlmiAvLGo6XfoadD6oWRhMzEluZyIcxsaXvOzg72nYz
+dzHpnzmRAn97vH44Ab7qpbTfAw/2J/qfhM8k5fC3wHLzEfY1OMHyy3hvWLcm
+pEAO0+nnlsyCU9rvVffB3vsfrXyC/UnbvlFryPtqtYr5Aa4ozO0ehbkPJSud
+4DP8MuEYuV9eNa0D8wpZDyZ1xAb/9mXAAQcU2mGYsmnxIflIVktMVHBkxAC1
+AJ6YPsu3Da5IFrg4wDXr5/xxi7z/wvLfWbDoeG1ZKdzfXiMIgVcwpycfI+ut
+2gVZsNrXI0YIh2oUxX1wp/B9Kx8eawzkBWJ/fvLlCh4sE3HfNcMcQV5yEOzx
+11GWK+a9fLJOshY2WdaxOQnWS3inAsj32u2yp5bk0SQdWg/Xpw/WGzrRVLdD
++7FwOHOKvSwYzrFPWJpE8vG9VZEDJ2xSR2TCIZWvzt6H7V6M+JSRfJX7Tuvg
+J2kxTx6Q+tbubrZM1JtS8YHkU5A/vHcRzAkc58/0wvNLjaxWMMl30XB/KczZ
+Fsn1hq1NKfkO2KfUWsGGm2OFriLixoYRS9jSwqiuEKbYtXHv0E/WpMquhPsf
+++96BNNxNx/fh7n5X/iVwOLGQ6ZP4XRR2MV9cJlZ3OifcOrZQ75cWEuXFD2H
+qzOWX3CEF1tMDVKS581ygyeRD9vtfH4rWT9qH6WGG9doeHWw7XLDymdwUa40
+Q0b6d1w41QULDKp2noYdR72e9sG87u8dD8LarXvq3sM/53JddsMsv0S9FfoV
+vLl0JwzuUcy/5w+HqE3dvybz+diU/wgLRn+SesFm6ivDdbBz1UAvGzY54L7R
+AHmI1uofusGMpvO7QmDTS+5Ksi5r1kny4ZodI54cmGegNX4J03pJmz+sG+vc
+5DoXcw0q122HNVn6yWj4dUz2tBS4JLX4TRGsEZsvI/P0bJVHtcDSzqi7N+Dc
+qX6z1XCLHSOZ5FeiGYgchw3Jf4GD/ZGrM/0fbeE9zg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.236190257669733, 7.2638097423302685}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1Q0w1GkcB/C/l2t211tIceccc8hrLVHI6J8Uxp62Lto0SS9swx2bFJHs
+SQllHN0qb3db6c5LZ69ORE2L2tZrSyJutpauQ5lahD2jc9+nnfnPzmee5//8
+Xp7fzN/mYMLOaG2Kog7hIf+ULh4hm6YYBJ/TlP/rt/mVsMPQ45ZpC5o6sbac
+7oDNTbN8umCrDLV8Ej5fV/DoAmxdcvyDnhtNsad8//KEd37hdMcefm76cand
+nKZkWunrfImnxL9yYG6lcU8IfF5XZdC6iqao3X1OYbDD2YnP1sK5TVrrebB1
+5ta2yytpapRjaUvWNTMRFbrwVZYwgQNTXbsHk81o6p7FbJ8frEpeEzG/gqYE
+JuGbXeHL5bvPZcOpcQ3D5uT8rOFFZ/hPx9yX2mR/3cCJMVOaqvjIuUrq8XrD
+v9EMx8clpAzC0p8Dv66CtzWb1jyE2YmMw3Ww6vm+I/Uwz8D7YReseD9XXw0X
+mDsU/webP9gfTfoXZHRs22bEOzgjYt2An/vopBXAuZtOz9bCas310DFYLgpe
+0wQL1+hk0agnys/meDeJfy27VQQvvF8I+Ie8/23S079h/+KcIR3kLxCmKe3Q
+j3ezSxvsiP1dy8JgQ29/n2CYK5EWCGBF47KyeLjgO5ZTErxes515CWasHRyJ
+hD1+KHFthI+4RoSyyXnWxm1DMK96zH4C8cpqLcTzsPDwo415cOqrovbl7uhH
+avwBC9hjxD3JFqaMvLjFqEfkl7DKHY5itp9kwrrpNfHesPBmyEAS+sMTBKT7
+wJrvK2pemNBUz5XYfE+yv8NgBwd+uEHm5gz/cipoutUY+eboe1rC49LAXYGw
+VeuTEiZMT/ZUKJejf8rp/A+k3g61Sw58LnHrnhfkfrsbYzjwrluqUDnsdeVm
+pQPMmJ5svQ1LjsbYWcFZ0vR5MRwU+YpygaVn3YxIfzQrZb5cWDToReXBy7Xn
+ldmwoGxPTjax/LbeE5gbE+eYS+K3Z260QX4p6363KCLrHWbRJ+FL7r4hV8k8
+J3du7INNmm/zG+AUxqY4e9TrozZ+1gsrbN37BbDDV4X31OR+Xpo/roXLEres
+MEW9Xvxq7wE4s3SsegN8pMV4dgI++LbQcx/M+HCz6TUc7p8YmQnzFu7tk8NS
+HcP+Slie1an4ES6s2MuTwaqL2+23wLZ7pnpGYcGtmKwXyK/kzd3gBVhyJkCf
+D0fkiUz11+F93dg7KtQr6zzeuIpYtcmO9Me2NJP1JSyUeaqSjDD/LmxbS1gg
+N+4LNkT+XD2+GXHd0gNHA9yfKjKZCVNNnC4rfZqaW6H0+BfxFBmDq931MH/j
+Yslrkt80syqOhTnopGwUZN7ucBJ7mTTl61f19C7x4lQNH27skVpdJ/NX2rCL
+Dfe3le0oIPlrPjo5w/bLOiozSH2nG+rC4PAthm7HyP7H7/xr4HxL7aE42Hq4
+nGeHeO/GeoNiYe7etLZmOH/hykQ8rJ7km0Qjv7maeuVJMs/f7FhcifxZ4vVL
+uSTe3uZnMjh27KcRMYlXJGHFot7F8ryB+6Se7t+K52DtmWezShI/jDp1CP3R
+vi9arUX6wR+1roLPR/Wy7WG630DSAoceSG0JgdUNheFk3UEr5YwAjnK6KIiE
+U06NOxbB1objpSM4fy5gKeMW6fcw9w9PONT3yYluWKWovbYf+Y06H3Z7Rc7T
+nAmM0SP3KjacgSVpE7o7UW/o3FHJIll33J/sgv58+kh40NSnH4P+H+y3Mbo=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.263809742330267, 3.7638097423302685}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt0w1MjHEcB/B/kkTZzcupK3OnEKo7RJHu/r1HRTunSy/kiIy4OGNJ3bRJ
+b6SXUd5CRxm50jSNOmPdLqObqbxMpShEy8sunF2+f/Nsz5599nue///3/T3P
+I1DslSaPI4T442RXYh7DsZCSf4cLJYnlab+CF1Giq/ILl8Mmm91Bp2BjAW0u
+ghe87M59yxw763Y17LK+zn+JByWioI4d5+HLXJUhC+ZUrJi/F87MTmtthXVl
+ZQF8eI3PJOF4T7h196cGZ0qsQ/fnL4OL7of9XgKbFki4G+HKg+5nLvEoORRf
+2pkKi3Kr2yfCnw2FtftZfeZbpzQnSswzvibsYs9/G+vpc6SkWzhnXwxsDG2z
+JMPqkZ++PvCIj0RqBTepjKUcmG8/PbppJiUXZus736O/otODd0rhsqnVBU0w
+MXXFFMMBEllkMZwkqDXVw5mahkwlrF3uIf8B8ywhnrHwSGWUTIr1FZr5HRFs
+vcLCOXp4IDA0MIrNI7emKgL9Wjs9VCXC/Pah512wsEdQnAFHVw36bUW+lqVO
+/TVs/+a21PfwDdO87n7Y2Ds+Jwbz6bGOErujf6Uf59ItOPnKVTcVnORV7jsE
+j80aCHzE6oddsmww753FIfYzvLD+m8CSP6iPenE/KWA1v/GcEfa19Cmvw8rk
+V4Zs+MndaSUfWL3mkJAHp8wWPOUJkcc9oaAc/XR+ubdOAkd3iH+w95FH9ZwN
+sOilzQ4l8tSmHX0Xz+6vi4l7gfwTXOcelsFJ4s2rVsOv5Ro5hTnSKaNtmN/Q
+A9ldAazd/D19G/zuREW6GftTcV6sM5xvaBwwwpXhfanfuZRMy7TN1cCiZ4qb
+w7B3W/7PDFi7yUwccL9HQvvlOJi07IyIhBee9SgPYPlk2TnVsJ0kZas3nPS5
+3toF/bgeF79iFh30u3MRlk13sA9mlm3RLEKek3wvz3/zCjuQ2Aj7pHwpPQH3
+KoZTVyK/oyZYr2f1cPnADdhw0Zg3meVf2/HYFvMraGyyk7O8wiPqELghXGu+
+Cuu607kKeLgrvXMUrnywKi+evc9r3lauInxPx4J7FztTteCFzjYM1ln63QZ5
+VC3ds1S1Hdb2f4zKgi34fbNE//9fHv0LInZaNQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.630102278562946, 5.135413671377677}, \
+{0, 1}], LineBox[{{6.5, 6.9999999999976925`}, {6.5, 13.99999999999251}}], 
+        PolygonBox[{{6.5, 11.1}, {6.9, 9.9}, {6.1, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 10.5}, {-1, 0}], 
+        LineBox[{{6.4999999999976925`, 7.}, {13.49999999999251, 7.}}], 
+        PolygonBox[{{9.4, 7.}, {10.6, 6.6}, {10.6, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.}, {13.49999999999251, 14.}}], 
+        PolygonBox[{{10.6, 14.}, {9.4, 13.6}, {9.4, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.9452}, {0, -1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 9.9}, {13.1, 11.1}, {13.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.}], PointBox[{6.5, 14.}], 
+         PointBox[{13.5, 14.}], PointBox[{16.5, 6.5}], PointBox[{13.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfjghhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfjghhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1wk41PkfB/Cfo3WVK0k61pUjci1LLWZKGFFLmxwdFEKpptZm2hxDtGNT
+JsLkqFRErWtTOy3l3EyHjHImmiJhi5GzpP7v7z7/eR6P5/V8r8/n8/3+vr8Z
+7T2HtgRLUhT1BX/kP/XuKz6GdOq/zyo6Zed50PAezF9jl/fciE4dT7I4cxQW
+lXzur4ZLM5atMYa5Fobq5XCKgOXba0CnZHdt/lICm7QzzFPhUM7ynjtwpEL7
+FANW1isLboFZSmfvS8M1A09qJ+BmS/f4Rn06Negsna2D9U0T79emwjVNK4x8
+Ycb94JoQmFef4JQBr8l8/qMLHHr8t/gOOL6W1mwBi4zuOGka0yntG2oGBjAn
+y6B/O7x2g8NDfbgw27X6PNxoK1VlBjOPBu9ugXdq12XRYXqqHY8yoVNP1r0v
+8Sbrm3Unr4T/NCyaO0Js8XuHA5xvv2EXFxZ3yKe4wY4pF84Ww0L/yC3E19wS
+/AQwlbRzE+nP0R1P7yX9EwasyXyW/zhuGYFtXbScJODZXLv+SZhRX2nUinhk
+84w+jpP2m82TF2Ffeev8t/+ND5YNgT8nBR8QwvyK+nFjuNKrzb2ErOeQvHsM
+9cj0GKqIg9mBPZN34ObsRI4biV9UbMmBO8x+Vl1A5tPO3rELVvPYNd24kk4F
+xHnscYDr2PP0YmBmSGqjEfxew49vAdMrhOe04bjWCHG/HuKr/OCmD1PRPvOz
+YG5w+2sbOPJJks1PMNPqXr0XPC8z8bAqPBNR9CwGni1WY3Xp0inDBs+Ycvis
+TFhFEaxx163xX9jhldA4AaaLuf4kv2Xj+RFhsG140r0DsMEpcakvzF2TaF8G
+q3lKcbbChYLjVmL4RsQKK9Jeltalboz6vor6wN4Le9zQTdkF+6sV9PwKm2c6
+8TjwmH9L+Dk4wC0y7Rq8N+e2Rjk8ONjk+zd8uvZF0ROYN81n1BA7LH45DFMP
++xl34JCYqUQp5GceYdOcD3+fyktVhwW5PR0n4aAlndY6MPtBTvdOWLR6SKxH
+6nGvt9oElulOyV8Os8Z06iYRf3Ig/bICTF2t8K+EvRvyi0awns+84rVsuDzP
+bvI+zOgOnnOGBSoDlukknk2p9qpw+vfJ0X6wrINNQD/qeWqRoacGzF93M7Ya
+/tnl+q9CHeT7anRrPuzfHiGdCNuW3NTLhGun12jZwvxnL8vTYY1aM6V32tiP
+aFPrPPitbrbcFVhc+MiPnK+Cqkp9f9jw2GunHth4cLmzDsw/MnNeAfGY7nad
+fa+F+qiXJ62HJz4URtXDHhm+w7Fw/+2gjCuw7dlQt1r4p713887A9I4PytKo
+j4mLc1wCLOs4leIED2/Tv0wseOxifAL2rtwiSfqHGv17iOzXyqyYHy7CrIpL
+ZkOwBtM19Tbp35bEW7Aaz7emjNxT2Kekj6EPT/d5/TIKazlJ7rKEm9N4mfMR
+P+vNULQFfMJy23cG8GDJim5duD0u0sAeDpCPs5SHrxVvT3Qn7Sab699gvQGX
+h/k/kXaX7HV8uPqPl2s9YWZHTz2J93Ouxa4NsKy56x8byf3xZ2qWCVkvfuqM
+ErwlTX5MDp5JHF3UhnrY9z3ufIH4hG0b+3PhTS2mawtIvq5px8LhiuKWoBBS
+n31l6o6w54NwCR1YNPxLvi5svjDva+m3yM+t74oSzHB/JLUY1miZWChrTPZP
+Iyl6BeoRc4u5gJynLcWKg8txX2TLFn0LO9S4DvrBogOBWg5k/I7tSs+XYf9M
+D90i95Gkq2g6dBm5z9yeZMFb2sb3ycOhdcNhJP6C9POhNUsRX6TQehHyM2xU
+VE2GOSscrnnD4b3JuQdg/tJ/1LNgqyiJrUHEUwt6umBu9zPeQfjSsQuH1FBv
+j8o9s0kwN3JvlAvMPxzleROmcgclD8OtBeVdA2T+CyNhKfBlF8UgLcSjldnD
+zYMdbGJjt8Oyz0a6C+CtT2aK0uBLOYK1F2FF3ta4BpiVamZ0CmbotX0YIuMl
+HhTth6l9m0Io1IMlafDDenjHyQXD0nDhN+mNynCQ6ShjkszvvpVL4o8/oG8i
+JOMdjRZdhJ/TW/XSSf3a1n8MhCUvVJVvgJVd8gZWwQGr3q0RIf4AgeXhKdRv
+3+eTc2HwzKfeTwJ4MCRorl8T9S0sO3/VmJyr2OdbYda4tcQp+M/QiyV3lyCe
++PnMaPixVPdLXThAtPty1H/jB8SnNHA/cj894MBVqnoenxajngHqyXnwgN05
+g5/hwseMeffhmKYis0/qyLt66bMJch/fHT2ZCjPk1XTJ/XX9vRXXgfhqxP0w
+eMWR4s6vi+hUp/Gw6w343j1tmQ54Zmi58ggsfeNVaz1MKSgfNEO9Tq5uVP4H
+FqTNE4TD90MN/uiEzYOFxVfgc4orW2bJfH85TLaQ/Tp4WMIY63F/T2uZhEd2
+mNrtgQtvyL1dYIr1Fm8zyoUHP5z2XQJblTxldMCspSrti+GgR86685GfaMP8
+DDm4hh35qw3Mn1PZOYr5NLs2RnrBPqYnmQ/hEq2wZ3vgUF57Ug6sM3H38w54
+xuxBfQgs8PexWA/Tn18/YQon1BxPVYGZ7V7+48jX2UvV9BHW7/QzkiDvCyFb
+88shmP+jjkI8XLVBrVcCZnM3f/KAl4lER0+QfH2FCobk/jId0Z5RQ36XM/Tk
+4NfUQEMgrNXcUkXeF+sX7b/2cCHyvS4lHIFL5pVssIBZed5PyX69k3mqmaOK
+erXfviFD3kdLLX5VgsW/NfH1YZ927rYUFdQhd6qFrO836LjsW5ixsc47AW6o
+kjtVq4znti5lQzW8bSWNx4ILFY6v/wq/8Lzi60Tax8sa1iH/nPmZHw2U/ztP
+ugmwtKnXrW9J/2WL/6qHDV9//2YVzLkSODMHy+8vUnSBZcP28syxHz4TKl+Z
+MOu9c7YvzNp/fOQqzDy7/0Ak/Ekjo7AXDlh6doIDH4l2/3sJ4hVV38s+DV8/
+8zXPE55Zle6bCNNb/al4mLKoKGOS8xHxtLEANmy1vO4BZ3wICK2COSeDH+rD
+ig+9p6ph1rpwipwvK86Ya6kKuR/Wnr0Lixf+pZ5EvGTuSzx8KSrzozup1+aB
+9+Q+GpRdET2L+GzrfpdRgrNseQszSD3kJXufk3r9sk+G1EP2h2+ExbDstmMN
+lkq4D5Too0kw+5U6T0UR5+Ry+xATvrR+XuPr+TgHFt/PkPuCFXtBp1QB6+U9
+ayZOHsgqi5XHuLiobNI/IeQ7151yOD+ikx/JfKxOcxsPWcRdNvG1BC4c/Njj
+L4P61Ox07oUrAplhqd+gvjetJheR540rderdPMRrXdv1E9nPlibnw7BP6VR0
+Ohw+3f9UGxYL9Bw74Spp2u9z0ojPMSCGPG8e9vxxCbQLZZjp22Dzd+9erCLj
+W6SXkv3Z4Vv32xHYI15u6G+YK1022AIXfh6x6SWWXzlORzwiyenySfixeZP4
+NsxfUhxHmWHfqqVEqxA/44LY7wva+eKItjSYrm0aMwpLX3+8YwhmqeffaoXd
+2dtbdZG/1p4O91I4p7Sl2g7WSIyVjIMLn6YomsG2sfmTbiT+Y2lbpjHeMODi
+GVW4oe/GGzI/t3YqqAP5iu7vmZWGOZqbdXPhmQdtF9wRHy/76L695P6/npFz
+EPkMLhdXWMPMGLYvE/XxWSdrR75/8BxoPB8prLep6iW5D5lPJc3NJJEPO1D1
+BXk/WrL++kyR99sXQRscWu3047mvNIoab2OSdurowkn6HI2i53QNj8LiQ6Vp
+yrM0iqE4lkzOm1aBbp/qRxrFbDI3Wgt3upX84jVNo0QTVzUPwj47z+r1TdIo
+drW+dxFsLjiYVT9BQ32OJw7BZf+aULPjNIpj+VjdBPkPct42J8HmTYF7DsK8
+smfN4bCt/4m6Ylh4wM06l/QPW1z+ljxvBvEjypjPo1Gtb4kZ+d5Xo1QJa+zw
+2r0eFgbH+ydjfduPA7n+sPLtlNmfp2gUL+NNAhNmBEopByDeQudVnAg41ILL
+c5hBPp4e+fthunyT7hfY0L45eBs5DyMM7hnkq1Vg2GUN11zdW/kKZolDkxTg
+wqgszXewx67IfV2IT/DwtG0+zPcabsiDbfndyrKkv53T8hCYqj3hvBDzi2h/
+aJD8qXO1lg8Qn3jMOmCcfP/oK3hkhviFt1QSqsn3gTO/BXogf43uypeppN5d
+Y442YzQqdCicfQimz456DLynUZdYXYresHBZj73REI3ykba6uxHmhgqu+fXT
+KO7sd2vdyH0yfMfN/iXm7ygp8iHnjX1TwaId8SQvvHKEzBd6zCr/EdZ70GnN
+g9k7+9OO3EH+Q8Xjjav//zuefZeaIb/rV9P/B0WH2cY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.6054786274900135, 15.616941421812587}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/Cb2qXyGI/yjFGKjsd6JckxNxSVZVLLhDLk1WAbNqWNmhAq
+b0VJyCuP1YrIOupMeVVq1+KMsSlTKaOU8Vgisd979p4zZ87n/O/////+fv97
+Z3T9j7kHShEEwcWH+ibES7jWkASNghpJrPd/MHMZJoIEczGqJNFjW3tTkRpf
+ZnddEebvNzE/rUISGWXzj1rXkkTLsPF8vzJJcDn/ZObC2nqtsj/AvH2eRulw
+W5Rtb5ISSZh6WudVwY3a+jdGFUmiNkKzYwR2V3ph5g3zMsfz7bH+xTFlzhsa
+9umP29sAP6gq7o+H6SfjcqyR7+7tcJ49zFNsdmqDHVd01+rAoiidKjd1kvBS
+lBZrwMQhllwPHKDQN2QG02xmnR00SGKP/OBtNjVf5s7WfLh88f7yYmq8xmlD
+Pxyi6B81Ts0f6NKQwLssOt7uoPJdo5u8g8N2Zb/NhEXJdpcaYYGbnokQNjWJ
+PR0E+1cEKsij3qLc1TvmsL+9o1KXMSz58abgONxT4TFlDnM3m18RIb9aVku1
+Btw9MtvmCAcZhfa9xXpFaT70KtSfGG+kmQ6zLTcx1eE0oeWENpyhVh2Sh/49
+2OkYlIu8tQPtxyxh2Zf5gq8K8Mv7k2M4t/x9qUSdPOrzDK7rhBd8BCW+csj7
+/GdOB3XO8015yrKoL37zPTE8rfu37+Aq7Nd+QtMI6/WJf7LoXIl8ew5uSoGZ
+sZ/dh2RQvwetUQp5phvG3Ixh0q75QDJsmytJbZRGfToylSqoJ7o/eyIGJlO8
+pwvgvsJ3rWfgjJTBHG30I6Wf/Yy6n6xuybwEu0x3F2phPW7b7NIrmJtzWqcM
+Jvx+OaOM/ubLy+s6IA85xIrdCD87FbJFDNMqX0VR4z6c9LjzyC96c2AZNZ9s
+GCuRXQ2/Vu9OgvMPV8Rz4dqlRd4a+G79bno5TBbEeacin2X6F/My6n7fBckM
+6skPT/stBKa9cK/yggO2KkuNY31C94vzQ/TDaIu2ow3ME1f5W8DJeQ1LbshT
+dOvJUBP6Oax59oM18vMvv4pnwfwsM18C9dJTIpJUYT3Rqrr672Arg91zeK9o
+rqHBfiuwf+egxhKs5xTDUluOvIY1xga4n5zq73m/DOdgYFoQAVsnRfIHCORR
+VCsSwBmKtCezSwwi49DvHUzkuXp0Q2TVIoNgHhkJFMLivjtjfd8YRLeJ3feB
+1Pt88UzuKZj5rWT4E8xsFFzPhiWS3hMc9KOpud1KFfNpAuZYD8y80cWZhEVy
+nFI69X49fyotTe3/yD3LFU5+Ksy9BZOXAy4chB8n/uXmgry0UflwEg5JpntT
++fkphTtWwIN1hxODpbBu2ohWBda/qla3phXuXlc6awoXJRie/wzTszj+Zcj3
+2L1Q/w1cVJmwXo7KX1Oedw3OiLzSwkV9/LyPMiow78LklBD9cNHssTqA/bhM
+512u1PPNb2axkS/DmhUqRH+510o48VR9fH9RLPylV2Qus4D6h7UTHWCJftVe
+zhyD4HbJeBrBIqUoqc4ZBkFU+9lso+7XGf93+zSDqI28MBMCy8Sf9Hg3wSDY
+xTyHJpgUJUQ3jWO94l8XdLE/eyiHxRnD/O3Z4YUwTzDa9m2UQfAiaX8YID8p
+a/k+Toz5XCvXBri73aP46wj2L6rk2FL1Gi6e9ca4yKulgPp9ZJfaH0nGfH7x
+gIs6+mXasE7N5yPGh5K1/ODaO0HZ5Z9wvob2XsmwpF4/QE3CIOgPw+xSYGH/
+n1O+yMu0Y6mGUeM1vaEpk+iH/739m2Hx68PCc1N4XlwWwzqxn/O5pgR91NvN
+/1C3l8rzNIJ7FKZvcf3agrw81+zYbTCN2WezAeZKz+7MwHzmyAvZJKr+h6aX
+wrE+/2y02QT6E53gZyNEHtLNaSUHpvsGS7cgb5HC8No5/I+IrjqrbkR9kpio
+1FKYbZGdoDWM/swsn+LCfD/O4/qX8LzuIBsm1mlwTXvhxvG245S/sZ7vfoTz
+Me9cWU2Zum7f//9bhfwPJfGW7Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.027272429209974, 4.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 16.999999999996362`}, {
+          5.500000000001819, 12.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.404292302436444, 15.648390403667896}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.767313162260148, 7.106724558493235}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.664385100754924, 3.1263021209059043}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/BLXmuJNAZppd3EhEy7ydpOuRik2l2PlMfxWHucaBmzqJQw
+S14tpVPsei3Sht1i5LGEOaxXHLNGsloaTbGRpTWb9Qz7/dt7zsycz/n/7+/+
+ft977+wMDHcLkqcoygcf8vv/F4umNg5dmqJ96jzs4Nm/oiK9YXGTiVU68aB7
+di7MH50fGoZ5/a/bm+B3j4abmu6hqRaOrUwIn4kdVb8I013twiL4+2BmeDss
+NjuZ8iXcf30mRtmUpjTDJ4+owq6sxHYans1avZSjQ1Oeh2x9ubDLsupTJvED
+yeJVuMVlTSONSVPPdJaXimF24KrXgjZNrQZHxpTC1G5jdgicJv3nsyKYnkt9
+8ieDpi6tP5JlwFKdIqUoeP/V2egIUt+6gK8H3+FciHKBeY8t+4e30tRB8wOi
+PbChyEi1ERbWGhcokP2Hi3OJGWGpis8xj7Rn8uBTeDGAq9AGCz5W/ncb6oXp
+Hzl+j8zblWRJrvdql9eOWzBbqUJxDPaW27WvhOw/0Ov8BfotKfe/VgXzd40z
+JmHvKsENEUy9jVbiYd6b0xOj88R5ERUy2L5S2c8M/WTWDMmCkI9ZRK9nKPF1
+la86SV7Nc6k1JN/hwBZ15NubrG4tb4b6/PppK7iW8X6IGyztaztrBzd4+C0U
+w4L8ugwzuFt6qWcGpoXvGSygnpNz68qH5ujfManxNpyV6rDGhWeVkhKs4bHs
+pNZCWPCRhvQB+uMtnRC1wZl/v3GygCOy2zyGyXpRrKQA8+kLxh3GYLFCp9Zm
+OLHsJf2MrEc8t09BPp2JYTl9cEuXpbsmnLjpjk0dTHvbHa9E3iMNCqVZML+3
+c0sIXDPH+JFHHJevb0vu11vdY0fhgI5WJ2u4fimhyYisc7RaXeH7B6MVlEj9
+c/KrqbBPYsE0mZe3M1Y8AifEew09gwMiH+Y6kOdFLr1QQvKL2Xu5Bc7p58ZP
+wmI9PZED+rcJn1unUE/aEcH6Db72ebJsN6m/7/wHbphfdDOJ60XmHW3g98CN
+28Imssm8Uaq32cgv1lFmJYGpQZWJOFh5C9XO2ovzbX9+KYDVenTzLsB0Ybmw
+DR4Y2F7UDVNpZew6mCmIrWZa4PreW2pTYYvodIkvzHt1P+oQbLN291w+TJ38
+xvQJrl8fd+yYGOYny837wi+49xoW4IABdbVB0n+zwrgKmzyPP4Ry4OVhia4G
+nHlDJb6aQfOLf/+6djPM0xRWsOC7mgafbuyfEitVIL/qFH7aEuq1VGY9ciT5
+uu/PGIYzo0KOLGnRVGkkI6gOdpHfYd8NS86PMjNhwbxIvQEWGgV1nCFW7uSQ
+9Qnt7cnOpN+0o6JFeOqyp5UFPGuQPM5BffZUjJcBWfeY5pTDrO+0Z3RJ/XMa
+AYa4X/qlHacMST8rI+Ul8DunXVwtN+rZyEzJfH0v/jhF5g/+trUK/iVG7ZMU
+kqdKaJc58hGyeGq/kv20wf4c2N/ihMkmzBtw8Zbea7iMy24zIfM3qzUak/fR
+KO+0C8mHU9VrB2fkP7wSDbPfdBXhfvBXFK3yCuHZn1iHdcn7mjej3Q5rOr/x
+f4x6CwPzueOw4PhWv7PwOjnIOvl/ZtL/AbFTDo0=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.501529066331596, 4.118561596984358}, \
+{0, 1}], LineBox[{{12.500000000001851`, 13.}, {5.500000000002592, 13.}}], 
+        PolygonBox[{{9.6, 13.}, {8.4, 13.4}, {8.4, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 12.0548}, {0, 1}], 
+        LineBox[{{12.5, 13.000000000002307`}, {12.5, 5.999999999998607}}], 
+        PolygonBox[{{12.5, 8.9}, {12.1, 10.1}, {12.9, 10.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 9.5}, {-1, 0}], 
+        LineBox[{{5.5, 5.9999999999976925`}, {5.5, 12.99999999999251}}], 
+        PolygonBox[{{5.5, 10.1}, {5.9, 8.9}, {5.1, 8.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 9.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 6.}, {12.49999999999251, 6.}}], 
+        PolygonBox[{{8.4, 6.}, {9.6, 5.6}, {9.6, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 5.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{12.5, 13.}], PointBox[{5.5, 6.}], 
+         PointBox[{5.5, 13.}], PointBox[{17., 5.5}], PointBox[{12.5, 6.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P1", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfhfjghgj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfhfjghgj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1wk41PkfB/Cfo3WVK0k61pUjci1LLWZKGFFLmxwdFEKpptZm2hxDtGNT
+JsLkqFRErWtTOy3l3EyHjHImmiJhi5GzpP7v7z7/eR6P5/V8r8/n8/3+vr8Z
+7T2HtgRLUhT1BX/kP/XuKz6GdOq/zyo6Zed50PAezF9jl/fciE4dT7I4cxQW
+lXzur4ZLM5atMYa5Fobq5XCKgOXba0CnZHdt/lICm7QzzFPhUM7ynjtwpEL7
+FANW1isLboFZSmfvS8M1A09qJ+BmS/f4Rn06Negsna2D9U0T79emwjVNK4x8
+Ycb94JoQmFef4JQBr8l8/qMLHHr8t/gOOL6W1mwBi4zuOGka0yntG2oGBjAn
+y6B/O7x2g8NDfbgw27X6PNxoK1VlBjOPBu9ugXdq12XRYXqqHY8yoVNP1r0v
+8Sbrm3Unr4T/NCyaO0Js8XuHA5xvv2EXFxZ3yKe4wY4pF84Ww0L/yC3E19wS
+/AQwlbRzE+nP0R1P7yX9EwasyXyW/zhuGYFtXbScJODZXLv+SZhRX2nUinhk
+84w+jpP2m82TF2Ffeev8t/+ND5YNgT8nBR8QwvyK+nFjuNKrzb2ErOeQvHsM
+9cj0GKqIg9mBPZN34ObsRI4biV9UbMmBO8x+Vl1A5tPO3rELVvPYNd24kk4F
+xHnscYDr2PP0YmBmSGqjEfxew49vAdMrhOe04bjWCHG/HuKr/OCmD1PRPvOz
+YG5w+2sbOPJJks1PMNPqXr0XPC8z8bAqPBNR9CwGni1WY3Xp0inDBs+Ycvis
+TFhFEaxx163xX9jhldA4AaaLuf4kv2Xj+RFhsG140r0DsMEpcakvzF2TaF8G
+q3lKcbbChYLjVmL4RsQKK9Jeltalboz6vor6wN4Le9zQTdkF+6sV9PwKm2c6
+8TjwmH9L+Dk4wC0y7Rq8N+e2Rjk8ONjk+zd8uvZF0ROYN81n1BA7LH45DFMP
++xl34JCYqUQp5GceYdOcD3+fyktVhwW5PR0n4aAlndY6MPtBTvdOWLR6SKxH
+6nGvt9oElulOyV8Os8Z06iYRf3Ig/bICTF2t8K+EvRvyi0awns+84rVsuDzP
+bvI+zOgOnnOGBSoDlukknk2p9qpw+vfJ0X6wrINNQD/qeWqRoacGzF93M7Ya
+/tnl+q9CHeT7anRrPuzfHiGdCNuW3NTLhGun12jZwvxnL8vTYY1aM6V32tiP
+aFPrPPitbrbcFVhc+MiPnK+Cqkp9f9jw2GunHth4cLmzDsw/MnNeAfGY7nad
+fa+F+qiXJ62HJz4URtXDHhm+w7Fw/+2gjCuw7dlQt1r4p713887A9I4PytKo
+j4mLc1wCLOs4leIED2/Tv0wseOxifAL2rtwiSfqHGv17iOzXyqyYHy7CrIpL
+ZkOwBtM19Tbp35bEW7Aaz7emjNxT2Kekj6EPT/d5/TIKazlJ7rKEm9N4mfMR
+P+vNULQFfMJy23cG8GDJim5duD0u0sAeDpCPs5SHrxVvT3Qn7Sab699gvQGX
+h/k/kXaX7HV8uPqPl2s9YWZHTz2J93Ouxa4NsKy56x8byf3xZ2qWCVkvfuqM
+ErwlTX5MDp5JHF3UhnrY9z3ufIH4hG0b+3PhTS2mawtIvq5px8LhiuKWoBBS
+n31l6o6w54NwCR1YNPxLvi5svjDva+m3yM+t74oSzHB/JLUY1miZWChrTPZP
+Iyl6BeoRc4u5gJynLcWKg8txX2TLFn0LO9S4DvrBogOBWg5k/I7tSs+XYf9M
+D90i95Gkq2g6dBm5z9yeZMFb2sb3ycOhdcNhJP6C9POhNUsRX6TQehHyM2xU
+VE2GOSscrnnD4b3JuQdg/tJ/1LNgqyiJrUHEUwt6umBu9zPeQfjSsQuH1FBv
+j8o9s0kwN3JvlAvMPxzleROmcgclD8OtBeVdA2T+CyNhKfBlF8UgLcSjldnD
+zYMdbGJjt8Oyz0a6C+CtT2aK0uBLOYK1F2FF3ta4BpiVamZ0CmbotX0YIuMl
+HhTth6l9m0Io1IMlafDDenjHyQXD0nDhN+mNynCQ6ShjkszvvpVL4o8/oG8i
+JOMdjRZdhJ/TW/XSSf3a1n8MhCUvVJVvgJVd8gZWwQGr3q0RIf4AgeXhKdRv
+3+eTc2HwzKfeTwJ4MCRorl8T9S0sO3/VmJyr2OdbYda4tcQp+M/QiyV3lyCe
++PnMaPixVPdLXThAtPty1H/jB8SnNHA/cj894MBVqnoenxajngHqyXnwgN05
+g5/hwseMeffhmKYis0/qyLt66bMJch/fHT2ZCjPk1XTJ/XX9vRXXgfhqxP0w
+eMWR4s6vi+hUp/Gw6w343j1tmQ54Zmi58ggsfeNVaz1MKSgfNEO9Tq5uVP4H
+FqTNE4TD90MN/uiEzYOFxVfgc4orW2bJfH85TLaQ/Tp4WMIY63F/T2uZhEd2
+mNrtgQtvyL1dYIr1Fm8zyoUHP5z2XQJblTxldMCspSrti+GgR86685GfaMP8
+DDm4hh35qw3Mn1PZOYr5NLs2RnrBPqYnmQ/hEq2wZ3vgUF57Ug6sM3H38w54
+xuxBfQgs8PexWA/Tn18/YQon1BxPVYGZ7V7+48jX2UvV9BHW7/QzkiDvCyFb
+88shmP+jjkI8XLVBrVcCZnM3f/KAl4lER0+QfH2FCobk/jId0Z5RQ36XM/Tk
+4NfUQEMgrNXcUkXeF+sX7b/2cCHyvS4lHIFL5pVssIBZed5PyX69k3mqmaOK
+erXfviFD3kdLLX5VgsW/NfH1YZ927rYUFdQhd6qFrO836LjsW5ixsc47AW6o
+kjtVq4znti5lQzW8bSWNx4ILFY6v/wq/8Lzi60Tax8sa1iH/nPmZHw2U/ztP
+ugmwtKnXrW9J/2WL/6qHDV9//2YVzLkSODMHy+8vUnSBZcP28syxHz4TKl+Z
+MOu9c7YvzNp/fOQqzDy7/0Ak/Ekjo7AXDlh6doIDH4l2/3sJ4hVV38s+DV8/
+8zXPE55Zle6bCNNb/al4mLKoKGOS8xHxtLEANmy1vO4BZ3wICK2COSeDH+rD
+ig+9p6ph1rpwipwvK86Ya6kKuR/Wnr0Lixf+pZ5EvGTuSzx8KSrzozup1+aB
+9+Q+GpRdET2L+GzrfpdRgrNseQszSD3kJXufk3r9sk+G1EP2h2+ExbDstmMN
+lkq4D5Too0kw+5U6T0UR5+Ry+xATvrR+XuPr+TgHFt/PkPuCFXtBp1QB6+U9
+ayZOHsgqi5XHuLiobNI/IeQ7151yOD+ikx/JfKxOcxsPWcRdNvG1BC4c/Njj
+L4P61Ox07oUrAplhqd+gvjetJheR540rderdPMRrXdv1E9nPlibnw7BP6VR0
+Ohw+3f9UGxYL9Bw74Spp2u9z0ojPMSCGPG8e9vxxCbQLZZjp22Dzd+9erCLj
+W6SXkv3Z4Vv32xHYI15u6G+YK1022AIXfh6x6SWWXzlORzwiyenySfixeZP4
+NsxfUhxHmWHfqqVEqxA/44LY7wva+eKItjSYrm0aMwpLX3+8YwhmqeffaoXd
+2dtbdZG/1p4O91I4p7Sl2g7WSIyVjIMLn6YomsG2sfmTbiT+Y2lbpjHeMODi
+GVW4oe/GGzI/t3YqqAP5iu7vmZWGOZqbdXPhmQdtF9wRHy/76L695P6/npFz
+EPkMLhdXWMPMGLYvE/XxWSdrR75/8BxoPB8prLep6iW5D5lPJc3NJJEPO1D1
+BXk/WrL++kyR99sXQRscWu3047mvNIoab2OSdurowkn6HI2i53QNj8LiQ6Vp
+yrM0iqE4lkzOm1aBbp/qRxrFbDI3Wgt3upX84jVNo0QTVzUPwj47z+r1TdIo
+drW+dxFsLjiYVT9BQ32OJw7BZf+aULPjNIpj+VjdBPkPct42J8HmTYF7DsK8
+smfN4bCt/4m6Ylh4wM06l/QPW1z+ljxvBvEjypjPo1Gtb4kZ+d5Xo1QJa+zw
+2r0eFgbH+ydjfduPA7n+sPLtlNmfp2gUL+NNAhNmBEopByDeQudVnAg41ILL
+c5hBPp4e+fthunyT7hfY0L45eBs5DyMM7hnkq1Vg2GUN11zdW/kKZolDkxTg
+wqgszXewx67IfV2IT/DwtG0+zPcabsiDbfndyrKkv53T8hCYqj3hvBDzi2h/
+aJD8qXO1lg8Qn3jMOmCcfP/oK3hkhviFt1QSqsn3gTO/BXogf43uypeppN5d
+Y442YzQqdCicfQimz456DLynUZdYXYresHBZj73REI3ykba6uxHmhgqu+fXT
+KO7sd2vdyH0yfMfN/iXm7ygp8iHnjX1TwaId8SQvvHKEzBd6zCr/EdZ70GnN
+g9k7+9OO3EH+Q8Xjjav//zuefZeaIb/rV9P/B0WH2cY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.6054786274900135, 15.616941421812587}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/Cb2qXyGI/yjFGKjsd6JckxNxSVZVLLhDLk1WAbNqWNmhAq
+b0VJyCuP1YrIOupMeVVq1+KMsSlTKaOU8Vgisd979p4zZ87n/O/////+fv97
+Z3T9j7kHShEEwcWH+ibES7jWkASNghpJrPd/MHMZJoIEczGqJNFjW3tTkRpf
+ZnddEebvNzE/rUISGWXzj1rXkkTLsPF8vzJJcDn/ZObC2nqtsj/AvH2eRulw
+W5Rtb5ISSZh6WudVwY3a+jdGFUmiNkKzYwR2V3ph5g3zMsfz7bH+xTFlzhsa
+9umP29sAP6gq7o+H6SfjcqyR7+7tcJ49zFNsdmqDHVd01+rAoiidKjd1kvBS
+lBZrwMQhllwPHKDQN2QG02xmnR00SGKP/OBtNjVf5s7WfLh88f7yYmq8xmlD
+Pxyi6B81Ts0f6NKQwLssOt7uoPJdo5u8g8N2Zb/NhEXJdpcaYYGbnokQNjWJ
+PR0E+1cEKsij3qLc1TvmsL+9o1KXMSz58abgONxT4TFlDnM3m18RIb9aVku1
+Btw9MtvmCAcZhfa9xXpFaT70KtSfGG+kmQ6zLTcx1eE0oeWENpyhVh2Sh/49
+2OkYlIu8tQPtxyxh2Zf5gq8K8Mv7k2M4t/x9qUSdPOrzDK7rhBd8BCW+csj7
+/GdOB3XO8015yrKoL37zPTE8rfu37+Aq7Nd+QtMI6/WJf7LoXIl8ew5uSoGZ
+sZ/dh2RQvwetUQp5phvG3Ixh0q75QDJsmytJbZRGfToylSqoJ7o/eyIGJlO8
+pwvgvsJ3rWfgjJTBHG30I6Wf/Yy6n6xuybwEu0x3F2phPW7b7NIrmJtzWqcM
+Jvx+OaOM/ubLy+s6IA85xIrdCD87FbJFDNMqX0VR4z6c9LjzyC96c2AZNZ9s
+GCuRXQ2/Vu9OgvMPV8Rz4dqlRd4a+G79bno5TBbEeacin2X6F/My6n7fBckM
+6skPT/stBKa9cK/yggO2KkuNY31C94vzQ/TDaIu2ow3ME1f5W8DJeQ1LbshT
+dOvJUBP6Oax59oM18vMvv4pnwfwsM18C9dJTIpJUYT3Rqrr672Arg91zeK9o
+rqHBfiuwf+egxhKs5xTDUluOvIY1xga4n5zq73m/DOdgYFoQAVsnRfIHCORR
+VCsSwBmKtCezSwwi49DvHUzkuXp0Q2TVIoNgHhkJFMLivjtjfd8YRLeJ3feB
+1Pt88UzuKZj5rWT4E8xsFFzPhiWS3hMc9KOpud1KFfNpAuZYD8y80cWZhEVy
+nFI69X49fyotTe3/yD3LFU5+Ksy9BZOXAy4chB8n/uXmgry0UflwEg5JpntT
++fkphTtWwIN1hxODpbBu2ohWBda/qla3phXuXlc6awoXJRie/wzTszj+Zcj3
+2L1Q/w1cVJmwXo7KX1Oedw3OiLzSwkV9/LyPMiow78LklBD9cNHssTqA/bhM
+512u1PPNb2axkS/DmhUqRH+510o48VR9fH9RLPylV2Qus4D6h7UTHWCJftVe
+zhyD4HbJeBrBIqUoqc4ZBkFU+9lso+7XGf93+zSDqI28MBMCy8Sf9Hg3wSDY
+xTyHJpgUJUQ3jWO94l8XdLE/eyiHxRnD/O3Z4YUwTzDa9m2UQfAiaX8YID8p
+a/k+Toz5XCvXBri73aP46wj2L6rk2FL1Gi6e9ca4yKulgPp9ZJfaH0nGfH7x
+gIs6+mXasE7N5yPGh5K1/ODaO0HZ5Z9wvob2XsmwpF4/QE3CIOgPw+xSYGH/
+n1O+yMu0Y6mGUeM1vaEpk+iH/739m2Hx68PCc1N4XlwWwzqxn/O5pgR91NvN
+/1C3l8rzNIJ7FKZvcf3agrw81+zYbTCN2WezAeZKz+7MwHzmyAvZJKr+h6aX
+wrE+/2y02QT6E53gZyNEHtLNaSUHpvsGS7cgb5HC8No5/I+IrjqrbkR9kpio
+1FKYbZGdoDWM/swsn+LCfD/O4/qX8LzuIBsm1mlwTXvhxvG245S/sZ7vfoTz
+Me9cWU2Zum7f//9bhfwPJfGW7Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.027272429209974, 4.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 16.999999999996362`}, {
+          5.500000000001819, 12.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.404292302436444, 15.648390403667896}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.767313162260148, 7.106724558493235}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.664385100754924, 3.1263021209059043}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/BLXmuJNAZppd3EhEy7ydpOuRik2l2PlMfxWHucaBmzqJQw
+S14tpVPsei3Sht1i5LGEOaxXHLNGsloaTbGRpTWb9Qz7/dt7zsycz/n/7+/+
+ft977+wMDHcLkqcoygcf8vv/F4umNg5dmqJ96jzs4Nm/oiK9YXGTiVU68aB7
+di7MH50fGoZ5/a/bm+B3j4abmu6hqRaOrUwIn4kdVb8I013twiL4+2BmeDss
+NjuZ8iXcf30mRtmUpjTDJ4+owq6sxHYans1avZSjQ1Oeh2x9ubDLsupTJvED
+yeJVuMVlTSONSVPPdJaXimF24KrXgjZNrQZHxpTC1G5jdgicJv3nsyKYnkt9
+8ieDpi6tP5JlwFKdIqUoeP/V2egIUt+6gK8H3+FciHKBeY8t+4e30tRB8wOi
+PbChyEi1ERbWGhcokP2Hi3OJGWGpis8xj7Rn8uBTeDGAq9AGCz5W/ncb6oXp
+Hzl+j8zblWRJrvdql9eOWzBbqUJxDPaW27WvhOw/0Ov8BfotKfe/VgXzd40z
+JmHvKsENEUy9jVbiYd6b0xOj88R5ERUy2L5S2c8M/WTWDMmCkI9ZRK9nKPF1
+la86SV7Nc6k1JN/hwBZ15NubrG4tb4b6/PppK7iW8X6IGyztaztrBzd4+C0U
+w4L8ugwzuFt6qWcGpoXvGSygnpNz68qH5ujfManxNpyV6rDGhWeVkhKs4bHs
+pNZCWPCRhvQB+uMtnRC1wZl/v3GygCOy2zyGyXpRrKQA8+kLxh3GYLFCp9Zm
+OLHsJf2MrEc8t09BPp2JYTl9cEuXpbsmnLjpjk0dTHvbHa9E3iMNCqVZML+3
+c0sIXDPH+JFHHJevb0vu11vdY0fhgI5WJ2u4fimhyYisc7RaXeH7B6MVlEj9
+c/KrqbBPYsE0mZe3M1Y8AifEew09gwMiH+Y6kOdFLr1QQvKL2Xu5Bc7p58ZP
+wmI9PZED+rcJn1unUE/aEcH6Db72ebJsN6m/7/wHbphfdDOJ60XmHW3g98CN
+28Imssm8Uaq32cgv1lFmJYGpQZWJOFh5C9XO2ovzbX9+KYDVenTzLsB0Ybmw
+DR4Y2F7UDVNpZew6mCmIrWZa4PreW2pTYYvodIkvzHt1P+oQbLN291w+TJ38
+xvQJrl8fd+yYGOYny837wi+49xoW4IABdbVB0n+zwrgKmzyPP4Ry4OVhia4G
+nHlDJb6aQfOLf/+6djPM0xRWsOC7mgafbuyfEitVIL/qFH7aEuq1VGY9ciT5
+uu/PGIYzo0KOLGnRVGkkI6gOdpHfYd8NS86PMjNhwbxIvQEWGgV1nCFW7uSQ
+9Qnt7cnOpN+0o6JFeOqyp5UFPGuQPM5BffZUjJcBWfeY5pTDrO+0Z3RJ/XMa
+AYa4X/qlHacMST8rI+Ul8DunXVwtN+rZyEzJfH0v/jhF5g/+trUK/iVG7ZMU
+kqdKaJc58hGyeGq/kv20wf4c2N/ihMkmzBtw8Zbea7iMy24zIfM3qzUak/fR
+KO+0C8mHU9VrB2fkP7wSDbPfdBXhfvBXFK3yCuHZn1iHdcn7mjej3Q5rOr/x
+f4x6CwPzueOw4PhWv7PwOjnIOvl/ZtL/AbFTDo0=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.501529066331596, 4.118561596984358}, \
+{0, 1}], LineBox[{{12.500000000001851`, 13.}, {5.500000000002592, 13.}}], 
+        PolygonBox[{{8.4, 13.}, {9.6, 13.4}, {9.6, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 12.0548}, {0, 1}], 
+        LineBox[{{12.5, 13.000000000002307`}, {12.5, 5.999999999998607}}], 
+        PolygonBox[{{12.5, 10.1}, {12.1, 8.9}, {12.9, 8.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 9.5}, {-1, 0}], 
+        LineBox[{{5.5, 5.9999999999976925`}, {5.5, 12.99999999999251}}], 
+        PolygonBox[{{5.5, 8.9}, {5.9, 10.1}, {5.1, 10.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 9.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 6.}, {12.49999999999251, 6.}}], 
+        PolygonBox[{{9.6, 6.}, {8.4, 5.6}, {8.4, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 5.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{12.5, 13.}], PointBox[{5.5, 6.}], 
+         PointBox[{5.5, 13.}], PointBox[{17., 5.5}], PointBox[{12.5, 6.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P2", " ", "N9"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfhfjghgj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfhfjghgj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781961631303892*^9, 3.781965298442441*^9},
+ CellLabel->
+  "During evaluation of \
+In[126]:=",ExpressionUUID->"d4085d86-3e99-422b-b464-5da95ecfa967"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"BoxDiags", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insB", ",", 
+     RowBox[{"{", 
+      RowBox[{
+      "13", ",", "14", ",", "15", ",", "16", ",", "27", ",", "28", ",", "29", 
+       ",", "30"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "BoxDiags", "]"}], ";"}]}], "Input",
+ CellChangeTimes->{{3.78196169337131*^9, 3.781961710191373*^9}, {
+   3.7819618005942087`*^9, 3.781961840230801*^9}, {3.781961979291027*^9, 
+   3.7819619794931498`*^9}, {3.781962818010491*^9, 3.781962827546507*^9}, {
+   3.78196534487297*^9, 3.781965345132948*^9}, {3.781965378765173*^9, 
+   3.781965487939272*^9}, 3.781965815070829*^9},
+ CellLabel->
+  "In[167]:=",ExpressionUUID->"e316f8a0-fd46-4d5b-90e7-440910bafa8b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgei/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781965815462859*^9},
+ CellLabel->
+  "During evaluation of \
+In[167]:=",ExpressionUUID->"2028ddd8-fb1b-4f8a-8638-221f68d71770"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdgei/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781965815466957*^9},
+ CellLabel->
+  "During evaluation of \
+In[167]:=",ExpressionUUID->"9dc86eff-c1bc-47d2-9797-7070a68f4cff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7819658154716587`*^9},
+ CellLabel->
+  "During evaluation of \
+In[167]:=",ExpressionUUID->"2ed9d214-be4f-4374-91a9-3ed6ffde18aa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbg/chdieg/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7819658154748096`*^9},
+ CellLabel->
+  "During evaluation of \
+In[167]:=",ExpressionUUID->"c6c44094-bc27-406f-a697-fe8027a06958"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt2Hk8len7B/CHJMKxZKc6WUJRtiyDzokaQpJStilS1uJEk7XOaRKnUo5t
+0jZOZiyDZEmEpPqmlJ1CK429ZZAQ0u9z/75f/3i9X9f93Pd1X/fyPKzaH+py
+UJCiKEkBiiK/OeM/8LOGSf3/jy6T8+AKZX+P+ELOTx1rmZSGtplXBKyYdb64
+ZC2Tw1t6M2wNzOsrXHINrjy9IPRKh0nxz8k5/o72XZKdeefgmcch/5D4xuvi
+XzbCra0m3DLEPdN73Ka1mZRZpcC2F4hznLxlKmC7rxdyhXSZ1HNpY4oDa682
+OGWJfDSch9J2wsMfC9xjEHc8WffQEHZO2rujFvEyaZ+vy+G62y77BPWY1C/5
+A4JycKtZRvBmPSZHPOOOqQJcGWRx7CTiGYuWeKjDAd6q1bdh6fy9d0xhkenZ
+9j54OHfI2gVmzum2UuuYVPW05mUWzE/NdZWB75Ws38Ajfm+XKweXbKFiimDv
+kMzSpfCTB+z3T2CKXS85gf6MJp5JvYFZa7fNNiKfoPfuX4dh+tNY62uID6nx
+34+S/BOLTA/Cd9apZ/XBxf+WJmqh/dSxyd8aSb6/pZkOYb7OV6d8Ckhc0tQp
+F/U4e/NUwQlSz/tRfUFwrbXPbluSX2VatzG8Q2FjtzAZf8S/eQmef5FgLXtP
+C+3fuk8MYD1Uqk9tDoO5vJ8+t2I9vJf6v1ODi3n72xtgp1qj6I7VTGrMYF6k
+De0jNYzy4+HWetqOQcQv+7QObIQrDRLui6B/80M6/guaqMMJpU4TuGPnEenH
+8JhPVEQIXKO93+MyzCqV1L6B/OpUGs2iYP0ji2ljiDPoMkoHYDM9q5XGmP/q
+7cu7PUj74r9sjqE+Rz4IPvKCZz7qRpfByZ12fwfAvKii+WG4afXBrlg477WE
+jyzW4y7r2caLsPaLZbeN1jE5lvUX48rJeCbXL29B/NJM8crncKSFjtNW2EtB
+JuILrFh3485G+OHdNopG5jvWxloN074c9VYj862ZyheAXR+on1oH15mUGbdj
+/L8/hVTqw3yP3R6X4fSxE/VaJN4S1ugFn9SsnpGBvWNq2KqYX9l/zLUnyPj5
+FWdeox43TqXefQRzb7yby4RjE4QKL8DMtd9rA+FznrJ+TrCUw34WzgcVKO7Y
+KAx3byq0Vkb9IqueyFdpYP4P2f/gPHGULtyuCoKHfaP9v2O9EhXGHVXg3io7
+KxL3DNX2bVbHfrwXo60EH7WYPxoPZyh7brZA/z8YJ2q3wFJVKTQyvr3jcU0a
+af/OIooPN37uUutTw34XDlr0Dh4SGCy+BzOl5LtWYX7eSs8Y+bDZYsEP2N8c
+96VWxXxYcRellUfW6+z8rixYROwTdwDxqsZPszfgSJtMOxXUV6M/dPo+zPLT
+/PYzvGOTreVrOMPjXrYf1tN4uR5rFh5LtxyJRFwq7O1SZeRXLJu7EAu/4niG
+m8Fc06NPw9Be/P3nFTthVlvTKw9438iZm/6wm2j/QRM4TUpc6ijMf3bRYAn8
+dVT9/DG4blCb24J8l6XxRw7D3l6DCinId7ydedidxBdpde5AnNvg9ImMV0eJ
+tkvDj8f5zeJwr9Y19eeor97sEPUC+ea5m5T9AQernPySTrw1lX4EtqK5xDnB
+dLlT151Qz3KdmBEBuJsbM2SGeMaK0d9LV6F+/V5iBvCAhegqX3hsmSvHFN7R
+M7JcHi42ZtMc8bxBp4dwMx3nMZv9/DB86IuX4nk4IOL77itw5a3dlq4kPhLD
+bcfz3AXbz1pwXkLtBynMj29J0xWGFTekFe7EfFr9lTp6V6I+gtkPLsJ2EYny
+TTCnvEjuJWzb59zSAnd/O5GlgPrPvRi7Ngj3ho7/sQ31PNx4UmkJ+rPLsrkS
+Req/ba/FKnisRz/zEtqP7B7xYsAzptGbChH3i6qe2gtz6Q8qi+HUynehx4kr
+xvtzYKPlLy0ziDdVOifheTUPiYVCWCpeZm0wHNgke/UOXByqZW4Jv+DUedfA
+3UVq94Xw/M9dXLFbsHanaOhjzHfuwuneTNKfbatxAixC21DChlnuWlq2mN/F
+qvy3O2G32iK3pXBKg6jrctjZ2qq8A/VcrywkUL2S1HfmbTZ8svXPSF3Y+cpr
+2il4dJd+VOoK5DOsO3sIPp76fWhyOe6vUdHaA7BE+sRHV7hyeFU7uc8bWSO3
+qlVxnq4pL2LDvFsdRmthnsD0UXL+9rsljOSpYLxTXjeaYKv4mQIzmP7MMlsI
++f261zfqjTLW7blUnzUsnHlm1yV4LPfUhdOw5Jabuofh3hGdnAbYNOZouxvM
+CiiTFEe9fFdLz3rAzPGBenI/1ni8sD8C69/K/cGGp85bxGTAlVlBtlgvKiFJ
+K7IRnskPzGqE6y5lposgn+4cjz/fkf3Q8Xu9LTwmHx3bD49/tOmJgznamqKv
+4L9qdcurSHu/pJaHsPzlRRn9cF0BezYTjphlOy3AihL7HI7ALsaJfkKoB92I
+ufgnuHuW5TaJePGxnrZ5zOfnVzLZjTAv7Nb1Gth8smsokTw/SzsTC2ts2fdq
+A2k/L3WFAYc6tzo3IH/FXtojEVitQ0fZHg7Yn1TwEvVl/Js8XK2E9ZepOFsB
+N9Wa09Vhs8EUletwifk/f8Yp4r61P8nOgOcexF4eUMD6v7tpiPNOVdQlGjjA
+rMDtwqWw2+S2fVXyuM/2PFQj+8dXySfXFO7NKZWmyPguPf31cmjfcLLFBL6e
+p60aDIucP/DPUTK/8GV7VsN2+sOxFXCCpnviN1nUg5OWPgdXtBin9cNugjJy
+5H1Gb7BaMwib6WpOxcASisnzc3B3w3+CSmGFsPOP1Uj/7Kvf38IxD57H7oa5
+OsE3f8CMksfhKXBr2FvasvVMKp6hfr0N9i5v3qoIxw3Zd9CQv36khKkk7Guy
+bWwzmU/wDrcZPC95ucMwFOZNa3d2wqrbV/qegd2SLQJwnqmDDodEeaT91+O7
+QuG2y94XOfCTuB1MQ9hc+lK8O8wtblEm31fDEwNByjBdq2a6hLx/+72mHyIf
++qG6UVIfi0uCU3vggDV5763I/u4OMezBfAPSXOMl4UMbAt0cYG6ZlNxH1D+8
+R/xJ6TKsP7vQAfc15eLA9pGFzToebG+EN1gV2P8qg/OQ8eN6Gzy1pbLkpTTu
+Q6GVigOw1p2VSVvhmcbBt4vRf6m/TVC9FOI5gnGG5Lxpb1N3hd20nZYEwk/H
+a86MS2L97O5O5MDMF+H3/GD99EcRI7BIpX6/GMw8N8zTw/yrDPgVvTTyfm7W
+ZMGJTuX33sORwwz9Ivj2pIOfBGkf4tBLzleI/MJ6D5i+89VdaazHZo0rovfh
+7tsm9YZk/bJ37FJFPiwD4bifYYl/1Y57wmO19+iOcPPzl00ZcN6lv0Ns1pP3
+tcraFtiMMz+qC+e1JTV+g7tHxSpF4babYsdkMX/nT3eSyHmO1tPIV4HHYrqL
+/oKHV7/vEIdZzJAqf/j67LWDg6Q/vRV8LfL+nk35kAvz1NeGD2H+Pz46SLuQ
+8VPv2ObDo/e3GTUhfzc5YVo4vOB0LbUV889LsQvdTOrdYMcrl0D9S4du0GG/
+N7Z9ceLoryDyrCgs03Bxk50Y9pdD8zpyvkojxmZFlyJeJE0n61Vs3RTUKYLn
+O8+aKcLRmdz4kiV4P/zm+7cZuT+/7jqQL4z52mwXIt/rnRVZzfWLsf+1sx2v
+wGGPhIfE4Tz+Cske+OPAt9ccIeynayvZ5Hvmtu/rag2Y36aTsQ+eHEh2mVmE
+5+0/bMqC83S7NnyDi/3Mf+2FFZuN3qihPWf/Rm8F1DfHULcnBOYxdLib4c/l
+a+jPYfqdpsGDsIgjN8QR40udaBeMhnmm5uVPYea8owAH3u89mbwF+UeenrkZ
+AWfttHhWCpt1X0jwIf09in4qgvnaia3O2QhnRKbQGMRyXfelSH8ph5OdiB0d
+ZV8iPx77s4oh3PpxLfMaue8rbOIG0R9H9qrBL/DSoeqOINjNwG1OFeZTu1zq
+kE/r9EzJO7K/N4dHjCJ/brKmLfkeVE04U/eZ1OPtQb8oOCchNrRTEPuH8ZOr
+KzyVNmH0lwD2z96pLnKeo63jH/pTqFfEn6r4e4G6+iLimcsCA3kMFpL1OlCz
+dWJwjkGxLNL8Hch4i15/zvzGoIZTLH4Lhl8L2c8nTTOoSosrKeR7JrY38WH9
+VwbltuRsZhNx0x6+8ySD4uglmokh/wOlRyRMvjCoJxKzKdvI++pKKCNmAu2V
+vQqSYfGGhImVMFf3cCC538YS2w4TR47KPpJB/Sxn6qtZMC+YP7oVVv3FR24J
++uMGcr3IejR2NEW3w1JXDaQvwcNnLobVYXzvbzbnbsCT3z0Ha5BfnsWxD2Ww
+7KO7MmVT6N/822wB/FHJj30B8/G+Ibzu9/Xku+r0F4sZ5Pv+6B/h8K0Almc+
+3EvxFrbAvXuupj2DWWPP48h9HcuIl0+H3Zrj29qRP0VLY1EwlbKlJQXu36pw
+UQz9KyYzeC4wV6NjrhL5tCrH6JC/h+ej37Akka9d4qILb1C/J+2GXUqYb8Bk
+fnCRHnkPJpo3/cug+HHCYmfhvDfmdNoHBqV/WsM4DKYPz6gtH8T6LLNWCoAD
+RMt3q/dhfWzYdodgfuyB8LRujJdqmX0C7i30oQ01I1/5I4F/kPvTc8TqVg3q
+azuy7qne//6vUXD3v7/XMf8PEmtJ5Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.72102250104224, 16.744111812358444}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0VGsbB/BdiEqMSyWUcWiSlJFyysLsdOF0cummxHRGiXKiCUW6nCHK
+JUxM6HSb4qN0MUVyK1Mpo+sYFUlCKhShEIXv/37rm7Wsd/28ez/v8zx773dv
+4y271mwbS1HULfyRkfoxip8xTf3vp05T9vMNBkth3q3Gcb4TacpPw7N0Nywo
+se0emEBTlq/iJSawVONr4l04eKw//wUT8wlZsytg/7t254/A9D1jLoXzT+f1
+19rBlMnEiaFwwZ3Gnl4jmhK/CgjXx3rxj5k2B2HBk8cxX2CBwuqtAUyp2Kg0
+T6KplU/DV1fPwPEhw2adGjRVuMeo4ywsSNM9PJZBU6LVbfXRMMOUpZ0Er2Pd
+t4oi811KE3S0aMpC3a5FBDfJkqIS4Bu6to3FMPXxH/NeWDTUbNsJy2WpRx21
+aSp0uPEvc6zvrpFisQ+mJtQ67ISZQdktqbBIM1B4leTnoVdxHLZ926PTDgu7
+ZziFwP5vfD6po17+qOsiW/hsADtrOszM+ZDVjvU8eBZNprD0Xd/NGLhMv2qu
+MSw/uuAQybf5rk+mFiw5Ii3LQD02tgeffEZ8emdVugE87lQZ9zTp1983spZp
+0lRQxJljNqSfsZFj/NAfv6SAwTLUwwsMOpSN/j28/nW+Ncwcv6xBE3bMS0g4
+Mx3zU3d1XUK/ixxVP1Aw1RNjFwE/asjes8UQ/WLGlh+GWfUOcZUGWF/91+2H
+8B0/xyULYab+aRmNeJKH1R4SfZJPae0XWDmnoNkO5vWMHL2PfLrieliN05Af
+nRhSiny7jTbsToOp9vJqX9Rzr6emzw+WP58+oQemq9or3GBmwmKTA+iH4ubn
+KmL3gOGOUVitXqPOF+7emnt0L/orts+rSICF6cF36uFn5fGJUrLekGi+mQ5N
+BRiYxo2Q9Uapf73gjHqVczTJz1P1QzDst8shJhKmnRdvCITH6bBxTTC/c6Xw
+TzjWIt/4M5lnxEdrwvM8U6InoP4moeu2MqzH0E6NnAKLLXdFeMD0iQQvddKv
+6tNdLch3BR3M68D5wn/VjvvD3pa1w3kw+5Bzcgfqjd0tr+SS9VIrzYNhlrdy
+cB/y5Q8uD1SGn/Walu6DeTZfy13Qv4+qNX926cF/bT1ehv4GDYfFb4DpklNN
+3nDRSXO/kqm4HqK+dmtYu8/IwBAWNy1dvwyuU4R9i5yC859KJyeR89V4qj2T
+4eiLARqIP78kZTSQOGcPJSXX6/6Ut7900b8faRku5H5U6pCJYammF/sxzFj7
+ttMLlo/ZsWgt6ruQHrTZEpZUX858By8Y06BqAItPMdkB6I/wwcT86TDThXvj
+C3xhs53OQpidqsLzQX+HRh41c2HeicuT78OHfpOqiGD6QLVoEsZG3rIHCozu
+74xu2WNM418c0UW+0nB/0Wp4yNfdbz3MeJ550hkWxaQ/TILFHu3JJvD2zFyH
+Mpgd+jmlFfH7uVsPvobdRccGkuB7XZv7WmBa+bLJLLhgd4PqKxLfSdPzBvKd
+Ec01vQ4Le3/usYEFKxPehJD4HO9rxaj3ztz9rTPIfO0n2hFufa6tW0Dqm3t/
+ziv0a83U3hU2pD8c89YIOKDli8MlrEOpJ+suhLu5BXu0YPFiJ181OPet4iPZ
+V8ShLWlduB6FS4/UvERcedrMPrL/pQW4HbaDmeHeVnPI82S8UPkqRsl9q7Ag
+jGrKtzvJ/yVeOweqMB4IHlgTgTiSrO13FuO8Y98LjlbiPpALn7wvgutOZCQt
+hXnDFQ+WYN2NNVynbjzX/CHK5Rn83YNa8RSmLGxsNiLPVRGNtbWwQF7IfQ3X
+xa81nUjiLYwbvwp1Wqxz8OfB1JmoeZfhrNo8x+cws83kai980feTiSvykQ96
+HjZC39R0XhcqyH0nq+q2hLWP+VnNZpDr1ZtgAm+6ZrjNB6YOspx+kr6atJkk
+wnIWc1sxXFjAt7oIS8+XcH3gvfky/TyYV69XMID87ixQ552Dm5LnSyNh54OJ
+KWGwu/fGIBV4hslvfr+TeMlFA7Go98DjQzvKkQ9j3dJ0bZgnCG5rRf7imHCH
+i+gX46G9/QfUL+/NdXGDMxrOG8qwT7ozDdaqw5JA5XNpeO/xbQdrWhD3Sk+O
+YhPekzzeR+OXsGCJs6PReByX2u/QSvaDuJd7ulTJeTHVmjj/yT9uIYpxqDeF
+b+YBi3fcXf5CBffX7Wi3AtguerLwpzLWy2RZs5Cfd+NHtissfBxbnQ3rjeT+
+fK6EfmsZhrHJ/qcTHx8Fy1/zlG7DMqnWnG2wwLx+/gr0S1d66WMo8df/dDwg
+z4vbluwrSuR6m0fZoP/hVgF8FcQXG2xWTYVFdcvK9sKSmLCIWjj6QOXrflgQ
+YTFCYZ+RaI7124982dFLhybBi9qOywZh+T/V80ZwvN7MsHx/1CefbH9LAesO
++p8rhQX8978S4QZ+pUMnLJ07etIaXtbysrkPZvLY82TIL3xoS6UcZlRdZ5Hn
+v+iKtcd+WGjdcOAF6qPz/Oz6sJ6gfVIQuV8NDb1CaBVSjzf7PdmPXNtm+SBf
+5pFTORFwWY1SLBf1CjudZpiS53uzdbj9WNyPGjkqreh39+8uCyaMQT3KZtLb
+sN4NNempUQ6+b2LD82GzGKVprGEOxdiWq/oQjmVn7pYNcSihD7fjO7zdem12
+2g8OxfROcHJA/Lo+tagL/RyqOz1u3DmYP2fvp6HvHKrJZ993beSrpr9p+uVv
+HMrdcaBfBC9S/L2ipBfzrII/jMg+OtNp4hxYeolRQZ6vImpHxM8e5KMdbLIA
+/SrSKDGaiXmm/LnHDXgj9+iaM7D79fZKJq4HW3tR4XrEF4bmn42A+aGXP9lh
+fcY+2c9SuC1ay43Tx6HoGNasFjjc11PdGfkyjX5JPsMCVe1vSwY4FLt+JKoO
+FgY1xemhPjouvPnSFLLvRo8phsUnR7y2wLGzHk3VGeRQfEXCNRV4o2fJm2kw
+U3W3KIO8d8plf1TgeOFUu2Qm2cfvZRdNIm5fnpWJ+mQvTmj1k359VtM1I/uo
+dXJ1JPITtF7RKEB/wi0sa4pRD++axw4XmBH45X0u+iE+fHfDIHk/ay1Z+6gL
+/aoPmUve3xIXt/L+dtQ788jsk2R+XWK70gf01zLYLYXcHyeUZhs2cSh5bIXr
+Rbhp1fSzileIJ3gZQb436JsDxSufYP17nQoW2cddE8bVF8OaofrxOv//rs64
+TTHIqEv/F6niFE4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.245181569676696, 3.3258894180601777}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.}, {6.5000000000081855`, 14.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.850455074238777, 16.59527726407387}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd13tcTOkfB/BTLKVkYnRRmO6ppHtZxUGSEbohCpOKLmTIioSJSr+URmrl
+2mippDQyirR2IqlUO9Kk0mqQSiqD1q3S7/Ps/DOv9+t7zvN8v5/zTK+O3tZd
+3iGKFD4KFPXf938ffZpikW9VmuLxVlbPgMUDb3jak2mq2aznLA0Lflzz0VOj
+KQ8t4UMuTAm649Sm0JREyXRWAcwLPmndBsfOuaX3HuaXhcS6MGjKrmFgyNqA
+pujNzqeiYVFsBC8W5iXbcs/CYnfVhBpY6HhNlANXXf9+a5ohTXHK/6AyYMOr
+7Mf+xEVTvkTCjNbl5y7B3GVeRg6waroH3Q4LxNVvyP6sk57ak41oSibz6rCE
+W4MWvbGHWe3dW/aif0FV8GMfUj82c5EI8+mmbQ7aBnNW3Uv8hvlF8fYNO2Eq
+LYK5EjY13p0eDosruHNvq9BUYalVySZSX12iswhujkxKdyf1f92kHybRlJNn
+xkcL4gKzknpYUtHZpArTOU62baSu0hvWh35lc2s7NHA/3zJbsQbmDcYZJ8C9
++OTBVNf4OD3s3zGk6ZlC5ruzeHcP6a+YuyCa3K/lJpagf8H4wtBwWOyf9qcU
+84l0OS7bYTp4xqkBzJ8fN/1OJMxa9cbjOPJiOueHxMHyM2rhmuo0FZC1zT8b
+5iud08+Bqy5YOJB+WO3nS/Sn0lTK24RZw2T/uZkPMmCnzmtPHTCPcHpD5hCc
+tf3TjQOwoN3RZtE0nI/PzrWVMH86zdsDu++OHVY1hvtmBqbCASqCMT+Yc6qh
+PI3UFdoT/4BZbkYHYuAqx6XefTBFjR1bA+f7NLPNTXC9ZmeBOrw/UnQmGJb7
+fUyswv6uAR9uZsA0+6LvDmJ25d5ymLLwqJ4MS5Tr5khhcc/SpiLMFzsjl98F
+M2JuHPKCTXMuvOqFBVHj8kaRT7x82ZPXsJA/pakUVnq4NOIZzP1R9ZUH0yN+
+SyrI9c4t/lvg/vothtlkv2myMF+40K3W8DDMOpx5PhCWO+/j+ZP9ohXCSP6y
+i9KE+aTfyYlLH8Hu/W6xM2BPuvG8NvpR3fH4BEXqDlGf4uDCUwNXB5CHMOCP
+Tz9gxj7T3W9IPl7FmTzMxxllOf5nnsJqNeQjn/i9hVzPWljqmA1L6obvjSN5
+fW3wsGQiB8qgzRCWxdWfK4X3jrt8zZPMY/G/aNvpeN724Q6JZJ47wyUCOL7g
+KKuK1Jd8evgDthq5XKxkivVPNA0s1EBfzfwuL1jMeLYpArZ7cfDkRVK/G7Xw
+CGw63W/rO5grDRHHwIL7m6fZzsH6HvFaW+D+cecj9sOev3/cYwm7hxwLKoOF
+7Lcv3mM/17Ycx0Filt7s83BsZvhBHTP04RKWTcN+TUGmC2HWc6HJK8xTkzP7
+2lpYsPNDWRzMiOR2BsI8xco1JqQuKzAKgjk2KndbkI/M4BV7I6nnyHwzYPF1
+OtmdWL+qPwjurRg8NI9YdWGyOzl/f32YrA579uxZ50rOs+Bv/w9zyO+FecwP
+rtHuul5P+r171SUB9l2vs+o6TB8+VVQLNw/58VJhvq/9qAH6aTYP5fxG6mpR
+O0/B+98dexJM8nGlotQwn7gseM0mWFLk1PE7LMq8psWBedtko0bIK0NnVffO
+OeTvw7euUpjWLVI4TurPTp9w1cT51Y9ZQPYXFkap1cFdpcUDbSTvXMdXS7TI
+75CnOJXk0fT+ZwFcUdk/5kXyNfjMHIOT1BM1s8i8SkdznbVpSmtK+fzXpL7G
+0mQrrJv+zNzSHPsF7FfZBYfG12QfgOX/XmgMgpVOSj0ewMLA3QOLiatkEydY
+IPc6XosK7Dp0qX0JLChlSqqwX2hCvFY0qU9fKOUSJ+VwL8Pic74RTLg1+eaw
+GObvKtktwjxUumiZFOZ1FQ+sheMLG7xfwqyUSdJR5GHVwMjugBlfP7cKYfmP
+ddpPyf1TR22j4ELWCu0/YeHBoVh3cv5KVb1yYMr4LM8W1v1pdu8o7Pn4roED
+rCSOSuAQp4yt9iL3n6n47gJLjix4Gw8zH+wNmUnWG71Y9TfM6lJXUCDrOT1p
+mof+PEb9W/uQBzXBY1oO7JScKeogro54rI/5vs0OU24leabO+72IzOsR+vYf
+WHKgotwFefUfr+wehGn7hY6NcJVCrp0KyeuS5aSNM3BembmHbIg/PQrqgPnK
+GsNBMP3Vr81TB+dHef2BS6Tfc7yMW7Bhw/VgGWzlMy1WQRfno3NKu8lc5BT6
+61onuPnIpnt7YEn24hfr4OCbfY/uw7RIvyEAdn9xvUDZEs/vnwVyNixXbDf2
+ghleTCUDeGjLdN3TsKQy8WEP2T9TMa8BFlrpCC7AdvRu2zFSd3lQtQwe6rFL
+NZ6Hvp150h70L34y0r8EpgpfVR6HTUWXKV+Y48rmm8FdB04NboC5871Mpcij
+9Yut71pSZ2+flQI3X9u4aDksWfbvUR84Q0/BwBoWx46UWsL1Ri2PmbDg7kR3
+Fiw+aDN/iPQ3f6B5Dlxh5V78lMyjHj+yEh4a2RNdTOZd+cv6RFjokfsijVzv
+uyXmOcwcP6b8G0wlr1J2QX+8okOjHFLXOF1/C2YcfxW6Fvac5SF1xLxZ7MQr
+PmQ9757cKlh+aIIggHi10va1uuQ5Lmjlknz6fdTfwoxDyt58mNc9Whg5E7+f
+h0bnymGWYUfcAJyV9q52kNyvXsveNIumLnAG+eaYT/7y16By2OqgxtJdsExg
+Oqgwm6YsEkP7ykjeJReHrOHg7rEiBSvkkCqKWQF/KsjKMyF+qpXsDmf9+rXc
+A+brC6ytYIaxsG4XLDP+eUCR+HZ7YxrsGabq+QD7ScrUZddhwaKTIVGwxmet
+xQ9hTup95RlwwArxNimpyzyGy9F/7Gnh6CtYGHXb3h8uCeka6IWtNNUrxjD/
+1JY8/z6Y0ZsRVASfFDFzu8l6L0eyQ2HvnTpBL2HqykRfe3L+updsaCL983/m
+acBK47ZGk/3lk8b3qsFW3wvqSsj1qWkRs2G3oj1Rl0k/V3WPu8MZl83P8sk8
+SVeT/kf2u8XcHAdzb6v9JYNzJsx+tpf0d8EuZSX6bV6W0h9B1nvUzquGX1fe
+j95O8hJ5x63CvKaL86eGkvXKfD6+IHlo2BpFkutH5r3dgfwm/XjfcYCsr7Jx
+3TB8X1fH/ARMMxMsFrNoqqmZ84j0lxUTlH8Y/j3mb9M/4Rp7CUMEO68LzO6A
+tW5MvNEJN67gLx+DQ5ECpYd+GfdnGlqj30U8MRMWxitNZMPy3k/jZsJKZhr/
+7IJ5s9YaacPc3oCYDJhR5CdRhjvqt1SXwqa/TDaXY32WdmCl1Jqci/O1DXDy
+E5U0OfztaPjFKzCnM+fIBBvkuT5Qtg9mb/DV1IRrulmjbvCX6Vun6cP5ZU6/
+acLfIt/tMIElE+pTpJj/h5nFBmLx/W/ZibB39frl5HqZqkmUG7z62esXWjD3
+OeOOFkx133ynAtN/pfpT8APDVWEj6Ef23X/bGPLeZxMf+d6aPM+IHg3Um18P
+6raT+eae7iXr3fB4dL6WOMYk8iRc95KvfI/ktX5/3Hu4q3o+txhuPf06Zy76
+NbOW382D87WDVXbCXXXb867AQmnt85uwU3fD41yY9YFR+B3mWkv23CDre7Wp
+LEGehwc+V5H1qTWDe5Pg8ufBlxphjppaTB288bz7lW7yPKRPO37Be9U+YZLr
+OBvy/3vOVSe426HvngGs1XnXKRAeLLaZtRzuvbJ6+2G45YQiZwfJO90hNg32
+dBgJTCfP48repRnwy53ikTIb8v4WrJoK1zctmtxB8ksNz42Bj2q85I3CpntX
++22G7WzecnRs8X9KSVbTfLhkd2OHHaxUkTRzCmx88bP3CphrufWYDP2Lzq5c
+7we3FnyPFsJq9/vKAmFBUOLhONhySONICMz4+LfaOlh8pu1TEFzzZ0uMFdx4
+b1r6JjjfjNEyFWZPspviA3OyF3b+RJ7G+dXuy2Dq+dOBf+G6cEvaHuaPZb75
+Brsu7lMzhK1Wsg2UcH+AdVv7VFjseizFAOZP+FGrSPqvHn+IDadvnvNlCPPu
+N0p4fhAO7+AE9sGtCaemlMIvvw/1vYFZccxfv8IWW1zdXpO8Rhr1XDA/d5Xz
+57ckX0nv5gQ4S09x/gdyv/witwFmqw/r/yTPj/Hl+VS89yZ/9eL918/1MBsf
+uD2Q6jaHPT+s90mB3ecuu0Xy9Mtz8a+A1ZQ2aEXAWnNuP3kFU1bas9PgpJSw
+M8OwU83K2yL4Trn3XGW8txVOZNxph7OcHhyeBI8n7/l2mJd8G9L/B4/XuA8=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.278814934002025, 3.4867457599351623}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs01HkbB/C/sim5jGsubU1lxbozpdz6N2pjM1FrhcQkNiRRwm5tvDaF
+OA05oZRRyb28KclKo3rXhI2QFSuzsrUrl5F2V73i/T7vnDNnzuc8v99z+8+c
+MyuCD+4InccwTD7e9MnMzOH1OctwCEtZJiF8dYvADP4ztkAH/vVkz9MCuMNV
+8E4dZk0vu4zA0YfMjccNWUbY82CrnTk+q+LLqmGpy1z4Ebh6aaGbHxxmoxR0
+Hfb60mLxGwOWKT3TKPyVziuWcyLg1AxTs1lY1LkksF+fZW4FjalrWbCMZEu8
+eBOcF1IyawBX9298XaHHMklpt1J0YS9ba/8lsLApqHUBLFR/PpaxBPHA1sQx
+qrf4kYEmrLKLL20jt0Ser9BlmYYdE0YlsDwxwmI3nBHnuCOR+klIPGAKc1o9
+VvvCspwHVRowV9nlMA9ml4aN6MC8N3f7dGGuhVzKo/vFl+4owB0FdaX74bpT
+a2b+xn7kxasf1sKPrgUaTsNJiq/8NNBPqm7335/QfZUp+RH46rXd3Vy6v6ot
+6wXM8/vW343irTHam2m+qqKco7DEqS3iCvyu8eNsHRwd2j0yBcdmjubR/rg3
+3521wb5i21I/utO+Tnt6+MLdUe+T8mB5yIxmKGxuabL9NSyO6DLygR/9S5Bn
+Z4n+ChQ1zWCTlvLC72D2VMzDYeRfp/VYfhe2/iT1YArc3Xn18AS5wTiRA2uX
+e6fqW+H5dfyyNx39s9lyA3vYWiF4zzTmb4v4T/UWWHZiq0AIRy6zi9oKs8qh
+W6Q6OFc4pu1K5/dJo9bCqd/UfrCieMlv56q1WaY3iXmvBXOD9RgnePT9Fp9J
+1PfKSl4yoIU5ztuWt8CiezVsLux2tf3eZVgWv6EyEq5LORp+DGbyRpwC4Ya1
+iw75w1yDrmP74cqL/d9soPh6rSvZsEpTZrIFzf/8fFkH7LSq7IwxLNTjHVqB
++gEKdZ1mtC92fDqRXHb/gzPcsedk1iv4VpdMbzf1Z/bC3BPzSM+dKEylem2W
+V2pg1p0bfp/6Dds/p4p9jA46/zQHi/vspb6w775Ps2lfSR1/8c/Q9yt8yiMH
+lpy+WVUFS9b/4PASruZaHfg3LHJvb9KzxrzSJ+b5cPpnCeYuMLfu5XgIvO5V
+TboQFqdlq+jCtXc9bxyHq8sEn91AP0auveJcuu9TM2sHuxSlFZfDjKevTxnt
+W9/O4w7db7hdog1zoopi7sEdm+b9eRT7GT4u4JO9Vlvwf9dkmWyJwzo6zyz8
+rskHtpQs16mERTW+Gj0aLFOfzH1eQPdbFO3C4IDUjNp0qh/jslEDDmleOz8e
+5rQtcunmsEzOBkOTvbBwtn/sJhxwxEDkBbP6001V8LDjpXMsHJ2i2PUQvmQ3
+E8ejuI3h6FuYv2GPswVs7fBzsT3ybxPO3jWj/dS2n8mEjbq04q0p/ttX+yZg
+Ps/7piMs6YvZuRP91xbI/QSUvzSLvQ+PjMaohlL/QWHzV2D+5AVfr0yG5Y5T
+rXEw/45N5RXKb9nn+yNce29hqpTs3O44Audct4yYoP3UPVNnsM+4w6bjujao
+3/bL5Q+IvzVpLHGGZbkZnOf0/YsP5AWTn4X8fIHcs9zjB1hkPi3eROclkU8L
+YfFRe1EP+pvef+NFLczJP1j3NewQsu1pMyzXHVrajPme+Mdu74QlqoHh1rBK
+o6tPD+UTPa7Mxb4Uq/nG3RT/OK42H04QfPiqDU4yW6s8qcYy13re1t6HWblA
+87+qeJ6DwXtuUH+hPZUWMGvIOVtA50fEQSIV/P6K5pWn0vn9KXtN4ADrnzSO
+wELT2JDpxeg3ZoHtXqrXKxEyiD+y3LXbm/Kp25c5w2oy3SZ3yqf7j0IFLK8f
+8NlE8zqkDbFUP+p2L1miodf5F5yRv7xuK9VLDu9vRL/J0go9P5hbvVhLpM4y
+Xxx3fRJJ++grzrHEfOtsNgedpPOXvmcyYZNib+Vi6u/L10UDcF1pfjvtjztY
+EGeIfeU4zhwbo/q7zwbz4fJj0gZtW/yekncEe8J/rFUydoI5PYM3WFj4+oEg
+GI72S+jVgYMrQntTKB6i9qAd+Y2dd6UXw3IfN3E0LNM02ymBkzzUav5Bv0ZR
+26OewbJlifVvME9D6/rNw7DwkHt/M+Y195NdHIXF9ccac2lflo/Txun+73OX
+92G/efNNw0fIBbnNrsos4z3g/kpmS89jstt+Efa2KWSsk/JPDm7bthDzfL69
+qAnmFl/QEimhvmGh4DrM5FhNzIeHAm/7nCcn8N2uL8C+hc0mp+j80JoREVyv
+H24cR/kPWE6Uw3kN+blh5IsardNwhLb2+SCqpzQVF4t86d9e1QqgeRoH6nVQ
+f8ERs5JA8unD2Z1w7fddlftovk/PlhSiX9vlzy3iyaEmA9GY54O9/nAG5V95
+4uV6zDs+EOFcSvkDV7aPwwaaBcFSivPLyk9gP0PjP26kfSUlrfo4CXek8S5o
+2qFe5CIXK+xT8oW2hgN5TbqNPWyU3Gq/BxZLy0yU4GWZWSUn4aRFK1YW4v4f
+fRdUy2AJ70CLAtzt5+3UTPE7qrt4qO9vJV0vg2Ueyf4u6Le89+LWKcofYMCa
+Yp5Z+v8F//+1kP0fdp5jRA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77627226468353, 5.608447160322252}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwV1As021ccB/B/1YZW2lCPiFewYmxkD+OUdn/PZtiqum7p2JY6a8vWquK0
+tKs+phPqkDBEvcscfSATuqAsK1bUc2ULilDromuPHMy03ZJ97/+c5J5P/vf+
+7/f3+98Th5jjkYf0KIr6GB8yUobki01T6zpc1jQlCNXFVcG8YXb4BKwYjGH6
+YEzITbXNxyjdGlxxGyPrkZnIE6PIXzPkakNTldWfJjVhHV2lVZyCuUntJg4w
+1yuHVwur5izmL1jRlNyBbyWDBekvXB6wMP+kZrIcFgXOZXjDsfVM+6NwbOhU
+QYklTQktzvrawyOXdx7aCnNW2ow6sa/PnTb7YguaUtfvFe2BR9wY13fCkqLy
+K1Nk367EKAquaw8K/pI4zGNg3hw5Ox5f2ggLDBY7FuC6ip0tDcgl2Rhpr4/5
+Ij2GYyIsON7tRp4nooZkkTB3zqM8C153e1q1D15v1Rk+ghVdTkEnyXrjAnce
+8vGUYm0rLNpwI+YaLBjuCrXBfuomMUuP1LdsOy2Bhe+WeYXBcqv0hVeR3/X0
++5lpMM8xV9ALp7SYOxfBvYX7Mkk/OLcSr4thTqQ8YIst6sgxSToKs543fvc9
+rLKzk7nAdazPHdztcD91z4ke7K+QfpQngeV+03HvwbEzOWtq+PwX1r/LkZ+a
+bNhsZY/3+9OyExtmlcTEu8DytebsZPSHuqRpMIMr/xyRDZvh94vTvIdYz5JU
+cN+CfTqt04rgXqMJu9ptqKPmkaU3rKrzavGAeXl/M/uQL3Zy/+KoKfpWoX19
+P8ysDXTOh3vXhFkPUZ8waMgqGea9aON8Td531s0SYgHN3udMzteR8cY8WNFq
+fk5Nzuny4+p+8ry+xvK7xAz9EEvslxLYof0FVvKvvZFILPiPQeaLpGKPMVjQ
+MLPbjZxHcXWJF/Lz/dz9LpP+tm5S5cBqoZvsZdLPkt+mlLAwzvFJIRxxvnQv
+A/2QlBcvv436Imq0AS7k/IiOvTQBaxLadzjBvF3dRmfQL9r02Tkd1ndfLr5g
+xMHz37nveRsuvW/aEw4rfmjwjYKD2GM26bDS9qtwFfJF37MxqIdVBbbZEbCN
+2FTZQ2x1+kAT6q1Lz/p1EHbNiV40hvUrtG+S+wrJX1NHTGhqQG78GlmfEJJx
+r5+J97VdNpZB5g8xH/jBldJIIz7Mbdx+VbgVuU0C/B3I/JvjBwe2ID9z9NYQ
+8mt0NathcEpQc180zLH0nNsECyfErauoV/qKTs8I5o5nLZeR9x0vyw6A1coU
+1Wcw9fQTWgqL4u/k+pH+dPVN7sZ+VHxmzA6Y+2HjjX9haXDGzAE4xWnUVYB8
+/MNnC6/AfN+quz/DkuEM7nNY6ZFTaI36DL1XhcnII+orO3YYVpsM/rMB+enU
+Br1SWLG0rTMCZo22hfwI89f9266SeiWz0mY4+YMbsytwyon+xDw4gcPwoB2Q
+Q//b/AhYP2r2yTfES2ZLGuy/4HN+vh2OyFexT8GaXQbpf8BMrevBEeQ3XnnG
+1sGC5DX9AtKf8qYZA0esF6WdCWXgeeT/1ZH0E9dm+n9frvJj
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.582298081084662, 5.349305811371944}, \
+{1, 1}], LineBox[{{13.500000000001851`, 14.}, {6.500000000002592, 14.}}], 
+        PolygonBox[{{10.6, 14.}, {9.4, 14.4}, {9.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.0548}, {0, 1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 9.9}, {13.1, 11.1}, {13.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        LineBox[{{6.5, 14.000000000002307`}, {6.5, 6.999999999998607}}], 
+        PolygonBox[{{6.5, 11.1}, {6.1, 9.9}, {6.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.5}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.}, {6.500000000002592, 7.}}], 
+        PolygonBox[{{9.4, 7.}, {10.6, 7.4}, {10.6, 6.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{13.5, 14.}], PointBox[{9., 3.5}], 
+         PointBox[{6.5, 14.}], PointBox[{13.5, 7.}], PointBox[{6.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt2Hk8len7B/CHJMKxZKc6WUJRtiyDzokaQpJStilS1uJEk7XOaRKnUo5t
+0jZOZiyDZEmEpPqmlJ1CK429ZZAQ0u9z/75f/3i9X9f93Pd1X/fyPKzaH+py
+UJCiKEkBiiK/OeM/8LOGSf3/jy6T8+AKZX+P+ELOTx1rmZSGtplXBKyYdb64
+ZC2Tw1t6M2wNzOsrXHINrjy9IPRKh0nxz8k5/o72XZKdeefgmcch/5D4xuvi
+XzbCra0m3DLEPdN73Ka1mZRZpcC2F4hznLxlKmC7rxdyhXSZ1HNpY4oDa682
+OGWJfDSch9J2wsMfC9xjEHc8WffQEHZO2rujFvEyaZ+vy+G62y77BPWY1C/5
+A4JycKtZRvBmPSZHPOOOqQJcGWRx7CTiGYuWeKjDAd6q1bdh6fy9d0xhkenZ
+9j54OHfI2gVmzum2UuuYVPW05mUWzE/NdZWB75Ws38Ajfm+XKweXbKFiimDv
+kMzSpfCTB+z3T2CKXS85gf6MJp5JvYFZa7fNNiKfoPfuX4dh+tNY62uID6nx
+34+S/BOLTA/Cd9apZ/XBxf+WJmqh/dSxyd8aSb6/pZkOYb7OV6d8Ckhc0tQp
+F/U4e/NUwQlSz/tRfUFwrbXPbluSX2VatzG8Q2FjtzAZf8S/eQmef5FgLXtP
+C+3fuk8MYD1Uqk9tDoO5vJ8+t2I9vJf6v1ODi3n72xtgp1qj6I7VTGrMYF6k
+De0jNYzy4+HWetqOQcQv+7QObIQrDRLui6B/80M6/guaqMMJpU4TuGPnEenH
+8JhPVEQIXKO93+MyzCqV1L6B/OpUGs2iYP0ji2ljiDPoMkoHYDM9q5XGmP/q
+7cu7PUj74r9sjqE+Rz4IPvKCZz7qRpfByZ12fwfAvKii+WG4afXBrlg477WE
+jyzW4y7r2caLsPaLZbeN1jE5lvUX48rJeCbXL29B/NJM8crncKSFjtNW2EtB
+JuILrFh3485G+OHdNopG5jvWxloN074c9VYj862ZyheAXR+on1oH15mUGbdj
+/L8/hVTqw3yP3R6X4fSxE/VaJN4S1ugFn9SsnpGBvWNq2KqYX9l/zLUnyPj5
+FWdeox43TqXefQRzb7yby4RjE4QKL8DMtd9rA+FznrJ+TrCUw34WzgcVKO7Y
+KAx3byq0Vkb9IqueyFdpYP4P2f/gPHGULtyuCoKHfaP9v2O9EhXGHVXg3io7
+KxL3DNX2bVbHfrwXo60EH7WYPxoPZyh7brZA/z8YJ2q3wFJVKTQyvr3jcU0a
+af/OIooPN37uUutTw34XDlr0Dh4SGCy+BzOl5LtWYX7eSs8Y+bDZYsEP2N8c
+96VWxXxYcRellUfW6+z8rixYROwTdwDxqsZPszfgSJtMOxXUV6M/dPo+zPLT
+/PYzvGOTreVrOMPjXrYf1tN4uR5rFh5LtxyJRFwq7O1SZeRXLJu7EAu/4niG
+m8Fc06NPw9Be/P3nFTthVlvTKw9438iZm/6wm2j/QRM4TUpc6ijMf3bRYAn8
+dVT9/DG4blCb24J8l6XxRw7D3l6DCinId7ydedidxBdpde5AnNvg9ImMV0eJ
+tkvDj8f5zeJwr9Y19eeor97sEPUC+ea5m5T9AQernPySTrw1lX4EtqK5xDnB
+dLlT151Qz3KdmBEBuJsbM2SGeMaK0d9LV6F+/V5iBvCAhegqX3hsmSvHFN7R
+M7JcHi42ZtMc8bxBp4dwMx3nMZv9/DB86IuX4nk4IOL77itw5a3dlq4kPhLD
+bcfz3AXbz1pwXkLtBynMj29J0xWGFTekFe7EfFr9lTp6V6I+gtkPLsJ2EYny
+TTCnvEjuJWzb59zSAnd/O5GlgPrPvRi7Ngj3ho7/sQ31PNx4UmkJ+rPLsrkS
+Req/ba/FKnisRz/zEtqP7B7xYsAzptGbChH3i6qe2gtz6Q8qi+HUynehx4kr
+xvtzYKPlLy0ziDdVOifheTUPiYVCWCpeZm0wHNgke/UOXByqZW4Jv+DUedfA
+3UVq94Xw/M9dXLFbsHanaOhjzHfuwuneTNKfbatxAixC21DChlnuWlq2mN/F
+qvy3O2G32iK3pXBKg6jrctjZ2qq8A/VcrywkUL2S1HfmbTZ8svXPSF3Y+cpr
+2il4dJd+VOoK5DOsO3sIPp76fWhyOe6vUdHaA7BE+sRHV7hyeFU7uc8bWSO3
+qlVxnq4pL2LDvFsdRmthnsD0UXL+9rsljOSpYLxTXjeaYKv4mQIzmP7MMlsI
++f261zfqjTLW7blUnzUsnHlm1yV4LPfUhdOw5Jabuofh3hGdnAbYNOZouxvM
+CiiTFEe9fFdLz3rAzPGBenI/1ni8sD8C69/K/cGGp85bxGTAlVlBtlgvKiFJ
+K7IRnskPzGqE6y5lposgn+4cjz/fkf3Q8Xu9LTwmHx3bD49/tOmJgznamqKv
+4L9qdcurSHu/pJaHsPzlRRn9cF0BezYTjphlOy3AihL7HI7ALsaJfkKoB92I
+ufgnuHuW5TaJePGxnrZ5zOfnVzLZjTAv7Nb1Gth8smsokTw/SzsTC2ts2fdq
+A2k/L3WFAYc6tzo3IH/FXtojEVitQ0fZHg7Yn1TwEvVl/Js8XK2E9ZepOFsB
+N9Wa09Vhs8EUletwifk/f8Yp4r61P8nOgOcexF4eUMD6v7tpiPNOVdQlGjjA
+rMDtwqWw2+S2fVXyuM/2PFQj+8dXySfXFO7NKZWmyPguPf31cmjfcLLFBL6e
+p60aDIucP/DPUTK/8GV7VsN2+sOxFXCCpnviN1nUg5OWPgdXtBin9cNugjJy
+5H1Gb7BaMwib6WpOxcASisnzc3B3w3+CSmGFsPOP1Uj/7Kvf38IxD57H7oa5
+OsE3f8CMksfhKXBr2FvasvVMKp6hfr0N9i5v3qoIxw3Zd9CQv36khKkk7Guy
+bWwzmU/wDrcZPC95ucMwFOZNa3d2wqrbV/qegd2SLQJwnqmDDodEeaT91+O7
+QuG2y94XOfCTuB1MQ9hc+lK8O8wtblEm31fDEwNByjBdq2a6hLx/+72mHyIf
++qG6UVIfi0uCU3vggDV5763I/u4OMezBfAPSXOMl4UMbAt0cYG6ZlNxH1D+8
+R/xJ6TKsP7vQAfc15eLA9pGFzToebG+EN1gV2P8qg/OQ8eN6Gzy1pbLkpTTu
+Q6GVigOw1p2VSVvhmcbBt4vRf6m/TVC9FOI5gnGG5Lxpb1N3hd20nZYEwk/H
+a86MS2L97O5O5MDMF+H3/GD99EcRI7BIpX6/GMw8N8zTw/yrDPgVvTTyfm7W
+ZMGJTuX33sORwwz9Ivj2pIOfBGkf4tBLzleI/MJ6D5i+89VdaazHZo0rovfh
+7tsm9YZk/bJ37FJFPiwD4bifYYl/1Y57wmO19+iOcPPzl00ZcN6lv0Ns1pP3
+tcraFtiMMz+qC+e1JTV+g7tHxSpF4babYsdkMX/nT3eSyHmO1tPIV4HHYrqL
+/oKHV7/vEIdZzJAqf/j67LWDg6Q/vRV8LfL+nk35kAvz1NeGD2H+Pz46SLuQ
+8VPv2ObDo/e3GTUhfzc5YVo4vOB0LbUV889LsQvdTOrdYMcrl0D9S4du0GG/
+N7Z9ceLoryDyrCgs03Bxk50Y9pdD8zpyvkojxmZFlyJeJE0n61Vs3RTUKYLn
+O8+aKcLRmdz4kiV4P/zm+7cZuT+/7jqQL4z52mwXIt/rnRVZzfWLsf+1sx2v
+wGGPhIfE4Tz+Cske+OPAt9ccIeynayvZ5Hvmtu/rag2Y36aTsQ+eHEh2mVmE
+5+0/bMqC83S7NnyDi/3Mf+2FFZuN3qihPWf/Rm8F1DfHULcnBOYxdLib4c/l
+a+jPYfqdpsGDsIgjN8QR40udaBeMhnmm5uVPYea8owAH3u89mbwF+UeenrkZ
+AWfttHhWCpt1X0jwIf09in4qgvnaia3O2QhnRKbQGMRyXfelSH8ph5OdiB0d
+ZV8iPx77s4oh3PpxLfMaue8rbOIG0R9H9qrBL/DSoeqOINjNwG1OFeZTu1zq
+kE/r9EzJO7K/N4dHjCJ/brKmLfkeVE04U/eZ1OPtQb8oOCchNrRTEPuH8ZOr
+KzyVNmH0lwD2z96pLnKeo63jH/pTqFfEn6r4e4G6+iLimcsCA3kMFpL1OlCz
+dWJwjkGxLNL8Hch4i15/zvzGoIZTLH4Lhl8L2c8nTTOoSosrKeR7JrY38WH9
+VwbltuRsZhNx0x6+8ySD4uglmokh/wOlRyRMvjCoJxKzKdvI++pKKCNmAu2V
+vQqSYfGGhImVMFf3cCC538YS2w4TR47KPpJB/Sxn6qtZMC+YP7oVVv3FR24J
++uMGcr3IejR2NEW3w1JXDaQvwcNnLobVYXzvbzbnbsCT3z0Ha5BfnsWxD2Ww
+7KO7MmVT6N/822wB/FHJj30B8/G+Ibzu9/Xku+r0F4sZ5Pv+6B/h8K0Almc+
+3EvxFrbAvXuupj2DWWPP48h9HcuIl0+H3Zrj29qRP0VLY1EwlbKlJQXu36pw
+UQz9KyYzeC4wV6NjrhL5tCrH6JC/h+ej37Akka9d4qILb1C/J+2GXUqYb8Bk
+fnCRHnkPJpo3/cug+HHCYmfhvDfmdNoHBqV/WsM4DKYPz6gtH8T6LLNWCoAD
+RMt3q/dhfWzYdodgfuyB8LRujJdqmX0C7i30oQ01I1/5I4F/kPvTc8TqVg3q
+azuy7qne//6vUXD3v7/XMf8PEmtJ5Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.72102250104224, 16.744111812358444}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0VGsbB/BdiEqMSyWUcWiSlJFyysLsdOF0cummxHRGiXKiCUW6nCHK
+JUxM6HSb4qN0MUVyK1Mpo+sYFUlCKhShEIXv/37rm7Wsd/28ez/v8zx773dv
+4y271mwbS1HULfyRkfoxip8xTf3vp05T9vMNBkth3q3Gcb4TacpPw7N0Nywo
+se0emEBTlq/iJSawVONr4l04eKw//wUT8wlZsytg/7t254/A9D1jLoXzT+f1
+19rBlMnEiaFwwZ3Gnl4jmhK/CgjXx3rxj5k2B2HBk8cxX2CBwuqtAUyp2Kg0
+T6KplU/DV1fPwPEhw2adGjRVuMeo4ywsSNM9PJZBU6LVbfXRMMOUpZ0Er2Pd
+t4oi811KE3S0aMpC3a5FBDfJkqIS4Bu6to3FMPXxH/NeWDTUbNsJy2WpRx21
+aSp0uPEvc6zvrpFisQ+mJtQ67ISZQdktqbBIM1B4leTnoVdxHLZ926PTDgu7
+ZziFwP5vfD6po17+qOsiW/hsADtrOszM+ZDVjvU8eBZNprD0Xd/NGLhMv2qu
+MSw/uuAQybf5rk+mFiw5Ii3LQD02tgeffEZ8emdVugE87lQZ9zTp1983spZp
+0lRQxJljNqSfsZFj/NAfv6SAwTLUwwsMOpSN/j28/nW+Ncwcv6xBE3bMS0g4
+Mx3zU3d1XUK/ixxVP1Aw1RNjFwE/asjes8UQ/WLGlh+GWfUOcZUGWF/91+2H
+8B0/xyULYab+aRmNeJKH1R4SfZJPae0XWDmnoNkO5vWMHL2PfLrieliN05Af
+nRhSiny7jTbsToOp9vJqX9Rzr6emzw+WP58+oQemq9or3GBmwmKTA+iH4ubn
+KmL3gOGOUVitXqPOF+7emnt0L/orts+rSICF6cF36uFn5fGJUrLekGi+mQ5N
+BRiYxo2Q9Uapf73gjHqVczTJz1P1QzDst8shJhKmnRdvCITH6bBxTTC/c6Xw
+TzjWIt/4M5lnxEdrwvM8U6InoP4moeu2MqzH0E6NnAKLLXdFeMD0iQQvddKv
+6tNdLch3BR3M68D5wn/VjvvD3pa1w3kw+5Bzcgfqjd0tr+SS9VIrzYNhlrdy
+cB/y5Q8uD1SGn/Walu6DeTZfy13Qv4+qNX926cF/bT1ehv4GDYfFb4DpklNN
+3nDRSXO/kqm4HqK+dmtYu8/IwBAWNy1dvwyuU4R9i5yC859KJyeR89V4qj2T
+4eiLARqIP78kZTSQOGcPJSXX6/6Ut7900b8faRku5H5U6pCJYammF/sxzFj7
+ttMLlo/ZsWgt6ruQHrTZEpZUX858By8Y06BqAItPMdkB6I/wwcT86TDThXvj
+C3xhs53OQpidqsLzQX+HRh41c2HeicuT78OHfpOqiGD6QLVoEsZG3rIHCozu
+74xu2WNM418c0UW+0nB/0Wp4yNfdbz3MeJ550hkWxaQ/TILFHu3JJvD2zFyH
+Mpgd+jmlFfH7uVsPvobdRccGkuB7XZv7WmBa+bLJLLhgd4PqKxLfSdPzBvKd
+Ec01vQ4Le3/usYEFKxPehJD4HO9rxaj3ztz9rTPIfO0n2hFufa6tW0Dqm3t/
+ziv0a83U3hU2pD8c89YIOKDli8MlrEOpJ+suhLu5BXu0YPFiJ181OPet4iPZ
+V8ShLWlduB6FS4/UvERcedrMPrL/pQW4HbaDmeHeVnPI82S8UPkqRsl9q7Ag
+jGrKtzvJ/yVeOweqMB4IHlgTgTiSrO13FuO8Y98LjlbiPpALn7wvgutOZCQt
+hXnDFQ+WYN2NNVynbjzX/CHK5Rn83YNa8RSmLGxsNiLPVRGNtbWwQF7IfQ3X
+xa81nUjiLYwbvwp1Wqxz8OfB1JmoeZfhrNo8x+cws83kai980feTiSvykQ96
+HjZC39R0XhcqyH0nq+q2hLWP+VnNZpDr1ZtgAm+6ZrjNB6YOspx+kr6atJkk
+wnIWc1sxXFjAt7oIS8+XcH3gvfky/TyYV69XMID87ixQ552Dm5LnSyNh54OJ
+KWGwu/fGIBV4hslvfr+TeMlFA7Go98DjQzvKkQ9j3dJ0bZgnCG5rRf7imHCH
+i+gX46G9/QfUL+/NdXGDMxrOG8qwT7ozDdaqw5JA5XNpeO/xbQdrWhD3Sk+O
+YhPekzzeR+OXsGCJs6PReByX2u/QSvaDuJd7ulTJeTHVmjj/yT9uIYpxqDeF
+b+YBi3fcXf5CBffX7Wi3AtguerLwpzLWy2RZs5Cfd+NHtissfBxbnQ3rjeT+
+fK6EfmsZhrHJ/qcTHx8Fy1/zlG7DMqnWnG2wwLx+/gr0S1d66WMo8df/dDwg
+z4vbluwrSuR6m0fZoP/hVgF8FcQXG2xWTYVFdcvK9sKSmLCIWjj6QOXrflgQ
+YTFCYZ+RaI7124982dFLhybBi9qOywZh+T/V80ZwvN7MsHx/1CefbH9LAesO
++p8rhQX8978S4QZ+pUMnLJ07etIaXtbysrkPZvLY82TIL3xoS6UcZlRdZ5Hn
+v+iKtcd+WGjdcOAF6qPz/Oz6sJ6gfVIQuV8NDb1CaBVSjzf7PdmPXNtm+SBf
+5pFTORFwWY1SLBf1CjudZpiS53uzdbj9WNyPGjkqreh39+8uCyaMQT3KZtLb
+sN4NNempUQ6+b2LD82GzGKVprGEOxdiWq/oQjmVn7pYNcSihD7fjO7zdem12
+2g8OxfROcHJA/Lo+tagL/RyqOz1u3DmYP2fvp6HvHKrJZ993beSrpr9p+uVv
+HMrdcaBfBC9S/L2ipBfzrII/jMg+OtNp4hxYeolRQZ6vImpHxM8e5KMdbLIA
+/SrSKDGaiXmm/LnHDXgj9+iaM7D79fZKJq4HW3tR4XrEF4bmn42A+aGXP9lh
+fcY+2c9SuC1ay43Tx6HoGNasFjjc11PdGfkyjX5JPsMCVe1vSwY4FLt+JKoO
+FgY1xemhPjouvPnSFLLvRo8phsUnR7y2wLGzHk3VGeRQfEXCNRV4o2fJm2kw
+U3W3KIO8d8plf1TgeOFUu2Qm2cfvZRdNIm5fnpWJ+mQvTmj1k359VtM1I/uo
+dXJ1JPITtF7RKEB/wi0sa4pRD++axw4XmBH45X0u+iE+fHfDIHk/ay1Z+6gL
+/aoPmUve3xIXt/L+dtQ788jsk2R+XWK70gf01zLYLYXcHyeUZhs2cSh5bIXr
+Rbhp1fSzileIJ3gZQb436JsDxSufYP17nQoW2cddE8bVF8OaofrxOv//rs64
+TTHIqEv/F6niFE4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.245181569676696, 3.3258894180601777}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.}, {6.5000000000081855`, 14.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.850455074238777, 16.59527726407387}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd13tcTOkfB/BTLKVkYnRRmO6ppHtZxUGSEbohCpOKLmTIioSJSr+URmrl
+2mippDQyirR2IqlUO9Kk0mqQSiqD1q3S7/Ps/DOv9+t7zvN8v5/zTK+O3tZd
+3iGKFD4KFPXf938ffZpikW9VmuLxVlbPgMUDb3jak2mq2aznLA0Lflzz0VOj
+KQ8t4UMuTAm649Sm0JREyXRWAcwLPmndBsfOuaX3HuaXhcS6MGjKrmFgyNqA
+pujNzqeiYVFsBC8W5iXbcs/CYnfVhBpY6HhNlANXXf9+a5ohTXHK/6AyYMOr
+7Mf+xEVTvkTCjNbl5y7B3GVeRg6waroH3Q4LxNVvyP6sk57ak41oSibz6rCE
+W4MWvbGHWe3dW/aif0FV8GMfUj82c5EI8+mmbQ7aBnNW3Uv8hvlF8fYNO2Eq
+LYK5EjY13p0eDosruHNvq9BUYalVySZSX12iswhujkxKdyf1f92kHybRlJNn
+xkcL4gKzknpYUtHZpArTOU62baSu0hvWh35lc2s7NHA/3zJbsQbmDcYZJ8C9
++OTBVNf4OD3s3zGk6ZlC5ruzeHcP6a+YuyCa3K/lJpagf8H4wtBwWOyf9qcU
+84l0OS7bYTp4xqkBzJ8fN/1OJMxa9cbjOPJiOueHxMHyM2rhmuo0FZC1zT8b
+5iud08+Bqy5YOJB+WO3nS/Sn0lTK24RZw2T/uZkPMmCnzmtPHTCPcHpD5hCc
+tf3TjQOwoN3RZtE0nI/PzrWVMH86zdsDu++OHVY1hvtmBqbCASqCMT+Yc6qh
+PI3UFdoT/4BZbkYHYuAqx6XefTBFjR1bA+f7NLPNTXC9ZmeBOrw/UnQmGJb7
+fUyswv6uAR9uZsA0+6LvDmJ25d5ymLLwqJ4MS5Tr5khhcc/SpiLMFzsjl98F
+M2JuHPKCTXMuvOqFBVHj8kaRT7x82ZPXsJA/pakUVnq4NOIZzP1R9ZUH0yN+
+SyrI9c4t/lvg/vothtlkv2myMF+40K3W8DDMOpx5PhCWO+/j+ZP9ohXCSP6y
+i9KE+aTfyYlLH8Hu/W6xM2BPuvG8NvpR3fH4BEXqDlGf4uDCUwNXB5CHMOCP
+Tz9gxj7T3W9IPl7FmTzMxxllOf5nnsJqNeQjn/i9hVzPWljqmA1L6obvjSN5
+fW3wsGQiB8qgzRCWxdWfK4X3jrt8zZPMY/G/aNvpeN724Q6JZJ47wyUCOL7g
+KKuK1Jd8evgDthq5XKxkivVPNA0s1EBfzfwuL1jMeLYpArZ7cfDkRVK/G7Xw
+CGw63W/rO5grDRHHwIL7m6fZzsH6HvFaW+D+cecj9sOev3/cYwm7hxwLKoOF
+7Lcv3mM/17Ycx0Filt7s83BsZvhBHTP04RKWTcN+TUGmC2HWc6HJK8xTkzP7
+2lpYsPNDWRzMiOR2BsI8xco1JqQuKzAKgjk2KndbkI/M4BV7I6nnyHwzYPF1
+OtmdWL+qPwjurRg8NI9YdWGyOzl/f32YrA579uxZ50rOs+Bv/w9zyO+FecwP
+rtHuul5P+r171SUB9l2vs+o6TB8+VVQLNw/58VJhvq/9qAH6aTYP5fxG6mpR
+O0/B+98dexJM8nGlotQwn7gseM0mWFLk1PE7LMq8psWBedtko0bIK0NnVffO
+OeTvw7euUpjWLVI4TurPTp9w1cT51Y9ZQPYXFkap1cFdpcUDbSTvXMdXS7TI
+75CnOJXk0fT+ZwFcUdk/5kXyNfjMHIOT1BM1s8i8SkdznbVpSmtK+fzXpL7G
+0mQrrJv+zNzSHPsF7FfZBYfG12QfgOX/XmgMgpVOSj0ewMLA3QOLiatkEydY
+IPc6XosK7Dp0qX0JLChlSqqwX2hCvFY0qU9fKOUSJ+VwL8Pic74RTLg1+eaw
+GObvKtktwjxUumiZFOZ1FQ+sheMLG7xfwqyUSdJR5GHVwMjugBlfP7cKYfmP
+ddpPyf1TR22j4ELWCu0/YeHBoVh3cv5KVb1yYMr4LM8W1v1pdu8o7Pn4roED
+rCSOSuAQp4yt9iL3n6n47gJLjix4Gw8zH+wNmUnWG71Y9TfM6lJXUCDrOT1p
+mof+PEb9W/uQBzXBY1oO7JScKeogro54rI/5vs0OU24leabO+72IzOsR+vYf
+WHKgotwFefUfr+wehGn7hY6NcJVCrp0KyeuS5aSNM3BembmHbIg/PQrqgPnK
+GsNBMP3Vr81TB+dHef2BS6Tfc7yMW7Bhw/VgGWzlMy1WQRfno3NKu8lc5BT6
+61onuPnIpnt7YEn24hfr4OCbfY/uw7RIvyEAdn9xvUDZEs/vnwVyNixXbDf2
+ghleTCUDeGjLdN3TsKQy8WEP2T9TMa8BFlrpCC7AdvRu2zFSd3lQtQwe6rFL
+NZ6Hvp150h70L34y0r8EpgpfVR6HTUWXKV+Y48rmm8FdB04NboC5871Mpcij
+9Yut71pSZ2+flQI3X9u4aDksWfbvUR84Q0/BwBoWx46UWsL1Ri2PmbDg7kR3
+Fiw+aDN/iPQ3f6B5Dlxh5V78lMyjHj+yEh4a2RNdTOZd+cv6RFjokfsijVzv
+uyXmOcwcP6b8G0wlr1J2QX+8okOjHFLXOF1/C2YcfxW6Fvac5SF1xLxZ7MQr
+PmQ9757cKlh+aIIggHi10va1uuQ5Lmjlknz6fdTfwoxDyt58mNc9Whg5E7+f
+h0bnymGWYUfcAJyV9q52kNyvXsveNIumLnAG+eaYT/7y16By2OqgxtJdsExg
+Oqgwm6YsEkP7ykjeJReHrOHg7rEiBSvkkCqKWQF/KsjKMyF+qpXsDmf9+rXc
+A+brC6ytYIaxsG4XLDP+eUCR+HZ7YxrsGabq+QD7ScrUZddhwaKTIVGwxmet
+xQ9hTup95RlwwArxNimpyzyGy9F/7Gnh6CtYGHXb3h8uCeka6IWtNNUrxjD/
+1JY8/z6Y0ZsRVASfFDFzu8l6L0eyQ2HvnTpBL2HqykRfe3L+updsaCL983/m
+acBK47ZGk/3lk8b3qsFW3wvqSsj1qWkRs2G3oj1Rl0k/V3WPu8MZl83P8sk8
+SVeT/kf2u8XcHAdzb6v9JYNzJsx+tpf0d8EuZSX6bV6W0h9B1nvUzquGX1fe
+j95O8hJ5x63CvKaL86eGkvXKfD6+IHlo2BpFkutH5r3dgfwm/XjfcYCsr7Jx
+3TB8X1fH/ARMMxMsFrNoqqmZ84j0lxUTlH8Y/j3mb9M/4Rp7CUMEO68LzO6A
+tW5MvNEJN67gLx+DQ5ECpYd+GfdnGlqj30U8MRMWxitNZMPy3k/jZsJKZhr/
+7IJ5s9YaacPc3oCYDJhR5CdRhjvqt1SXwqa/TDaXY32WdmCl1Jqci/O1DXDy
+E5U0OfztaPjFKzCnM+fIBBvkuT5Qtg9mb/DV1IRrulmjbvCX6Vun6cP5ZU6/
+acLfIt/tMIElE+pTpJj/h5nFBmLx/W/ZibB39frl5HqZqkmUG7z62esXWjD3
+OeOOFkx133ynAtN/pfpT8APDVWEj6Ef23X/bGPLeZxMf+d6aPM+IHg3Um18P
+6raT+eae7iXr3fB4dL6WOMYk8iRc95KvfI/ktX5/3Hu4q3o+txhuPf06Zy76
+NbOW382D87WDVXbCXXXb867AQmnt85uwU3fD41yY9YFR+B3mWkv23CDre7Wp
+LEGehwc+V5H1qTWDe5Pg8ufBlxphjppaTB288bz7lW7yPKRPO37Be9U+YZLr
+OBvy/3vOVSe426HvngGs1XnXKRAeLLaZtRzuvbJ6+2G45YQiZwfJO90hNg32
+dBgJTCfP48repRnwy53ikTIb8v4WrJoK1zctmtxB8ksNz42Bj2q85I3CpntX
++22G7WzecnRs8X9KSVbTfLhkd2OHHaxUkTRzCmx88bP3CphrufWYDP2Lzq5c
+7we3FnyPFsJq9/vKAmFBUOLhONhySONICMz4+LfaOlh8pu1TEFzzZ0uMFdx4
+b1r6JjjfjNEyFWZPspviA3OyF3b+RJ7G+dXuy2Dq+dOBf+G6cEvaHuaPZb75
+Brsu7lMzhK1Wsg2UcH+AdVv7VFjseizFAOZP+FGrSPqvHn+IDadvnvNlCPPu
+N0p4fhAO7+AE9sGtCaemlMIvvw/1vYFZccxfv8IWW1zdXpO8Rhr1XDA/d5Xz
+57ckX0nv5gQ4S09x/gdyv/witwFmqw/r/yTPj/Hl+VS89yZ/9eL918/1MBsf
+uD2Q6jaHPT+s90mB3ecuu0Xy9Mtz8a+A1ZQ2aEXAWnNuP3kFU1bas9PgpJSw
+M8OwU83K2yL4Trn3XGW8txVOZNxph7OcHhyeBI8n7/l2mJd8G9L/B4/XuA8=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.278814934002025, 3.4867457599351623}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs01HkbB/C/sim5jGsubU1lxbozpdz6N2pjM1FrhcQkNiRRwm5tvDaF
+OA05oZRRyb28KclKo3rXhI2QFSuzsrUrl5F2V73i/T7vnDNnzuc8v99z+8+c
+MyuCD+4InccwTD7e9MnMzOH1OctwCEtZJiF8dYvADP4ztkAH/vVkz9MCuMNV
+8E4dZk0vu4zA0YfMjccNWUbY82CrnTk+q+LLqmGpy1z4Ebh6aaGbHxxmoxR0
+Hfb60mLxGwOWKT3TKPyVziuWcyLg1AxTs1lY1LkksF+fZW4FjalrWbCMZEu8
+eBOcF1IyawBX9298XaHHMklpt1J0YS9ba/8lsLApqHUBLFR/PpaxBPHA1sQx
+qrf4kYEmrLKLL20jt0Ser9BlmYYdE0YlsDwxwmI3nBHnuCOR+klIPGAKc1o9
+VvvCspwHVRowV9nlMA9ml4aN6MC8N3f7dGGuhVzKo/vFl+4owB0FdaX74bpT
+a2b+xn7kxasf1sKPrgUaTsNJiq/8NNBPqm7335/QfZUp+RH46rXd3Vy6v6ot
+6wXM8/vW343irTHam2m+qqKco7DEqS3iCvyu8eNsHRwd2j0yBcdmjubR/rg3
+3521wb5i21I/utO+Tnt6+MLdUe+T8mB5yIxmKGxuabL9NSyO6DLygR/9S5Bn
+Z4n+ChQ1zWCTlvLC72D2VMzDYeRfp/VYfhe2/iT1YArc3Xn18AS5wTiRA2uX
+e6fqW+H5dfyyNx39s9lyA3vYWiF4zzTmb4v4T/UWWHZiq0AIRy6zi9oKs8qh
+W6Q6OFc4pu1K5/dJo9bCqd/UfrCieMlv56q1WaY3iXmvBXOD9RgnePT9Fp9J
+1PfKSl4yoIU5ztuWt8CiezVsLux2tf3eZVgWv6EyEq5LORp+DGbyRpwC4Ya1
+iw75w1yDrmP74cqL/d9soPh6rSvZsEpTZrIFzf/8fFkH7LSq7IwxLNTjHVqB
++gEKdZ1mtC92fDqRXHb/gzPcsedk1iv4VpdMbzf1Z/bC3BPzSM+dKEylem2W
+V2pg1p0bfp/6Dds/p4p9jA46/zQHi/vspb6w775Ps2lfSR1/8c/Q9yt8yiMH
+lpy+WVUFS9b/4PASruZaHfg3LHJvb9KzxrzSJ+b5cPpnCeYuMLfu5XgIvO5V
+TboQFqdlq+jCtXc9bxyHq8sEn91AP0auveJcuu9TM2sHuxSlFZfDjKevTxnt
+W9/O4w7db7hdog1zoopi7sEdm+b9eRT7GT4u4JO9Vlvwf9dkmWyJwzo6zyz8
+rskHtpQs16mERTW+Gj0aLFOfzH1eQPdbFO3C4IDUjNp0qh/jslEDDmleOz8e
+5rQtcunmsEzOBkOTvbBwtn/sJhxwxEDkBbP6001V8LDjpXMsHJ2i2PUQvmQ3
+E8ejuI3h6FuYv2GPswVs7fBzsT3ybxPO3jWj/dS2n8mEjbq04q0p/ttX+yZg
+Ps/7piMs6YvZuRP91xbI/QSUvzSLvQ+PjMaohlL/QWHzV2D+5AVfr0yG5Y5T
+rXEw/45N5RXKb9nn+yNce29hqpTs3O44Audct4yYoP3UPVNnsM+4w6bjujao
+3/bL5Q+IvzVpLHGGZbkZnOf0/YsP5AWTn4X8fIHcs9zjB1hkPi3eROclkU8L
+YfFRe1EP+pvef+NFLczJP1j3NewQsu1pMyzXHVrajPme+Mdu74QlqoHh1rBK
+o6tPD+UTPa7Mxb4Uq/nG3RT/OK42H04QfPiqDU4yW6s8qcYy13re1t6HWblA
+87+qeJ6DwXtuUH+hPZUWMGvIOVtA50fEQSIV/P6K5pWn0vn9KXtN4ADrnzSO
+wELT2JDpxeg3ZoHtXqrXKxEyiD+y3LXbm/Kp25c5w2oy3SZ3yqf7j0IFLK8f
+8NlE8zqkDbFUP+p2L1miodf5F5yRv7xuK9VLDu9vRL/J0go9P5hbvVhLpM4y
+Xxx3fRJJ++grzrHEfOtsNgedpPOXvmcyYZNib+Vi6u/L10UDcF1pfjvtjztY
+EGeIfeU4zhwbo/q7zwbz4fJj0gZtW/yekncEe8J/rFUydoI5PYM3WFj4+oEg
+GI72S+jVgYMrQntTKB6i9qAd+Y2dd6UXw3IfN3E0LNM02ymBkzzUav5Bv0ZR
+26OewbJlifVvME9D6/rNw7DwkHt/M+Y195NdHIXF9ccac2lflo/Txun+73OX
+92G/efNNw0fIBbnNrsos4z3g/kpmS89jstt+Efa2KWSsk/JPDm7bthDzfL69
+qAnmFl/QEimhvmGh4DrM5FhNzIeHAm/7nCcn8N2uL8C+hc0mp+j80JoREVyv
+H24cR/kPWE6Uw3kN+blh5IsardNwhLb2+SCqpzQVF4t86d9e1QqgeRoH6nVQ
+f8ERs5JA8unD2Z1w7fddlftovk/PlhSiX9vlzy3iyaEmA9GY54O9/nAG5V95
+4uV6zDs+EOFcSvkDV7aPwwaaBcFSivPLyk9gP0PjP26kfSUlrfo4CXek8S5o
+2qFe5CIXK+xT8oW2hgN5TbqNPWyU3Gq/BxZLy0yU4GWZWSUn4aRFK1YW4v4f
+fRdUy2AJ70CLAtzt5+3UTPE7qrt4qO9vJV0vg2Ueyf4u6Le89+LWKcofYMCa
+Yp5Z+v8F//+1kP0fdp5jRA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77627226468353, 5.608447160322252}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwV1As021ccB/B/1YZW2lCPiFewYmxkD+OUdn/PZtiqum7p2JY6a8vWquK0
+tKs+phPqkDBEvcscfSATuqAsK1bUc2ULilDromuPHMy03ZJ97/+c5J5P/vf+
+7/f3+98Th5jjkYf0KIr6GB8yUobki01T6zpc1jQlCNXFVcG8YXb4BKwYjGH6
+YEzITbXNxyjdGlxxGyPrkZnIE6PIXzPkakNTldWfJjVhHV2lVZyCuUntJg4w
+1yuHVwur5izmL1jRlNyBbyWDBekvXB6wMP+kZrIcFgXOZXjDsfVM+6NwbOhU
+QYklTQktzvrawyOXdx7aCnNW2ow6sa/PnTb7YguaUtfvFe2BR9wY13fCkqLy
+K1Nk367EKAquaw8K/pI4zGNg3hw5Ox5f2ggLDBY7FuC6ip0tDcgl2Rhpr4/5
+Ij2GYyIsON7tRp4nooZkkTB3zqM8C153e1q1D15v1Rk+ghVdTkEnyXrjAnce
+8vGUYm0rLNpwI+YaLBjuCrXBfuomMUuP1LdsOy2Bhe+WeYXBcqv0hVeR3/X0
++5lpMM8xV9ALp7SYOxfBvYX7Mkk/OLcSr4thTqQ8YIst6sgxSToKs543fvc9
+rLKzk7nAdazPHdztcD91z4ke7K+QfpQngeV+03HvwbEzOWtq+PwX1r/LkZ+a
+bNhsZY/3+9OyExtmlcTEu8DytebsZPSHuqRpMIMr/xyRDZvh94vTvIdYz5JU
+cN+CfTqt04rgXqMJu9ptqKPmkaU3rKrzavGAeXl/M/uQL3Zy/+KoKfpWoX19
+P8ysDXTOh3vXhFkPUZ8waMgqGea9aON8Td531s0SYgHN3udMzteR8cY8WNFq
+fk5Nzuny4+p+8ry+xvK7xAz9EEvslxLYof0FVvKvvZFILPiPQeaLpGKPMVjQ
+MLPbjZxHcXWJF/Lz/dz9LpP+tm5S5cBqoZvsZdLPkt+mlLAwzvFJIRxxvnQv
+A/2QlBcvv436Imq0AS7k/IiOvTQBaxLadzjBvF3dRmfQL9r02Tkd1ndfLr5g
+xMHz37nveRsuvW/aEw4rfmjwjYKD2GM26bDS9qtwFfJF37MxqIdVBbbZEbCN
+2FTZQ2x1+kAT6q1Lz/p1EHbNiV40hvUrtG+S+wrJX1NHTGhqQG78GlmfEJJx
+r5+J97VdNpZB5g8xH/jBldJIIz7Mbdx+VbgVuU0C/B3I/JvjBwe2ID9z9NYQ
+8mt0NathcEpQc180zLH0nNsECyfErauoV/qKTs8I5o5nLZeR9x0vyw6A1coU
+1Wcw9fQTWgqL4u/k+pH+dPVN7sZ+VHxmzA6Y+2HjjX9haXDGzAE4xWnUVYB8
+/MNnC6/AfN+quz/DkuEM7nNY6ZFTaI36DL1XhcnII+orO3YYVpsM/rMB+enU
+Br1SWLG0rTMCZo22hfwI89f9266SeiWz0mY4+YMbsytwyon+xDw4gcPwoB2Q
+Q//b/AhYP2r2yTfES2ZLGuy/4HN+vh2OyFexT8GaXQbpf8BMrevBEeQ3XnnG
+1sGC5DX9AtKf8qYZA0esF6WdCWXgeeT/1ZH0E9dm+n9frvJj
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.582298081084662, 5.349305811371944}, \
+{1, 1}], LineBox[{{13.500000000001851`, 14.}, {6.500000000002592, 14.}}], 
+        PolygonBox[{{9.4, 14.}, {10.6, 14.4}, {10.6, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.0548}, {0, 1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 11.1}, {13.1, 9.9}, {13.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        LineBox[{{6.5, 14.000000000002307`}, {6.5, 6.999999999998607}}], 
+        PolygonBox[{{6.5, 9.9}, {6.1, 11.1}, {6.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.5}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.}, {6.500000000002592, 7.}}], 
+        PolygonBox[{{10.6, 7.}, {9.4, 7.4}, {9.4, 6.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{13.5, 14.}], PointBox[{9., 3.5}], 
+         PointBox[{6.5, 14.}], PointBox[{13.5, 7.}], PointBox[{6.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs4lPkeB/A3lzXrklnjHpkWkbLrsj1YaibCsLQO1jpymUpRZMdmt3s7
+ndQq1IRU58ROVmKXTJH7MuiCWmdKhNyryW0YGqdC2e//nDPP4/k9H+/7/n+X
+//vOO6u2fxe4U4miqLP4I5GSLuGzgk3990NnU+JrGQPfw0zx7dgAbTZl2GMs
+7TLG8Yg1Xj3L2dTmpB82ORDv2yO7Cpf3SrNTjdjU0FU36xtwpOnxojFDNsVX
++WLpPezbPfU2EBb2uVanYz2LucXoPw2QR82bthb5NK1ovRGwIEfXvwDes1Kh
+ToPlG5VsHT5hU7Hm593a9ZGvZnjDfVhHLdzyJsyde5wRoYP11Lc/L4XZOu/X
+yeAwaRetBRbt8dybwGBTuiaF9XOwnU8Zvxf2MmUuOJL1vQ83rtVlU+0m51qP
+wLz+LWqRME35Q24rHFBwaCQBLt/hVMlA/TxOan0EHJy+mBQMi/6VNk6ur6HT
+xSdJv717T/Vh/Smdga15sOSzzJAkuCrstX0BLJ7Q4L9Dfe6DzLSzcECbnf0+
+uGmM7hoGcx2SXcfQX5WL9fWPYTmPn78DlmY2tuWSeTGOO45jPlfmGPqmMGW9
+UjkZngr528bT6I95yMzECU4bLJsf1cP5TdfMaHCgi32ZO8wdzFVXYP7B2aGW
+Oag7IFFpRgvHR2/GqyyhTsF42acecF2s9j/J3Ni5ussuwpxLD+NnUKeYfmaj
+Kupx4BybSYX5szv1U2CV9WNfbYLp0YpcQ9LPBYNPGYgSh0drSxHDj04mL0MU
+SjRrPbDunVuu0+qwnS89ph2OXJW4dR1ZP2Kyyxt1ZSzPSNgGB5R3FRTBimWO
+FfkkX4Na8xQc5iGfm4YFv8lKGehraPUKvhvW4XreqtWHf2sszToB81YH67/F
++W5v/BvrST+nF9ur4fmSEbdRcryssiIKTnOacFmA7Xo+t5lGPGPbZKNAHCra
+e5fMoaLbRiFBDLDqVZUiL1f6lcZ5cr20ejAc1nm59+h6mP6lpv8zzMO9UmtY
+TPqxMOiLhTfv17N3gtlymYcmLHT3zMpB5GVOqDzAfMNbphnziEx3nnER4mS0
+iVcQIpfm1lSISB0sGozCvoma08Lb4Kr06z62eK7EgXd3kfWqlr/oMNZC/arj
+gjh4HUetwUETx0PFkyOwbuZT+REN3E/Grx3jUUeaQHrigzr2JyV4FYW6+zyV
+fqqGueac7mx4lMWrKoZFj7KCrTGf0I4UaQdMFcX2FcP0vKY+K6xHDTknmGLe
+B0rvzeQSl+6wSIKvNAyk2CI/1aZxuhimQowr78GS7JOdzWS/Aj/Mh6NeYa3E
+qBrWnExbHIHl2jKfdNjkiw++fuhPmOBv5wGP8vK0zsKC59Zeg8g/et009xdi
+tYF9MXDhrXjlwzCXL68bIfdXyoCXKTwk8u0LhVMavXNPkXwX/bseof9LoXq7
+a1AP3azt1Dfwi6poqgH104td7Ccwr7rOe+E56FewIt7oMlwou5HN/Rjzjdxt
+Ew3nv7jK0aNhv1QPi74m+2k08azlI9SftckmAqblt7emqOL/+xMd02DRfOez
+bSrw57vO9MLhq4d/iFLGXMLc7DYjv+jCCsUZJeSPK7raTJ4j0VPLiWWY12yM
+ZSDqF12vnDwB2zn0rSX3rbN2smoITF/8peYo+vf7e/37SFjQvtCvjnkxzfkh
+l2Gx1ZJRCpx0rezxIvHj6SdTZN7XfCaPIZ/d4urbLvjeoI292s0g9XRZyqJh
+E+0GzRJYzC9MTICtG4b8NqJ+5oMK/RDimDyjGphbpZdhCrf8GZWpi36Zym+2
+t5Dvnfdbyj1gthpbuBUOMFcbZMH0SzaiftR76aDEVwUWeG+WfQOLjld5nyPz
+Ke7Z8BD9dZsLQ0aQX5h+5VcOLN4/zlCCmb83tT7GfA7cfDM3R/pVm7mYCE+W
+aD6/T2FeQmWJDdnfPIaP2hKL4gVY1SnBzMsnj8Uvsii7Ax0zC5h/S/n5pN53
+LIppRrM1IM+z02hd3Bu47plnELl+tnHWeQ4OkLFLYN7ztvBvX7Mobq7kIBP1
+8D/6sf7pDIuiJxu+LICZC2d335WzKHlE0C4Xcn/2c3IsYUG1/XoJLOng7Z+a
+ZlGUhrPfDszD8B9PexxwnF7+pHcc5qy0WvMAHnpwojwK8+RbqN8uwfrCrU8q
+asn+nNsy1jyL8//IZ86T91ycX5AC9QR8Vt9pgPcA0/GOhgXqFbQuT2XA3Hc7
+1zv/h0VJtmn1yHB+oc79Qwbob0i6ybGIvAdtL/z4OyxM3XPXB37roz47DHNf
+rHPuRD3CEcWrEpjXlMMNJM8fZ2YDjVx/xGCwhfTz8Oc1cuTjvWy+xYbFvmmu
+cQrUZzJ0vxHzMPxJ/5OTqJffqfFzECyp+O7GFvTHtX0Vt0jmmeBkXDuB40d7
+CxvJ93hK55MsKeaTb91fQMw3+nfUMOpbiBkm8+cadX+Z383C/cgq6SLvAYZH
+5rF2XD/V/60Z2Q/j7+9U17IotoWFYzLj/79jMv74X9Rl/wX5tzcv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.2807968978321704, 3.5703782848251917}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd2Hs8lGkbB/BRrRQyapKknMIUtSMlh1ZTSbKqIaGykVTDKxRZRUxFUWhI
+kZAWJaGpkFfSFJW3JJtjJSadpkWGohzK+7u2f3y+n/twHe7nyXPT8Qpw2jmO
+wWBoyTEY9JPxfQz/ZnEZTAKTyxA6uohXaXIZ9R4Xso/B7PXWp9JhXvQh23Gq
+XIYoUj1BYTaXwdDcet4fDq18rhoNi+XGf38E53Fd706Zw2Vw213DFadyGdJf
+eNcuwpIr3zlL4UDNeykWWljPW6JpD8d03Rn6GxZ1BDnYwOLBPLapNpfBcU9p
+MaDxL3W6B+DAaP9nX7B/lmtyVxnMHMw1KoKDRy0fyGDxE3b+Zti5OsFWS4fL
+8NRYcXkY+adO7vZZBQtddXrPwJqzdFLdYYH6wxMcqlftVpEvzBi5yLqggjgX
+POT8YUknJ7N3CpfR5hTqshsWF2y6thUe3fy/dleYm/taq0uZy1Cf3MJeQeul
+Fetz4LzEdUx9Gk8ybT8JszSX5v9C+YwLPkLjzC91C98jX22LlnefYYWTr988
+gD2L/k73wf4ViueGr8CC/V+sVZFPwWzFuNMwV9n5sAQuc/rmH0X90fpiwUf+
+rOwFCyOoP7yFO7th3iONwcO0/3xbjVA6r0erY4TUn6h6T3n0k+HCNc2H61Xl
+9JPgHF3PZ3W032nxHrVpXIaxm7f4hzadc15iAmz+dmBkCdUfVcQfhFOd77BC
+YNmf/qH2LC4j2SR1bQU51nJmDMw+/HuqvC7ih+9KKoSVZnc/d4KFKlnG5bC3
+t/qtTJjZL7QogmuSFeWlcFZpKPMkXD35RLqxHuKpvB1zgm12XY71hbULpy6Z
+BGt+DtLLgrndBmnXkY+EUaJeS/bYWcCD3cd3R/TAgf07HLpQX222Wtv4uYiX
+rXriGFzdKTZSgTk5j/wNadzQtINcn3Hx0XP0i3+tvFUeFiW79cfB7iJrrwHK
+x+BeET1f6rHHtF7Dgt/aBq3oeVeqGr0LMx30OpbAvDssDcpPFrBdYEf9r5UW
+R8Ii9i/dQeT/zmZup/HOXUa36Hn179lqC0vklOyZyEdzTUamCZxlesA3HK5Y
+1505l3yw9N032O6Q/t/aMM+YuycC9YZKL6wxpPz8Hq5URH/C9Zwum1M8nUbP
+c3DMYL/2JpijsLJEbzp+SmT+4TAjZ5lLLty6waW1EBYeziidqYbz6Aszl8L1
+XT7N4XDwjKWK86lfxvv2PIEF7uMO7aX+SOynjJ+BuMbBERWwp58RVxeWxpq+
+VNDHeFJGAhuOaRA4OMNZHS4JanB6guv5dBqfqdDSg/0WvzQs6oC5Fd79Ilj9
++vycWQboZ8iMFTvgNo0d0vVwvU51swIc6vDnylBYIp+y/hLyZ4QWvT0LC4Sc
+NC4sMIkNyCcXfK9tQ/0FBufGbtD6BYofIuGowwG612nc40faQrjxZGFTLsyt
+vKnfg34KO0PCkuBApW0z7tLzlF7yhOIxh0IXXYa5Jk/vbaH9Kn3WkWNeRBy3
+hBkHu63F9Dz2d/yhAfN89Zv6aL941+hRqleruMUS8cSX/9J/C3uG3GDR+XAC
+283qYQZreugk5M/Wifd7QPOzgo1jYHfmfr1qWPt5ZxUT9Y+umbXxKSy5pL47
+ExZdCj76BuadmDjJGP3l5Vk9YiC+9qq89GJYKdzw9nzY8/hje1N1jI9TPrGN
+6pdezs2G1RvuDKTB4kBWq9xMPM9PbL3baf3HTXX2cO0nRp+BIepe/tklHFbi
+Vwr2weKDIxZnYLu2Za2VsCDX1Jac+rH75iQ27NnvdAiublSV8GDPySuXboDr
+vyzlJcGBc7ilynB67sQltbDwU+H2CuQzmhmn8gOWRH4M8oC1jefe05uH8bjm
+v0ZQj/AHP2U5nMW713MGTq7N2MiDOfVKfFOYrW+3wAUWJ80b/wL9iWvteOYI
+M1S7Np+E07uubrSh+VcPRq4nq89c9CvMDZE16MPvlOTNWHDgRw/JNNjtQAF/
+APmIRpqtNGC+Sv9II9XHCThoAWdpKJiW0PjeuYZ7YYf9Tvap5IibNXfpfXE5
+6yFg0/93v/fR+xGY7L81gOp75++WArvFDrTtYtP78eGHOuqdsOMQm//vfG9n
+Oh8HYxWNYLLLj70m6Jf2ba7mSZjhHWlTCVfsr9IrhOv3hD2y0UDc2FfXXlC/
+FW5ZiOHa5vJnKqhHtLR5gzF+z0vPHjNeD/NiZ3tFk7+mzzhN/XLYeboG1vQ8
+kt5G/U7M7P0Ci/64dYY9H/N35wjk8R0gEaZWBcNC+zA3BiwYdH5XCQu8E4Wd
+tL5m+MkEI+wnnGh9Dc67kBZmAzNnCLb6wLINJ8zC4cAnHldYsPu498n5sEC3
+MboE+YpFR5PqjOj87Sp5VM+DunMfaT+ZpXsX6tXsG4gdoPlliQEnYNFyh7Lv
+RlR3Yesi2Nm8vLsP5vWFsD6hf8sYfps7YdkiodJ1uMaYlfCE4p/O64mHy9rt
+d1+DhdcLfjkCC6aXD5+i/e9YXU2A2fP+EQTQ+mu7fi2GKy6m/caj9dqOL/vg
+HM3s3Yspv1Mt/asRP0r+D9U5FP/2p/pCOh/XxKkqsGdB05A+6jEPb/qqQPv7
+uqzOhxvvs98q0Xrpq0lm6EeOzuGMWVTPs8Xrq2F1bm3gEvLm2J8b0O9Au3LT
+LeSJQbqNcKMs2C4W1u6VqTrgOyw0h5N9j/bfMuHyTbhM6tgkZ4z9+9/5TMR3
+WJ6xSNMO5hoOlNjAo9YbQ5LId7ubfGCbyLc322FtA2W1EDiQJU2avwD5W2U8
+oXGm1avGIPJDd0db2PzdNNcymOc1fUgZrq2MnjcIZ9V39lchPstmZ7bRQpwn
+z9LID5b9bAh2hTlrZukowt4jrcWhsCfDsDSX6nvO7EqA6+0zh7lwbUARKw0W
+mAV8e4N+ZCWk5JB5TxND42H+4PmIRFqv3ftiDdwWN9wTCYsa+lvp+fIzP5ey
+G5ZFlvh9Q79DVxzh28PiD7sv9cE2R7Yfng9rMzecn4D5yedeaU2GmTFWmzlw
+nLnoWBfqkfkPvg+CK47nvq+HRXvy1z6l8dFlKytgTtWLbAvkq102z+sajAfb
+vkSTnts9ZVdpXHLlsxXq1a6WbroB189c9KwG5tkOva6ifjXFf3Ch/s0XRUpg
+8YZy3Tcwp7X1y0TK92JVmhe+k6XTeyMtqD9lrKpmOLn/zY8gOKawv04T3218
+S0dpCfVnTNK/Cv4+dt/3B+z20zTVA9Z0nLvf7lf6flgxIQBum/jg72SYvTbt
+517Y2fTdMgksadnVwIfjBvjWLA7yu2LOc4ZfZjyvWAIzLQ/dXgK7l1df2Qhz
+dT4+nAK7ZW2x2kPzle4N30d+fmGzmg9z6PdvwhZPuLZ077REmLHg5oVh1Of9
+6fODNDjw039fn4WjRheOZMKeKXrTLOHyM7YjGRz6f2DxVyn6ldR1f3UqLNF8
+UXYZ5k/cGpdA60OKew/AU4dPXKV4gkvL3bxm03u9++I+ys8s6gFZMlH5qBfM
+ExRNDqf3I0JtrxPFk9j0F8J/OWacXEXzvbdzv8Ev860+mNH+a5vvbkI+Z88n
+hy+g+T7XNz+ES+VeGbKpnq1zzVajvvtDD88YUn7Tg94/hdvWbllhDJfdTHu0
+AP0pGBTvof3MVYeTgmGlu1F6tnDe4og6utfU7jfhbIXFndNVvsMnDPzZ+6me
+7ttzOPjOtq4I9jsNs1fKszzgfcKyhSWUn0b0rqN07/geHP6C6htQHzsPV8fU
+rBmDhSsSV+Xp0P2sb5++Cc5PNGN23r/7mbTZw+alekM0P/+sxMcf5k/vro6C
+1bx01E7R+M9jb3fABXaPh67CgVq6WlZws804l2rYbrXsjBLsFG+S3gKLP6Zk
+v6R7y/3eoPcw13ZazWWY3SSq7IFjJMrxIXB6/qRzMpit+8p3LbxILXLzZ1i0
+zqBIF3482BX3keJ9CPKYANc158jayE39WyTo72hIiu8zite0o7QO/soqH7tL
+8fht3k3wSw7nf9dg3pSOwa9w9cZU6QVYavzhgBr287cfC0uE3dqDen+DS9WG
+EqPhsjUp2fR+ZDlvm3PIhO7DBTK6l61XMJCFUr1L/2z6h+5dE2ryDsCy+IjJ
+dD5Kz46WRMKpHU4af8KpTxrsT8LqgXfD7sDyv//mlQ4L+XUFDNx7JF+Ty2/A
+rdaCddbwlsfFL59S/ndmWgTDgT3H1KhfwoHh9Cy4OPDXsyqLkG+OotJ9ujc9
+VvBYDPPe9sS3wDUq07ZtgRWmbroioXtW9q4gAVyWN9XnNdxuxYnIhbOmZG+t
+g3OCS/k1MMd6eXwx7HJLaiqFv++/EZ4IH/tjVG6CKfJU/I/ibth55JLWLJjv
+GOizFOZlnlZcADMspv2cADcWVYVZwHbWTuuf0/PC+8uTC6fGynVehFtzrrxf
+AYvdmth0j4yYfzrAmtyxx9MR9sowSDWDzRUPhNO902akwdAIzrORqs6l9bXu
+yrPhsmMzbOfAvn7vNyrDoYrn7tP4/YGWGT+Qf0yAYdFSuEJTJawHrtk46aoL
+vKjpYWoHzM749lJA+xk3HGiE7erdpcV0fq1pk57CnjonWX0U/4290mPq96ij
+vSnqC+69qlYLh1osWHwAtlwtO94Aa7fobBLD/2RVREuof4eX68nTPcv77HD/
+IvoOKtC1g9vbHp2djHyZFZqMKNj99+sNBuRtKVduwWzHHUO2MNvouPcbOJW1
+xsCX+m9sIBmDk/9zxO0UjYuPrJqKe5dz+83QEupX7nEzdfjdj9M7X5GbL71X
+hX/S33dgBfr7zlzu/wFLi3W0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.041851370299756, 4.042946021129489}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1As41OkeB/B/ZbdxpyyTW6NUyj0Suew/93bRpEjiVG4rpxinVsqlOeSu
+TC3tpJJirUsubURFlHLpYqZNs0QZuaZIK8xK2/m+55x5nnnm+Tzzvr/3+/u9
+/xmdgAjP4IUURZXhTT7/99KnKQb51KGp2L+10zxhTjrf9QuLprjV/MkCeLRW
+S/s9zAm69mAS7mpQOC2A955+KdpgQFP8qYLky3B+3lt/DjxYf+BqCKyXtm91
+Hvm+RH2fDix35VNZA1ylF7WmZDnqqxcZd8DFY1ssFsO60oK7Apgp4CsGadPU
+Dr2Ezc0wK2x6sEUL9ft82aUw45NejgXMuDtlnQLTgk3uNzVp6rGq3Cs/sl93
+qdkO2Oak5o9GsGvFDm1ZWBITe+QL8rNsHALFGjRlsvFE4DPiwOzfOmHWavus
+cpjpOaw4Avf+6T/Hgy1t9/apYL9BW5EuF2YbNkn7wqlvUt/GEh8aNL9G6ie7
+cFJhyvS+vAryaRb+g0Hmx07pvhQDh7YMWj6GhfNONWJYstugYSHyCSu5m2xI
+vzlb+I7E0Qb5KfBhmQyTLJhSerKhAa5TDDvUR+bhfzi6C3aLX0itN0S+b9Zs
+E8Fdtq1eiTD/Ff/bGjjoy7iUEE5lTYb/COvyPr5UMULfgsjrTJj2qtDaCke7
+b4i8gjyTTtE/xcKW5+0OqsGWGQmN52ElZmpGHPozicocKYMls5lxPZhPUNsU
+q5zUa7sdbAlX6WduzYd9Ep4ePq9OU9maW5elwJORkcmycOqiLEEgXGzgc+/U
+Mqzzf+NhRdb/4uKyDla5f/0PGVh8ymGwn4l+4xf39yB/qN77gVrYJ6B7tBKm
+/nr97ios3lrtkA4rBVVKGuFQ72sTB+FRKUbABMxxWxviD7dp7JA2R/0qe99E
+XzIfh7KTGXCdZk9ACFxVrP/zBEzJ2nn9G3a1/9XIG3lttG68KIW7qHGt23Dv
+xvmSfpiTFLNdFf1OclXurURelpO14z5YaPwlKRzWK5M4nYV1z4vEd2DeyVsv
+q2BK+ANH2Rj12+s+l8O01V/XA+C9BueMM2HGwzqbSpiqKyn+HpZ7b/ZyClaS
+fHGewPm/uRSOqZrAq385cgT2iFOLNYR9CswXv0P+GabLkA0svh/btw12U4x7
+5AhL6upqKjGPDimxtRPMtBOUy8HOI/WldjD/8LnZCDWaKu2zHTeF23RS/ilW
+Rf7mIUMWTEs+6wfBodkRvTJwdFIWm4JTG16bjSCf5Rz/Ut03uNfzpY51cH4a
+0zcL/rjubmgmzItI1UyCM/XWTIXATbsOiviwj9q+V9/Bxdly3a3wgWS3gk2w
+T0f8vDzqUwXTqpYw98Ly7mBYr91xmyOZTwe9pB02r+y/uAdmLlCvMEH+q0Oa
+0Wkwo2dDVA5c7M4800TyHdfbPQl7fAo+tAD56z4YiDaReXBmx1bDrMRAhwg4
+j9bR3UrmKxAap8FNQ6sORsOjPUNnk8h6Yc5Xl+HiaFu5QHhFUopFK5lnu5tA
+h+y/5hb2Bg41mWltxnlVLn72X5ti/4jhATe4yNm+VBMW62rxmpC/QzVrWB+e
+5PiuXA17VM3mmcFdBc9eJWIeuUHqA8SMpO4RsQpNvfAuWmsIs7W3H3SEuVEf
+trBg4YoIx5qlNNX51oujAKduNkm3gkWrJPJ/IY8wZ9xDtAT3aia63w9z9niz
+s2D1XebbHpK8uxsfhMC05qXIatjEM3GzP9wU29FB+q0K0iqJhFuO1w7+ROYx
+vt/xMqz6jDGRAbPZ1gMjsF+r4bN08jy9sFajcT5ldE/rNOx66XN8ARzlrfsh
+D86/qa8ti/zR7RkMch5LoH4nAn5o23hLQO6Hm7DtIZxfbrHoA8n3/WcvFcxj
++Kw+TxX91aXLGLnCK9jPO+3gvT/UhO+Dowqfa4fCoVSFpj987GZ5OQ/2eZv8
+3Iqsl5p9eIOsH+h5PYv6YZ7Kr7tg2sPH4hw5z/3vnGky37hODx1Y/aN1p+x6
+3E/v58U5yD8vd25AHRbuWbNzDv1ecLYIXwFLjAYlO+GOxLXJxJbvxUtrlGmq
+2jyxUAOmd0mJmHBvSPMVBbI/xUg5XQm/V4dllfM4z1J5qlcBbnmsaDMC53/b
+fsJHEc93V9o7AXk+tsy9e6SAe2OviKuDKZ1W91jYl7/26hW4ybmwNgwuksrU
+If3y/I/2Z8P3wyZ2JsAcNUvXaVjy1ib1GOmfLR2TiPqUQwv/KMzaOeeijvO9
+hY+VuGT/Mr+XcbCCgpXyKfI8BYjih2D77373LID5K89Ob0E/dh6q6xph5r9O
+WBTCxYwYnpjUW1XcPA6H83LXf41+2fVjX+lgPjNjSQlGcFNhSK4VHMXb/GQn
++X5KKcsc5jy39+TCPjVRGUqwUUrJ7iKYmbdr4AnqHasd9moj+43WnQmHfePT
+hgbJetHF5TPI1za/aG6OzP9kb/h+OP1RUK+0GZ7nymfTF9DvxLyllTLcdLl/
+sQ/mkT8ov4qYzv0jcIk8TdV77tCQgZVmggNfyOL/pqV6dh71qPrsggYZmrqj
+Yjo2Blc9zXZtk8b/2VRtyHOY0z7hJQVrN8sr3yH3y9bSPcrAuiusIpJ/cpXM
+p3Vw9e4Fgzyy/9awSB2ecX8SGQ/vreb5OsMWRqI2Dqz0wHbyV3hex4G1H86v
+KFPdiPp+CY5+oaS+sFQ0CusZ31sQAfMir/pWIZ93qpFxHCweXpN/HPmV9Ptz
+z5B8Do5WrnL4vToq/VwBc7meKvOwT72phpDkqfK0O4X+u17b/z5N5mu28OwU
+nHvc1FAb88i//SB4JeZlqRoa7ULmOaXZqwYvKdw+FQFTLE2/DqwvrL44mgOL
+TU9fdoHfNT56UEvmeaDvRgrO41GfTTphzlOthhzke9V9TmMMnpyOS4tB/gu6
+fwolMJdmazmhv/++zP//yaD/A2Slx6s=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25695895996216, 5.4856114964743385}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMk1cUB/BPoqVCkVKcFlAEdNMG0OKgA3XwARVfzFWYZHYbqygGpJGm
+VEU2tTAeBbaEDSRaBaoyHZLwqEoUSm2ngBLQ4iBDXimCik6wWAaKgvvfaZPm
+5Nd7vtNz7r35POOSo+JtKIr6Bl8S339c6ffRk6ZqIp1jD8LPLo4G3PGgKfYW
+6/edsFbQ662CLZd4wVw3mpq2PyAIgfnWFs3n8Aq5l/fDZTQlEda2hcEXiqSl
+obCykdWwEj5Zb2Sdd8d62jmXMdTb3yg6y4KVtLv/KVgWbeZmLqUpM1Pa4gvv
+m+IqFsCShHxjrQtNjZU1Xa5egvzckHFvmHNXc24/bHjTW3GeS1OB2/OraVh0
+yFHiAUet9u7xI/k7nwsrFtPUV51T2g2wxT17WAi3zq89EPt/va3trxbRVI93
+IKsQrrFtFt6BU7e15nURT7Y7XIfrXuh8PdCPyGZZOFmPeLKqVQoXKBI3v4Yv
+XUhwvQobqk/cj0B9seMcZyusfGZiVMHXwlL9PTGvjK2v4qG/THFL1zq4oJB5
+/DL8OOnwng1kP1aUSoWYL2ySU7Cc7NdfDqwuuLVfnPKC1MueM/kd9idhprhY
+A1Mx6d7dcNrbXaOBsOypVkHOI8HCbWhA/2ax01UVvEryZp8vTOX+wa+DSy8G
+0YWIdFmF/iYit8hPYEUdQ2jl4xrYxotSRZN70cV8coyc988Pk+vRR43CrpwP
+SwN67vrCpoHrylbkFfPs+7WYw+B3eHkUzCljDX0Bm5vkvLvIUwyMvJsDm1xc
+2jfC/PP9sybsi/KH1ZkG/L7XhhvSAEtSbqs3wnbvtFU3YJnnUVMvYh1j/QMS
+DYdsZlSIosMWJgt5SiHHuIM8Z513ZBssaTJuCoLTXvsVF5H1Y2fcQuG9T3lb
+B4nbmp0SyXmkzN9O7hEtDoushhm2kcelsKElIJqNvGzb3rVlZF75YHgOPCFq
+T9eTeec2cxYg+kvu5DeTdc3R/hJEi09O5RXEghfWTWswf/fLCnUOrPnU0VwP
+3/a1/ymE5DGyMoKwf2ud8t/2oy4/IquhHE79LWMqHqb1S92n4Dzj6yIyb82Z
+ul98cG7ySt1YOGy+d/NgGPwtT3i/HPdOqbz2/DM4z8FNPhdm98QZHOALaU+d
+Ej9CP78yk5pRTzx8srZ7IXzl7/F4OC3WUfc1TJ2WV42jP68H9xpHneG3qQwZ
+XBW3e+VpZ3IfhxeOoG9B9A33PXCNoG3LbrjOZnNcBMxnVM0bQt9tW7TBQtjU
+khWggO8LCk6KYU2g7b+u8DNjHzMbNreOrO/DHKt72PZ/wqLgs2py7sqkL9fN
+Rz8e7R/bEe8VS9U7YVlnQEcPHJz7ckQDi4JKlC6oJ18yOD4MmxdrGOT/xmZ/
+H3LDvPSEqvsRzDY+KqFh6pOV/ET0+6rj8eR2mB83s2sKvrRmwhoOG0SzjrmY
+t1zRML6UPD9t17cI+3MtLaO+D/UtJ2Z+PAWfiWLkpsPs5JHNdtjf0uW9Uwtg
+k09Mzh5Y0OEzoMI8dMstvQbum9a5TXBQXxg6roc5RQMxMbCsY+yWDp7WjVZf
+dUL9ruhiNaw+suMAl/gfRYoYPlQnrcxkf3gvL/kQ2fR/EnMCOw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.118561596984358, 6.001529066331595}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{9.4, 15.5}, {10.6, 15.1}, {10.6, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.5, 15.500000000002307`}, {6.5, 8.499999999998607}}], 
+        PolygonBox[{{6.5, 11.4}, {6.1, 12.6}, {6.9, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 12.}, {1, 0}], 
+        LineBox[{{13.5, 15.500000000002307`}, {13.5, 8.499999999998607}}], 
+        PolygonBox[{{13.5, 12.6}, {13.1, 11.4}, {13.9, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 8.5}, {6.500000000002592, 8.5}}], 
+        PolygonBox[{{10.6, 8.5}, {9.4, 8.9}, {9.4, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{7., 4.}], 
+         PointBox[{13.5, 15.5}], PointBox[{13.5, 8.5}], PointBox[{6.5, 8.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs4lPkeB/A3lzXrklnjHpkWkbLrsj1YaibCsLQO1jpymUpRZMdmt3s7
+ndQq1IRU58ROVmKXTJH7MuiCWmdKhNyryW0YGqdC2e//nDPP4/k9H+/7/n+X
+//vOO6u2fxe4U4miqLP4I5GSLuGzgk3990NnU+JrGQPfw0zx7dgAbTZl2GMs
+7TLG8Yg1Xj3L2dTmpB82ORDv2yO7Cpf3SrNTjdjU0FU36xtwpOnxojFDNsVX
++WLpPezbPfU2EBb2uVanYz2LucXoPw2QR82bthb5NK1ovRGwIEfXvwDes1Kh
+ToPlG5VsHT5hU7Hm593a9ZGvZnjDfVhHLdzyJsyde5wRoYP11Lc/L4XZOu/X
+yeAwaRetBRbt8dybwGBTuiaF9XOwnU8Zvxf2MmUuOJL1vQ83rtVlU+0m51qP
+wLz+LWqRME35Q24rHFBwaCQBLt/hVMlA/TxOan0EHJy+mBQMi/6VNk6ur6HT
+xSdJv717T/Vh/Smdga15sOSzzJAkuCrstX0BLJ7Q4L9Dfe6DzLSzcECbnf0+
+uGmM7hoGcx2SXcfQX5WL9fWPYTmPn78DlmY2tuWSeTGOO45jPlfmGPqmMGW9
+UjkZngr528bT6I95yMzECU4bLJsf1cP5TdfMaHCgi32ZO8wdzFVXYP7B2aGW
+Oag7IFFpRgvHR2/GqyyhTsF42acecF2s9j/J3Ni5ussuwpxLD+NnUKeYfmaj
+Kupx4BybSYX5szv1U2CV9WNfbYLp0YpcQ9LPBYNPGYgSh0drSxHDj04mL0MU
+SjRrPbDunVuu0+qwnS89ph2OXJW4dR1ZP2Kyyxt1ZSzPSNgGB5R3FRTBimWO
+FfkkX4Na8xQc5iGfm4YFv8lKGehraPUKvhvW4XreqtWHf2sszToB81YH67/F
++W5v/BvrST+nF9ur4fmSEbdRcryssiIKTnOacFmA7Xo+t5lGPGPbZKNAHCra
+e5fMoaLbRiFBDLDqVZUiL1f6lcZ5cr20ejAc1nm59+h6mP6lpv8zzMO9UmtY
+TPqxMOiLhTfv17N3gtlymYcmLHT3zMpB5GVOqDzAfMNbphnziEx3nnER4mS0
+iVcQIpfm1lSISB0sGozCvoma08Lb4Kr06z62eK7EgXd3kfWqlr/oMNZC/arj
+gjh4HUetwUETx0PFkyOwbuZT+REN3E/Grx3jUUeaQHrigzr2JyV4FYW6+zyV
+fqqGueac7mx4lMWrKoZFj7KCrTGf0I4UaQdMFcX2FcP0vKY+K6xHDTknmGLe
+B0rvzeQSl+6wSIKvNAyk2CI/1aZxuhimQowr78GS7JOdzWS/Aj/Mh6NeYa3E
+qBrWnExbHIHl2jKfdNjkiw++fuhPmOBv5wGP8vK0zsKC59Zeg8g/et009xdi
+tYF9MXDhrXjlwzCXL68bIfdXyoCXKTwk8u0LhVMavXNPkXwX/bseof9LoXq7
+a1AP3azt1Dfwi6poqgH104td7Ccwr7rOe+E56FewIt7oMlwou5HN/Rjzjdxt
+Ew3nv7jK0aNhv1QPi74m+2k08azlI9SftckmAqblt7emqOL/+xMd02DRfOez
+bSrw57vO9MLhq4d/iFLGXMLc7DYjv+jCCsUZJeSPK7raTJ4j0VPLiWWY12yM
+ZSDqF12vnDwB2zn0rSX3rbN2smoITF/8peYo+vf7e/37SFjQvtCvjnkxzfkh
+l2Gx1ZJRCpx0rezxIvHj6SdTZN7XfCaPIZ/d4urbLvjeoI292s0g9XRZyqJh
+E+0GzRJYzC9MTICtG4b8NqJ+5oMK/RDimDyjGphbpZdhCrf8GZWpi36Zym+2
+t5Dvnfdbyj1gthpbuBUOMFcbZMH0SzaiftR76aDEVwUWeG+WfQOLjld5nyPz
+Ke7Z8BD9dZsLQ0aQX5h+5VcOLN4/zlCCmb83tT7GfA7cfDM3R/pVm7mYCE+W
+aD6/T2FeQmWJDdnfPIaP2hKL4gVY1SnBzMsnj8Uvsii7Ax0zC5h/S/n5pN53
+LIppRrM1IM+z02hd3Bu47plnELl+tnHWeQ4OkLFLYN7ztvBvX7Mobq7kIBP1
+8D/6sf7pDIuiJxu+LICZC2d335WzKHlE0C4Xcn/2c3IsYUG1/XoJLOng7Z+a
+ZlGUhrPfDszD8B9PexxwnF7+pHcc5qy0WvMAHnpwojwK8+RbqN8uwfrCrU8q
+asn+nNsy1jyL8//IZ86T91ycX5AC9QR8Vt9pgPcA0/GOhgXqFbQuT2XA3Hc7
+1zv/h0VJtmn1yHB+oc79Qwbob0i6ybGIvAdtL/z4OyxM3XPXB37roz47DHNf
+rHPuRD3CEcWrEpjXlMMNJM8fZ2YDjVx/xGCwhfTz8Oc1cuTjvWy+xYbFvmmu
+cQrUZzJ0vxHzMPxJ/5OTqJffqfFzECyp+O7GFvTHtX0Vt0jmmeBkXDuB40d7
+CxvJ93hK55MsKeaTb91fQMw3+nfUMOpbiBkm8+cadX+Z383C/cgq6SLvAYZH
+5rF2XD/V/60Z2Q/j7+9U17IotoWFYzLj/79jMv74X9Rl/wX5tzcv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.2807968978321704, 3.5703782848251917}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd2Hs8lGkbB/BRrRQyapKknMIUtSMlh1ZTSbKqIaGykVTDKxRZRUxFUWhI
+kZAWJaGpkFfSFJW3JJtjJSadpkWGohzK+7u2f3y+n/twHe7nyXPT8Qpw2jmO
+wWBoyTEY9JPxfQz/ZnEZTAKTyxA6uohXaXIZ9R4Xso/B7PXWp9JhXvQh23Gq
+XIYoUj1BYTaXwdDcet4fDq18rhoNi+XGf38E53Fd706Zw2Vw213DFadyGdJf
+eNcuwpIr3zlL4UDNeykWWljPW6JpD8d03Rn6GxZ1BDnYwOLBPLapNpfBcU9p
+MaDxL3W6B+DAaP9nX7B/lmtyVxnMHMw1KoKDRy0fyGDxE3b+Zti5OsFWS4fL
+8NRYcXkY+adO7vZZBQtddXrPwJqzdFLdYYH6wxMcqlftVpEvzBi5yLqggjgX
+POT8YUknJ7N3CpfR5hTqshsWF2y6thUe3fy/dleYm/taq0uZy1Cf3MJeQeul
+Fetz4LzEdUx9Gk8ybT8JszSX5v9C+YwLPkLjzC91C98jX22LlnefYYWTr988
+gD2L/k73wf4ViueGr8CC/V+sVZFPwWzFuNMwV9n5sAQuc/rmH0X90fpiwUf+
+rOwFCyOoP7yFO7th3iONwcO0/3xbjVA6r0erY4TUn6h6T3n0k+HCNc2H61Xl
+9JPgHF3PZ3W032nxHrVpXIaxm7f4hzadc15iAmz+dmBkCdUfVcQfhFOd77BC
+YNmf/qH2LC4j2SR1bQU51nJmDMw+/HuqvC7ih+9KKoSVZnc/d4KFKlnG5bC3
+t/qtTJjZL7QogmuSFeWlcFZpKPMkXD35RLqxHuKpvB1zgm12XY71hbULpy6Z
+BGt+DtLLgrndBmnXkY+EUaJeS/bYWcCD3cd3R/TAgf07HLpQX222Wtv4uYiX
+rXriGFzdKTZSgTk5j/wNadzQtINcn3Hx0XP0i3+tvFUeFiW79cfB7iJrrwHK
+x+BeET1f6rHHtF7Dgt/aBq3oeVeqGr0LMx30OpbAvDssDcpPFrBdYEf9r5UW
+R8Ii9i/dQeT/zmZup/HOXUa36Hn179lqC0vklOyZyEdzTUamCZxlesA3HK5Y
+1505l3yw9N032O6Q/t/aMM+YuycC9YZKL6wxpPz8Hq5URH/C9Zwum1M8nUbP
+c3DMYL/2JpijsLJEbzp+SmT+4TAjZ5lLLty6waW1EBYeziidqYbz6Aszl8L1
+XT7N4XDwjKWK86lfxvv2PIEF7uMO7aX+SOynjJ+BuMbBERWwp58RVxeWxpq+
+VNDHeFJGAhuOaRA4OMNZHS4JanB6guv5dBqfqdDSg/0WvzQs6oC5Fd79Ilj9
++vycWQboZ8iMFTvgNo0d0vVwvU51swIc6vDnylBYIp+y/hLyZ4QWvT0LC4Sc
+NC4sMIkNyCcXfK9tQ/0FBufGbtD6BYofIuGowwG612nc40faQrjxZGFTLsyt
+vKnfg34KO0PCkuBApW0z7tLzlF7yhOIxh0IXXYa5Jk/vbaH9Kn3WkWNeRBy3
+hBkHu63F9Dz2d/yhAfN89Zv6aL941+hRqleruMUS8cSX/9J/C3uG3GDR+XAC
+283qYQZreugk5M/Wifd7QPOzgo1jYHfmfr1qWPt5ZxUT9Y+umbXxKSy5pL47
+ExZdCj76BuadmDjJGP3l5Vk9YiC+9qq89GJYKdzw9nzY8/hje1N1jI9TPrGN
+6pdezs2G1RvuDKTB4kBWq9xMPM9PbL3baf3HTXX2cO0nRp+BIepe/tklHFbi
+Vwr2weKDIxZnYLu2Za2VsCDX1Jac+rH75iQ27NnvdAiublSV8GDPySuXboDr
+vyzlJcGBc7ilynB67sQltbDwU+H2CuQzmhmn8gOWRH4M8oC1jefe05uH8bjm
+v0ZQj/AHP2U5nMW713MGTq7N2MiDOfVKfFOYrW+3wAUWJ80b/wL9iWvteOYI
+M1S7Np+E07uubrSh+VcPRq4nq89c9CvMDZE16MPvlOTNWHDgRw/JNNjtQAF/
+APmIRpqtNGC+Sv9II9XHCThoAWdpKJiW0PjeuYZ7YYf9Tvap5IibNXfpfXE5
+6yFg0/93v/fR+xGY7L81gOp75++WArvFDrTtYtP78eGHOuqdsOMQm//vfG9n
+Oh8HYxWNYLLLj70m6Jf2ba7mSZjhHWlTCVfsr9IrhOv3hD2y0UDc2FfXXlC/
+FW5ZiOHa5vJnKqhHtLR5gzF+z0vPHjNeD/NiZ3tFk7+mzzhN/XLYeboG1vQ8
+kt5G/U7M7P0Ci/64dYY9H/N35wjk8R0gEaZWBcNC+zA3BiwYdH5XCQu8E4Wd
+tL5m+MkEI+wnnGh9Dc67kBZmAzNnCLb6wLINJ8zC4cAnHldYsPu498n5sEC3
+MboE+YpFR5PqjOj87Sp5VM+DunMfaT+ZpXsX6tXsG4gdoPlliQEnYNFyh7Lv
+RlR3Yesi2Nm8vLsP5vWFsD6hf8sYfps7YdkiodJ1uMaYlfCE4p/O64mHy9rt
+d1+DhdcLfjkCC6aXD5+i/e9YXU2A2fP+EQTQ+mu7fi2GKy6m/caj9dqOL/vg
+HM3s3Yspv1Mt/asRP0r+D9U5FP/2p/pCOh/XxKkqsGdB05A+6jEPb/qqQPv7
+uqzOhxvvs98q0Xrpq0lm6EeOzuGMWVTPs8Xrq2F1bm3gEvLm2J8b0O9Au3LT
+LeSJQbqNcKMs2C4W1u6VqTrgOyw0h5N9j/bfMuHyTbhM6tgkZ4z9+9/5TMR3
+WJ6xSNMO5hoOlNjAo9YbQ5LId7ubfGCbyLc322FtA2W1EDiQJU2avwD5W2U8
+oXGm1avGIPJDd0db2PzdNNcymOc1fUgZrq2MnjcIZ9V39lchPstmZ7bRQpwn
+z9LID5b9bAh2hTlrZukowt4jrcWhsCfDsDSX6nvO7EqA6+0zh7lwbUARKw0W
+mAV8e4N+ZCWk5JB5TxND42H+4PmIRFqv3ftiDdwWN9wTCYsa+lvp+fIzP5ey
+G5ZFlvh9Q79DVxzh28PiD7sv9cE2R7Yfng9rMzecn4D5yedeaU2GmTFWmzlw
+nLnoWBfqkfkPvg+CK47nvq+HRXvy1z6l8dFlKytgTtWLbAvkq102z+sajAfb
+vkSTnts9ZVdpXHLlsxXq1a6WbroB189c9KwG5tkOva6ifjXFf3Ch/s0XRUpg
+8YZy3Tcwp7X1y0TK92JVmhe+k6XTeyMtqD9lrKpmOLn/zY8gOKawv04T3218
+S0dpCfVnTNK/Cv4+dt/3B+z20zTVA9Z0nLvf7lf6flgxIQBum/jg72SYvTbt
+517Y2fTdMgksadnVwIfjBvjWLA7yu2LOc4ZfZjyvWAIzLQ/dXgK7l1df2Qhz
+dT4+nAK7ZW2x2kPzle4N30d+fmGzmg9z6PdvwhZPuLZ077REmLHg5oVh1Of9
+6fODNDjw039fn4WjRheOZMKeKXrTLOHyM7YjGRz6f2DxVyn6ldR1f3UqLNF8
+UXYZ5k/cGpdA60OKew/AU4dPXKV4gkvL3bxm03u9++I+ys8s6gFZMlH5qBfM
+ExRNDqf3I0JtrxPFk9j0F8J/OWacXEXzvbdzv8Ev860+mNH+a5vvbkI+Z88n
+hy+g+T7XNz+ES+VeGbKpnq1zzVajvvtDD88YUn7Tg94/hdvWbllhDJfdTHu0
+AP0pGBTvof3MVYeTgmGlu1F6tnDe4og6utfU7jfhbIXFndNVvsMnDPzZ+6me
+7ttzOPjOtq4I9jsNs1fKszzgfcKyhSWUn0b0rqN07/geHP6C6htQHzsPV8fU
+rBmDhSsSV+Xp0P2sb5++Cc5PNGN23r/7mbTZw+alekM0P/+sxMcf5k/vro6C
+1bx01E7R+M9jb3fABXaPh67CgVq6WlZws804l2rYbrXsjBLsFG+S3gKLP6Zk
+v6R7y/3eoPcw13ZazWWY3SSq7IFjJMrxIXB6/qRzMpit+8p3LbxILXLzZ1i0
+zqBIF3482BX3keJ9CPKYANc158jayE39WyTo72hIiu8zite0o7QO/soqH7tL
+8fht3k3wSw7nf9dg3pSOwa9w9cZU6QVYavzhgBr287cfC0uE3dqDen+DS9WG
+EqPhsjUp2fR+ZDlvm3PIhO7DBTK6l61XMJCFUr1L/2z6h+5dE2ryDsCy+IjJ
+dD5Kz46WRMKpHU4af8KpTxrsT8LqgXfD7sDyv//mlQ4L+XUFDNx7JF+Ty2/A
+rdaCddbwlsfFL59S/ndmWgTDgT3H1KhfwoHh9Cy4OPDXsyqLkG+OotJ9ujc9
+VvBYDPPe9sS3wDUq07ZtgRWmbroioXtW9q4gAVyWN9XnNdxuxYnIhbOmZG+t
+g3OCS/k1MMd6eXwx7HJLaiqFv++/EZ4IH/tjVG6CKfJU/I/ibth55JLWLJjv
+GOizFOZlnlZcADMspv2cADcWVYVZwHbWTuuf0/PC+8uTC6fGynVehFtzrrxf
+AYvdmth0j4yYfzrAmtyxx9MR9sowSDWDzRUPhNO902akwdAIzrORqs6l9bXu
+yrPhsmMzbOfAvn7vNyrDoYrn7tP4/YGWGT+Qf0yAYdFSuEJTJawHrtk46aoL
+vKjpYWoHzM749lJA+xk3HGiE7erdpcV0fq1pk57CnjonWX0U/4290mPq96ij
+vSnqC+69qlYLh1osWHwAtlwtO94Aa7fobBLD/2RVREuof4eX68nTPcv77HD/
+IvoOKtC1g9vbHp2djHyZFZqMKNj99+sNBuRtKVduwWzHHUO2MNvouPcbOJW1
+xsCX+m9sIBmDk/9zxO0UjYuPrJqKe5dz+83QEupX7nEzdfjdj9M7X5GbL71X
+hX/S33dgBfr7zlzu/wFLi3W0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.041851370299756, 4.042946021129489}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1As41OkeB/B/ZbdxpyyTW6NUyj0Suew/93bRpEjiVG4rpxinVsqlOeSu
+TC3tpJJirUsubURFlHLpYqZNs0QZuaZIK8xK2/m+55x5nnnm+Tzzvr/3+/u9
+/xmdgAjP4IUURZXhTT7/99KnKQb51KGp2L+10zxhTjrf9QuLprjV/MkCeLRW
+S/s9zAm69mAS7mpQOC2A955+KdpgQFP8qYLky3B+3lt/DjxYf+BqCKyXtm91
+Hvm+RH2fDix35VNZA1ylF7WmZDnqqxcZd8DFY1ssFsO60oK7Apgp4CsGadPU
+Dr2Ezc0wK2x6sEUL9ft82aUw45NejgXMuDtlnQLTgk3uNzVp6rGq3Cs/sl93
+qdkO2Oak5o9GsGvFDm1ZWBITe+QL8rNsHALFGjRlsvFE4DPiwOzfOmHWavus
+cpjpOaw4Avf+6T/Hgy1t9/apYL9BW5EuF2YbNkn7wqlvUt/GEh8aNL9G6ie7
+cFJhyvS+vAryaRb+g0Hmx07pvhQDh7YMWj6GhfNONWJYstugYSHyCSu5m2xI
+vzlb+I7E0Qb5KfBhmQyTLJhSerKhAa5TDDvUR+bhfzi6C3aLX0itN0S+b9Zs
+E8Fdtq1eiTD/Ff/bGjjoy7iUEE5lTYb/COvyPr5UMULfgsjrTJj2qtDaCke7
+b4i8gjyTTtE/xcKW5+0OqsGWGQmN52ElZmpGHPozicocKYMls5lxPZhPUNsU
+q5zUa7sdbAlX6WduzYd9Ep4ePq9OU9maW5elwJORkcmycOqiLEEgXGzgc+/U
+Mqzzf+NhRdb/4uKyDla5f/0PGVh8ymGwn4l+4xf39yB/qN77gVrYJ6B7tBKm
+/nr97ios3lrtkA4rBVVKGuFQ72sTB+FRKUbABMxxWxviD7dp7JA2R/0qe99E
+XzIfh7KTGXCdZk9ACFxVrP/zBEzJ2nn9G3a1/9XIG3lttG68KIW7qHGt23Dv
+xvmSfpiTFLNdFf1OclXurURelpO14z5YaPwlKRzWK5M4nYV1z4vEd2DeyVsv
+q2BK+ANH2Rj12+s+l8O01V/XA+C9BueMM2HGwzqbSpiqKyn+HpZ7b/ZyClaS
+fHGewPm/uRSOqZrAq385cgT2iFOLNYR9CswXv0P+GabLkA0svh/btw12U4x7
+5AhL6upqKjGPDimxtRPMtBOUy8HOI/WldjD/8LnZCDWaKu2zHTeF23RS/ilW
+Rf7mIUMWTEs+6wfBodkRvTJwdFIWm4JTG16bjSCf5Rz/Ut03uNfzpY51cH4a
+0zcL/rjubmgmzItI1UyCM/XWTIXATbsOiviwj9q+V9/Bxdly3a3wgWS3gk2w
+T0f8vDzqUwXTqpYw98Ly7mBYr91xmyOZTwe9pB02r+y/uAdmLlCvMEH+q0Oa
+0Wkwo2dDVA5c7M4800TyHdfbPQl7fAo+tAD56z4YiDaReXBmx1bDrMRAhwg4
+j9bR3UrmKxAap8FNQ6sORsOjPUNnk8h6Yc5Xl+HiaFu5QHhFUopFK5lnu5tA
+h+y/5hb2Bg41mWltxnlVLn72X5ti/4jhATe4yNm+VBMW62rxmpC/QzVrWB+e
+5PiuXA17VM3mmcFdBc9eJWIeuUHqA8SMpO4RsQpNvfAuWmsIs7W3H3SEuVEf
+trBg4YoIx5qlNNX51oujAKduNkm3gkWrJPJ/IY8wZ9xDtAT3aia63w9z9niz
+s2D1XebbHpK8uxsfhMC05qXIatjEM3GzP9wU29FB+q0K0iqJhFuO1w7+ROYx
+vt/xMqz6jDGRAbPZ1gMjsF+r4bN08jy9sFajcT5ldE/rNOx66XN8ARzlrfsh
+D86/qa8ti/zR7RkMch5LoH4nAn5o23hLQO6Hm7DtIZxfbrHoA8n3/WcvFcxj
++Kw+TxX91aXLGLnCK9jPO+3gvT/UhO+Dowqfa4fCoVSFpj987GZ5OQ/2eZv8
+3Iqsl5p9eIOsH+h5PYv6YZ7Kr7tg2sPH4hw5z/3vnGky37hODx1Y/aN1p+x6
+3E/v58U5yD8vd25AHRbuWbNzDv1ecLYIXwFLjAYlO+GOxLXJxJbvxUtrlGmq
+2jyxUAOmd0mJmHBvSPMVBbI/xUg5XQm/V4dllfM4z1J5qlcBbnmsaDMC53/b
+fsJHEc93V9o7AXk+tsy9e6SAe2OviKuDKZ1W91jYl7/26hW4ybmwNgwuksrU
+If3y/I/2Z8P3wyZ2JsAcNUvXaVjy1ib1GOmfLR2TiPqUQwv/KMzaOeeijvO9
+hY+VuGT/Mr+XcbCCgpXyKfI8BYjih2D77373LID5K89Ob0E/dh6q6xph5r9O
+WBTCxYwYnpjUW1XcPA6H83LXf41+2fVjX+lgPjNjSQlGcFNhSK4VHMXb/GQn
++X5KKcsc5jy39+TCPjVRGUqwUUrJ7iKYmbdr4AnqHasd9moj+43WnQmHfePT
+hgbJetHF5TPI1za/aG6OzP9kb/h+OP1RUK+0GZ7nymfTF9DvxLyllTLcdLl/
+sQ/mkT8ov4qYzv0jcIk8TdV77tCQgZVmggNfyOL/pqV6dh71qPrsggYZmrqj
+Yjo2Blc9zXZtk8b/2VRtyHOY0z7hJQVrN8sr3yH3y9bSPcrAuiusIpJ/cpXM
+p3Vw9e4Fgzyy/9awSB2ecX8SGQ/vreb5OsMWRqI2Dqz0wHbyV3hex4G1H86v
+KFPdiPp+CY5+oaS+sFQ0CusZ31sQAfMir/pWIZ93qpFxHCweXpN/HPmV9Ptz
+z5B8Do5WrnL4vToq/VwBc7meKvOwT72phpDkqfK0O4X+u17b/z5N5mu28OwU
+nHvc1FAb88i//SB4JeZlqRoa7ULmOaXZqwYvKdw+FQFTLE2/DqwvrL44mgOL
+TU9fdoHfNT56UEvmeaDvRgrO41GfTTphzlOthhzke9V9TmMMnpyOS4tB/gu6
+fwolMJdmazmhv/++zP//yaD/A2Slx6s=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25695895996216, 5.4856114964743385}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMk1cUB/BPoqVCkVKcFlAEdNMG0OKgA3XwARVfzFWYZHYbqygGpJGm
+VEU2tTAeBbaEDSRaBaoyHZLwqEoUSm2ngBLQ4iBDXimCik6wWAaKgvvfaZPm
+5Nd7vtNz7r35POOSo+JtKIr6Bl8S339c6ffRk6ZqIp1jD8LPLo4G3PGgKfYW
+6/edsFbQ662CLZd4wVw3mpq2PyAIgfnWFs3n8Aq5l/fDZTQlEda2hcEXiqSl
+obCykdWwEj5Zb2Sdd8d62jmXMdTb3yg6y4KVtLv/KVgWbeZmLqUpM1Pa4gvv
+m+IqFsCShHxjrQtNjZU1Xa5egvzckHFvmHNXc24/bHjTW3GeS1OB2/OraVh0
+yFHiAUet9u7xI/k7nwsrFtPUV51T2g2wxT17WAi3zq89EPt/va3trxbRVI93
+IKsQrrFtFt6BU7e15nURT7Y7XIfrXuh8PdCPyGZZOFmPeLKqVQoXKBI3v4Yv
+XUhwvQobqk/cj0B9seMcZyusfGZiVMHXwlL9PTGvjK2v4qG/THFL1zq4oJB5
+/DL8OOnwng1kP1aUSoWYL2ySU7Cc7NdfDqwuuLVfnPKC1MueM/kd9idhprhY
+A1Mx6d7dcNrbXaOBsOypVkHOI8HCbWhA/2ax01UVvEryZp8vTOX+wa+DSy8G
+0YWIdFmF/iYit8hPYEUdQ2jl4xrYxotSRZN70cV8coyc988Pk+vRR43CrpwP
+SwN67vrCpoHrylbkFfPs+7WYw+B3eHkUzCljDX0Bm5vkvLvIUwyMvJsDm1xc
+2jfC/PP9sybsi/KH1ZkG/L7XhhvSAEtSbqs3wnbvtFU3YJnnUVMvYh1j/QMS
+DYdsZlSIosMWJgt5SiHHuIM8Z513ZBssaTJuCoLTXvsVF5H1Y2fcQuG9T3lb
+B4nbmp0SyXmkzN9O7hEtDoushhm2kcelsKElIJqNvGzb3rVlZF75YHgOPCFq
+T9eTeec2cxYg+kvu5DeTdc3R/hJEi09O5RXEghfWTWswf/fLCnUOrPnU0VwP
+3/a1/ymE5DGyMoKwf2ud8t/2oy4/IquhHE79LWMqHqb1S92n4Dzj6yIyb82Z
+ul98cG7ySt1YOGy+d/NgGPwtT3i/HPdOqbz2/DM4z8FNPhdm98QZHOALaU+d
+Ej9CP78yk5pRTzx8srZ7IXzl7/F4OC3WUfc1TJ2WV42jP68H9xpHneG3qQwZ
+XBW3e+VpZ3IfhxeOoG9B9A33PXCNoG3LbrjOZnNcBMxnVM0bQt9tW7TBQtjU
+khWggO8LCk6KYU2g7b+u8DNjHzMbNreOrO/DHKt72PZ/wqLgs2py7sqkL9fN
+Rz8e7R/bEe8VS9U7YVlnQEcPHJz7ckQDi4JKlC6oJ18yOD4MmxdrGOT/xmZ/
+H3LDvPSEqvsRzDY+KqFh6pOV/ET0+6rj8eR2mB83s2sKvrRmwhoOG0SzjrmY
+t1zRML6UPD9t17cI+3MtLaO+D/UtJ2Z+PAWfiWLkpsPs5JHNdtjf0uW9Uwtg
+k09Mzh5Y0OEzoMI8dMstvQbum9a5TXBQXxg6roc5RQMxMbCsY+yWDp7WjVZf
+dUL9ruhiNaw+suMAl/gfRYoYPlQnrcxkf3gvL/kQ2fR/EnMCOw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.118561596984358, 6.001529066331595}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{10.6, 15.5}, {9.4, 15.1}, {9.4, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.5, 15.500000000002307`}, {6.5, 8.499999999998607}}], 
+        PolygonBox[{{6.5, 12.6}, {6.1, 11.4}, {6.9, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 12.}, {1, 0}], 
+        LineBox[{{13.5, 15.500000000002307`}, {13.5, 8.499999999998607}}], 
+        PolygonBox[{{13.5, 11.4}, {13.1, 12.6}, {13.9, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 8.5}, {6.500000000002592, 8.5}}], 
+        PolygonBox[{{9.4, 8.5}, {10.6, 8.9}, {10.6, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{7., 4.}], 
+         PointBox[{13.5, 15.5}], PointBox[{13.5, 8.5}], PointBox[{6.5, 8.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 10.4}, {6.1, 11.6}, {6.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 11.6}, {13.1, 10.4}, {13.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 11.6}, {6.1, 10.4}, {6.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 10.4}, {13.1, 11.6}, {13.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.296859253185694, 9.004142007228563}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {18.487957619455987, 11.899719917065077}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1A1MU1cUB/AHiCmEyGOCsIGxTOa6xWBX2OjGNA+ZXQkUKxhogpIXmyIr
+OOrXRNeZzmwiWweFaXykdakKg2YS60RnRaUoFMbXqmsBQ8iKm0jZgh0rzSBI
+97/ZS5qTX+895557381L3ldVoAqlKCoHPxL/f15hqP4gnvUMxXTQ4Zmw1V1Y
+dBKmdu/sYmGmdJjvT2Io86UBcRVMF9hZFcxO+tUqMn7zQ8loIkPZ6bScbPjs
+uU3hubDzYml3BMzPOmXpQ/Q9Sfvx9ssMdeX19LmdsH03Pa6ATU/Ydc8QhdF9
+1mcJWP+wZ7AednLtxRXwB78/DMuDrV8XlszEM1Rz15HZJFhez9UpYYU3fiyU
+zO8NG5tax1BDXJP0BfLsvpKl/XC52DQbSfI31hxYikMf0+9efgPWNP6w6QKs
+oCxtRTD/6EdHCmGOnb9QB1OHHk5sgD3qhhvDsLnt6EoY/H5203g0+mfjzbUU
+7Nw15JTDntCSLXEkf83CYT3Z75pvLQxsLr4/cg92jov6dHB528eyP8h4wbVT
+j+AzeQbPImx4/mayCP2ao7ikF7Cup1dhhP3Hbxf8RfJtbm0E9rvqRPYlB0xx
+S+3H4GrzxRCynrxLGjUF89yD27aS+uJqL4NzOGNfDkyQ81LHLTbClDbhtBrW
+vfpA+yu8eaJs7k9E+jWHOog4c8doUyJq4mXfxGIeb7LC5UZdulbUFAO7VlLK
+JLDwXH5mAPNi9d4WG/q0z4wkPiDnLpNeTYN9nYfGjsNDpufFt7BPzWnfXBLc
+HyPk5RLrhe1XUcc//PT8XCzyHqvC34HTQ0VvtcC+hX3qDtThFYne08AMM2ze
+Ams5o0QO882r666Q93lnMGYH7Jx3hAthe3f95zLYEFnJ3UMUVOmu7UcUNgWV
+exClpbrVDYjyslFvFGI63ZjjIPV/1s4+Wot+D/7dT96zp1qZY4UrBxJP7oD5
+EZrFFviL5m0ZNWTdgPif63Aeq7zfQ+bf2vX2Y3iV1phA7plm6PLIWtTVtx6s
+2Yi+NSr1PAtrLQujW2Fqe1jcXXhmekItgRlZJZ2CPO2/JXszYfZ6IL8B1k3Z
+GhPJeEL1UpDcH5u1Z5rcq9zY1Ar8v2dZ+iW5x9TKd4IR2PDLsjiL9Ndb91kK
+zjMqpIznwjo6tna7GmYNvAEFOb/IjgwTXD65/inZt/N7gfcnWOzWp0pgNiSj
+vxM21R/rvvkS1ps9kNlK7p/B7xLAzqCj+QTsSm01mGOw/lc39mbAy58GppJh
+ekOW5Tf042w2FlppnD/TafoE5roE3nyYJt8fMk6+P9HMf1UepsE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.441371117808147, 6.3681225377691}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 10.4}, {6.1, 11.6}, {6.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 11.6}, {13.9, 10.4}, {13.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 7.5}], PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.296859253185694, 9.004142007228563}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.487957619455987, 11.899719917065077}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1A1MU1cUB/AHiCmEyGOCsIGxTOa6xWBX2OjGNA+ZXQkUKxhogpIXmyIr
+OOrXRNeZzmwiWweFaXykdakKg2YS60RnRaUoFMbXqmsBQ8iKm0jZgh0rzSBI
+97/ZS5qTX+895557381L3ldVoAqlKCoHPxL/f15hqP4gnvUMxXTQ4Zmw1V1Y
+dBKmdu/sYmGmdJjvT2Io86UBcRVMF9hZFcxO+tUqMn7zQ8loIkPZ6bScbPjs
+uU3hubDzYml3BMzPOmXpQ/Q9Sfvx9ssMdeX19LmdsH03Pa6ATU/Ydc8QhdF9
+1mcJWP+wZ7AednLtxRXwB78/DMuDrV8XlszEM1Rz15HZJFhez9UpYYU3fiyU
+zO8NG5tax1BDXJP0BfLsvpKl/XC52DQbSfI31hxYikMf0+9efgPWNP6w6QKs
+oCxtRTD/6EdHCmGOnb9QB1OHHk5sgD3qhhvDsLnt6EoY/H5203g0+mfjzbUU
+7Nw15JTDntCSLXEkf83CYT3Z75pvLQxsLr4/cg92jov6dHB528eyP8h4wbVT
+j+AzeQbPImx4/mayCP2ao7ikF7Cup1dhhP3Hbxf8RfJtbm0E9rvqRPYlB0xx
+S+3H4GrzxRCynrxLGjUF89yD27aS+uJqL4NzOGNfDkyQ81LHLTbClDbhtBrW
+vfpA+yu8eaJs7k9E+jWHOog4c8doUyJq4mXfxGIeb7LC5UZdulbUFAO7VlLK
+JLDwXH5mAPNi9d4WG/q0z4wkPiDnLpNeTYN9nYfGjsNDpufFt7BPzWnfXBLc
+HyPk5RLrhe1XUcc//PT8XCzyHqvC34HTQ0VvtcC+hX3qDtThFYne08AMM2ze
+Ams5o0QO882r666Q93lnMGYH7Jx3hAthe3f95zLYEFnJ3UMUVOmu7UcUNgWV
+exClpbrVDYjyslFvFGI63ZjjIPV/1s4+Wot+D/7dT96zp1qZY4UrBxJP7oD5
+EZrFFviL5m0ZNWTdgPif63Aeq7zfQ+bf2vX2Y3iV1phA7plm6PLIWtTVtx6s
+2Yi+NSr1PAtrLQujW2Fqe1jcXXhmekItgRlZJZ2CPO2/JXszYfZ6IL8B1k3Z
+GhPJeEL1UpDcH5u1Z5rcq9zY1Ar8v2dZ+iW5x9TKd4IR2PDLsjiL9Ndb91kK
+zjMqpIznwjo6tna7GmYNvAEFOb/IjgwTXD65/inZt/N7gfcnWOzWp0pgNiSj
+vxM21R/rvvkS1ps9kNlK7p/B7xLAzqCj+QTsSm01mGOw/lc39mbAy58GppJh
+ekOW5Tf042w2FlppnD/TafoE5roE3nyYJt8fMk6+P9HMf1UepsE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.441371117808147, 6.3681225377691}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 11.6}, {6.1, 10.4}, {6.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 10.4}, {13.9, 11.6}, {13.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 7.5}], PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781965815728653*^9},
+ CellLabel->
+  "During evaluation of \
+In[167]:=",ExpressionUUID->"8cadb222-880c-431f-bebb-244137dc59cb"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["%151"], "Input",
+ NumberMarks->False,
+ CellLabel->
+  "In[153]:=",ExpressionUUID->"894c3aa5-233f-40d9-abd4-c11f7c04deed"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"TopologyList", "[", 
+   RowBox[{
+    RowBox[{"Process", "\[Rule]", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", 
+           InterpretationBox[
+            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+            SequenceForm["Glu", 1],
+            Editable->False], "}"}]}], "]"}], ",", 
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", 
+           InterpretationBox[
+            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+            SequenceForm["Glu", 2],
+            Editable->False], "}"}]}], "]"}]}], "}"}], "\[Rule]", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"S", "[", "1", "]"}], ",", 
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", 
+           InterpretationBox[
+            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+            SequenceForm["Glu", 4],
+            Editable->False], "}"}]}], "]"}], ",", 
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", 
+           InterpretationBox[
+            RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+            SequenceForm["Glu", 5],
+            Editable->False], "}"}]}], "]"}]}], "}"}]}]}], ",", 
+    RowBox[{"Model", "\[Rule]", 
+     RowBox[{"{", "\<\"SMQCD\"\>", "}"}]}], ",", 
+    RowBox[{"GenericModel", "\[Rule]", 
+     RowBox[{"{", "\<\"Lorentz\"\>", "}"}]}], ",", 
+    RowBox[{"InsertionLevel", "\[Rule]", 
+     RowBox[{"{", "Particles", "}"}]}], ",", 
+    RowBox[{"ExcludeParticles", "\[Rule]", 
+     RowBox[{"{", "}"}]}], ",", 
+    RowBox[{"ExcludeFieldPoints", "\[Rule]", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "0", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "1", "]"}]}], ",", 
+         RowBox[{"F", "[", "2", "]"}], ",", 
+         RowBox[{"-", 
+          RowBox[{"S", "[", "3", "]"}]}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "0", "]"}], "[", 
+        RowBox[{
+         RowBox[{"F", "[", "1", "]"}], ",", 
+         RowBox[{"-", 
+          RowBox[{"F", "[", "2", "]"}]}], ",", 
+         RowBox[{"S", "[", "3", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "0", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "2", "]"}]}], ",", 
+         RowBox[{"F", "[", "2", "]"}], ",", 
+         RowBox[{"S", "[", "1", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "0", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "2", "]"}]}], ",", 
+         RowBox[{"F", "[", "2", "]"}], ",", 
+         RowBox[{"S", "[", "2", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "0", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "4", "]"}]}], ",", 
+         RowBox[{"F", "[", "4", "]"}], ",", 
+         RowBox[{"S", "[", "1", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "0", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "4", "]"}]}], ",", 
+         RowBox[{"F", "[", "4", "]"}], ",", 
+         RowBox[{"S", "[", "2", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "1", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "1", "]"}]}], ",", 
+         RowBox[{"F", "[", "2", "]"}], ",", 
+         RowBox[{"-", 
+          RowBox[{"S", "[", "3", "]"}]}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "1", "]"}], "[", 
+        RowBox[{
+         RowBox[{"F", "[", "1", "]"}], ",", 
+         RowBox[{"-", 
+          RowBox[{"F", "[", "2", "]"}]}], ",", 
+         RowBox[{"S", "[", "3", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "1", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "2", "]"}]}], ",", 
+         RowBox[{"F", "[", "2", "]"}], ",", 
+         RowBox[{"S", "[", "1", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "1", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "2", "]"}]}], ",", 
+         RowBox[{"F", "[", "2", "]"}], ",", 
+         RowBox[{"S", "[", "2", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "1", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "4", "]"}]}], ",", 
+         RowBox[{"F", "[", "4", "]"}], ",", 
+         RowBox[{"S", "[", "1", "]"}]}], "]"}], ",", 
+       RowBox[{
+        RowBox[{"FieldPoint", "[", "1", "]"}], "[", 
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"F", "[", "4", "]"}]}], ",", 
+         RowBox[{"F", "[", "4", "]"}], ",", 
+         RowBox[{"S", "[", "2", "]"}]}], "]"}]}], "}"}]}], ",", 
+    RowBox[{"LastSelections", "\[Rule]", 
+     RowBox[{"{", "}"}]}]}], "]"}], "[", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], "\[Rule]", 
+    RowBox[{
+     RowBox[{"Insertions", "[", "Generic", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"FeynmanGraph", "[", 
+        RowBox[{"1", ",", 
+         RowBox[{"Generic", "\[Equal]", "1"}]}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+             SequenceForm["Glu", 1],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+             SequenceForm["Glu", 2],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+         RowBox[{"S", "[", "1", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+             SequenceForm["Glu", 4],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+             SequenceForm["Glu", 5],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "6", "]"}], "\[Rule]", "V"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "7", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "8", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "9", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "10", "]"}], "\[Rule]", "F"}]}], "]"}], 
+      "\[Rule]", 
+      RowBox[{
+       RowBox[{"Insertions", "[", "Particles", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "1"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                 SequenceForm["Col", 6],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                SequenceForm["Col", 7],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                 SequenceForm["Col", 6],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                SequenceForm["Col", 8],
+                Editable->False]}], "}"}]}], "]"}]}]}], "]"}], ",", 
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "2"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                SequenceForm["Col", 6],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                 SequenceForm["Col", 7],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                SequenceForm["Col", 6],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                 SequenceForm["Col", 8],
+                 Editable->False]}], "}"}]}], "]"}]}]}]}], "]"}]}], "]"}]}], 
+     "]"}]}], ",", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], "\[Rule]", 
+    RowBox[{
+     RowBox[{"Insertions", "[", "Generic", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"FeynmanGraph", "[", 
+        RowBox[{"1", ",", 
+         RowBox[{"Generic", "\[Equal]", "1"}]}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+             SequenceForm["Glu", 1],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+             SequenceForm["Glu", 2],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+         RowBox[{"S", "[", "1", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+             SequenceForm["Glu", 4],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+             SequenceForm["Glu", 5],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "6", "]"}], "\[Rule]", "V"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "7", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "8", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "9", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "10", "]"}], "\[Rule]", "F"}]}], "]"}], 
+      "\[Rule]", 
+      RowBox[{
+       RowBox[{"Insertions", "[", "Particles", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "1"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                 SequenceForm["Col", 6],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                SequenceForm["Col", 7],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                 SequenceForm["Col", 6],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                 SequenceForm["Col", 8],
+                 Editable->False]}], "}"}]}], "]"}]}]}]}], "]"}], ",", 
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "2"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                SequenceForm["Col", 6],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                 SequenceForm["Col", 7],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                SequenceForm["Col", 6],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                SequenceForm["Col", 8],
+                Editable->False]}], "}"}]}], "]"}]}]}], "]"}]}], "]"}]}], 
+     "]"}]}], ",", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], "\[Rule]", 
+    RowBox[{
+     RowBox[{"Insertions", "[", "Generic", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"FeynmanGraph", "[", 
+        RowBox[{"1", ",", 
+         RowBox[{"Generic", "\[Equal]", "1"}]}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+             SequenceForm["Glu", 1],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+             SequenceForm["Glu", 2],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+         RowBox[{"S", "[", "1", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+             SequenceForm["Glu", 4],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+             SequenceForm["Glu", 5],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "6", "]"}], "\[Rule]", "V"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "7", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "8", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "9", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "10", "]"}], "\[Rule]", "F"}]}], "]"}], 
+      "\[Rule]", 
+      RowBox[{
+       RowBox[{"Insertions", "[", "Particles", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "1"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                 SequenceForm["Col", 6],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                SequenceForm["Col", 7],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                 SequenceForm["Col", 6],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                 SequenceForm["Col", 8],
+                 Editable->False]}], "}"}]}], "]"}]}]}]}], "]"}], ",", 
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "2"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                SequenceForm["Col", 6],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                 SequenceForm["Col", 7],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                SequenceForm["Col", 6],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                SequenceForm["Col", 8],
+                Editable->False]}], "}"}]}], "]"}]}]}], "]"}]}], "]"}]}], 
+     "]"}]}], ",", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], "\[Rule]", 
+    RowBox[{
+     RowBox[{"Insertions", "[", "Generic", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"FeynmanGraph", "[", 
+        RowBox[{"1", ",", 
+         RowBox[{"Generic", "\[Equal]", "1"}]}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+             SequenceForm["Glu", 1],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+             SequenceForm["Glu", 2],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+         RowBox[{"S", "[", "1", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+             SequenceForm["Glu", 4],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+         RowBox[{"V", "[", 
+          RowBox[{"5", ",", 
+           RowBox[{"{", 
+            InterpretationBox[
+             RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+             SequenceForm["Glu", 5],
+             Editable->False], "}"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "6", "]"}], "\[Rule]", "V"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "7", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "8", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "9", "]"}], "\[Rule]", "F"}], ",", 
+        RowBox[{
+         RowBox[{"Field", "[", "10", "]"}], "\[Rule]", "F"}]}], "]"}], 
+      "\[Rule]", 
+      RowBox[{
+       RowBox[{"Insertions", "[", "Particles", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "1"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                 SequenceForm["Col", 6],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                SequenceForm["Col", 7],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                SequenceForm["Col", 8],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                 SequenceForm["Col", 8],
+                 Editable->False]}], "}"}]}], "]"}]}]}]}], "]"}], ",", 
+        RowBox[{
+         RowBox[{"FeynmanGraph", "[", 
+          RowBox[{"1", ",", 
+           RowBox[{"Particles", "\[Equal]", "2"}]}], "]"}], "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Field", "[", "1", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "1"}],
+               SequenceForm["Glu", 1],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "2", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "2"}],
+               SequenceForm["Glu", 2],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "3", "]"}], "\[Rule]", 
+           RowBox[{"S", "[", "1", "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "4", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "4"}],
+               SequenceForm["Glu", 4],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "5", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "5"}],
+               SequenceForm["Glu", 5],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "6", "]"}], "\[Rule]", 
+           RowBox[{"V", "[", 
+            RowBox[{"5", ",", 
+             RowBox[{"{", 
+              InterpretationBox[
+               RowBox[{"\<\"Glu\"\>", "\[InvisibleSpace]", "6"}],
+               SequenceForm["Glu", 6],
+               Editable->False], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "7", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "6"}],
+                SequenceForm["Col", 6],
+                Editable->False]}], "}"}]}], "]"}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "8", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "7"}],
+                 SequenceForm["Col", 7],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "9", "]"}], "\[Rule]", 
+           RowBox[{"-", 
+            RowBox[{"F", "[", 
+             RowBox[{"3", ",", 
+              RowBox[{"{", 
+               RowBox[{"3", ",", 
+                InterpretationBox[
+                 RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                 SequenceForm["Col", 8],
+                 Editable->False]}], "}"}]}], "]"}]}]}], ",", 
+          RowBox[{
+           RowBox[{"Field", "[", "10", "]"}], "\[Rule]", 
+           RowBox[{"F", "[", 
+            RowBox[{"3", ",", 
+             RowBox[{"{", 
+              RowBox[{"3", ",", 
+               InterpretationBox[
+                RowBox[{"\<\"Col\"\>", "\[InvisibleSpace]", "8"}],
+                SequenceForm["Col", 8],
+                Editable->False]}], "}"}]}], "]"}]}]}], "]"}]}], "]"}]}], 
+     "]"}]}]}], "]"}]], "Output",
+ CellChangeTimes->{3.781965493312196*^9},
+ CellLabel->
+  "Out[153]=",ExpressionUUID->"d353b59d-f382-4ddb-9275-565a55db2a87"]
+}, Open  ]],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7819654274586697`*^9, 
+  3.7819654286131*^9}},ExpressionUUID->"cfe42b8d-a133-43f0-8eba-4b6d5054fe94"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], ",", 
+    RowBox[{"FieldNumbers", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.7819656445265837`*^9, 3.781965655921959*^9}, {
+  3.781965722724743*^9, 3.781965761659587*^9}},
+ CellLabel->
+  "In[165]:=",ExpressionUUID->"c21a9507-1005-45da-ac08-6b71a512cdb3"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgei/gjfhfihjij.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781965761999455*^9},
+ CellLabel->
+  "During evaluation of \
+In[165]:=",ExpressionUUID->"cecf98cf-d5f5-42ce-becc-bed6c19908ad"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], 
+        LineBox[{{-1.2278178473934531`*^-11, 15.}, {13.499999999993406`, 
+         14.}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6508443998026943, 15.79670744562457}, \
+{0, -1}], 
+        LineBox[{{-5.4569682106375694`*^-12, 5.000000000003638}, {
+         8.999999999996362, 3.5}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["2",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.286281316503035, 3.5724878990182134}, \
+{0, 1}], LineBox[{{20.000000000010004`, 17.}, {6.5000000000081855`, 14.}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["3",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.850455074238777, 16.59527726407387}, \
+{0, -1}], 
+        LineBox[{{20.000000000003638`, 10.000000000003638`}, {9., 
+         3.500000000003638}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["4",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.795522087481718, 4.304625961738761}, \
+{-1, 1}], 
+        LineBox[{{19.99999999999818, 3.}, {13.499999999998181`, 
+         7.000000000003638}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["5",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.645247908267446, 5.395532581146116}, \
+{-1, -1}], 
+        LineBox[{{9.000000000001819, 3.499999999998181}, {6.500000000001819, 
+         6.999999999998181}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["6",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.35534487873106, 5.901482095405085}, \
+{1, 1}], LineBox[{{13.500000000001851`, 14.}, {6.500000000002592, 14.}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["7",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.3048}, {0, 1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["8",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.1952, 10.5}, {-1, 0}], 
+        LineBox[{{6.5, 14.000000000002307`}, {6.5, 6.999999999998607}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["9",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.8048, 10.5}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.}, {6.500000000002592, 7.}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["10",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.3048}, {0, 1}], 
+        {PointSize[0.04], PointBox[{13.5, 14.}], PointBox[{9., 3.5}], 
+         PointBox[{6.5, 14.}], PointBox[{13.5, 7.}], PointBox[{6.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["T1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["2",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {28.5, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {33., 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["3",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {37.5, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781965762047984*^9},
+ CellLabel->
+  "During evaluation of \
+In[165]:=",ExpressionUUID->"68173534-fb34-4083-ad18-a599cd34db03"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], ",", 
+    RowBox[{"FieldNumbers", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.7819656051671877`*^9, 3.781965617904376*^9}, 
+   3.781965658530271*^9},
+ CellLabel->
+  "In[158]:=",ExpressionUUID->"50946dc0-1256-43a8-8c70-6558c64d6588"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdieg/gjfifjhihj.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.781965607919168*^9, 3.7819656182266083`*^9}, 
+   3.781965658768818*^9},
+ CellLabel->
+  "During evaluation of \
+In[158]:=",ExpressionUUID->"42161dc8-5982-4e91-86e6-ac0e9e2855fb"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[{{0., 15.}, {6.499999999999545, 14.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.349705448550158, 15.441370831152057}, \
+{0, -1}], 
+        LineBox[{{-4.547473508864641*^-12, 5.000000000003638}, {
+         5.500000000004093, 4.000000000003638}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["2",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.517448930340022, 3.82576911687012}, \
+{0, 1}], LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+         13.500000000003638`, 7.500000000001819}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["3",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.296859253185694, 9.004142007228563}, \
+{-1, 1}], 
+        LineBox[{{19.99999999999818, 9.999999999996362}, {13.499999999998181`,
+          14.5}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["4",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.34565512474841, 11.694171869154133}, \
+{-1, -1}], 
+        LineBox[{{20.00000000000159, 2.999999999996362}, {5.500000000002046, 
+         3.999999999996362}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["5",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.660557280900008, 2.807880573050122}, \
+{0, 1}], LineBox[{{5.500000000003638, 3.999999999994543}, {6.5, 
+         7.499999999987267}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["6",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.354818868066929, 6.107137466266591}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["7",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.1952}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["8",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.8048, 11.}, {1, 0}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["9",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.8048, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["10",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.8048}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 7.5}], PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["T1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["2",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {28.5, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {33., 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["3",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {37.5, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{{3.781965607919168*^9, 3.7819656182266083`*^9}, 
+   3.7819656588171*^9},
+ CellLabel->
+  "During evaluation of \
+In[158]:=",ExpressionUUID->"38bd2f3f-a624-468e-8866-cc6d57f4bb3b"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], ",", 
+    RowBox[{"FieldNumbers", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.781965769254271*^9, 3.7819657782629232`*^9}},
+ CellLabel->
+  "In[166]:=",ExpressionUUID->"3d697f34-eb91-4e16-a6ab-b7f84711c144"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781965778662736*^9},
+ CellLabel->
+  "During evaluation of \
+In[166]:=",ExpressionUUID->"a030f618-cb08-491c-b05d-c8c1cad74681"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[{{0., 15.}, {6.499999999999545, 14.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.349705448550158, 15.441370831152057}, \
+{0, -1}], LineBox[{{-3.183231456205249*^-12, 5.}, {4.500000000003183, 4.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["2",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.1064390161026996, 4.062751144924295}, \
+{0, 1}], LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["3",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[{{20.00000000000182, 10.}, {13.5, 7.5}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["4",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.21667280310153, 8.141450711936024}, \
+{0, 1}], LineBox[{{19.999999999997726`, 3.}, {4.499999999997499, 
+         4.499999999996362}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["5",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {12.124778546681753, 3.06084498237811}, \
+{0, 1}], LineBox[{{4.499999999996362, 4.499999999996362}, {6.499999999996362, 
+         7.499999999998181}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["6",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.023134617360803, 6.116310255092798}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["7",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.1952}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["8",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.8048, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["9",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.1952, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["10",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.8048}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["T1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["2",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {28.5, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {33., 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["3",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {37.5, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781965778705538*^9},
+ CellLabel->
+  "During evaluation of \
+In[166]:=",ExpressionUUID->"31395d7a-43c7-4ce2-b56a-61625c621684"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Paint", "[", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Topology", "[", "1", "]"}], "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "1", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{"Field", "[", "1", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Incoming", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "2", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "2", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "3", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "3", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "4", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{"Field", "[", "4", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Outgoing", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "1", "]"}], "[", "5", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "5", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", "Internal", "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "7", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "6", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{"Field", "[", "7", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "6", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "8", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "8", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{"Field", "[", "9", "]"}]}], "]"}], ",", 
+      RowBox[{
+       RowBox[{"Propagator", "[", 
+        RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "9", "]"}], ",", 
+        RowBox[{
+         RowBox[{"Vertex", "[", "3", "]"}], "[", "10", "]"}], ",", 
+        RowBox[{"Field", "[", "10", "]"}]}], "]"}]}], "]"}], ",", 
+    RowBox[{"FieldNumbers", "\[Rule]", "True"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.7819656915222473`*^9, 3.7819656994550533`*^9}},
+ CellLabel->
+  "In[159]:=",ExpressionUUID->"7c67b339-5778-4a32-a704-015a1e3308a7"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgei/gjfhfjhiij.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781965699740129*^9},
+ CellLabel->
+  "During evaluation of \
+In[159]:=",ExpressionUUID->"c7d8bfdd-77c5-4b29-9fc2-c64844f0539a"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], 
+        LineBox[{{-8.86757334228605*^-12, 15.}, {6.499999999990678, 15.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1502945514498415, 15.941370831152057}, \
+{0, -1}], LineBox[{{-4.092726157978177*^-12, 5.}, {6.999999999994088, 4.}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["2",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.3161522368914977, 3.8178656582404837}, \
+{0, 1}], LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+         13.500000000003638`, 15.5}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["3",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], 
+        LineBox[{{19.99999999999818, 10.000000000003638`}, {6.999999999998181,
+          4.000000000003638}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["4",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.643746101711098, 4.9055074364049185}, \
+{-1, 1}], LineBox[{{20., 3.}, {13.5, 8.500000000003638}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["5",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.095473399595615, 5.29476492513206}, \
+{-1, -1}], LineBox[{{7., 4.}, {6.5, 8.5}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["6",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.062751144924295, 6.1064390161027}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["7",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.1952}, {0, -1}], 
+        LineBox[{{6.5, 15.500000000002307`}, {6.5, 8.499999999998607}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["8",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.8048, 12.}, {1, 0}], 
+        LineBox[{{13.5, 15.500000000002307`}, {13.5, 8.499999999998607}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["9",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.1952, 12.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 8.5}, {6.500000000002592, 8.5}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["10",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.8048}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{7., 4.}], 
+         PointBox[{13.5, 15.5}], PointBox[{13.5, 8.5}], PointBox[{6.5, 8.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["T1",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["2",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {28.5, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {33., 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["3",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {37.5, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781965699779936*^9},
+ CellLabel->
+  "During evaluation of \
+In[159]:=",ExpressionUUID->"e460b8c6-d4c3-42f7-84dc-6ccc1b2f9cd7"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Directory", "[", "]"}]], "Input",
+ CellChangeTimes->{{3.781962105340968*^9, 3.78196210721354*^9}},
+ CellLabel->"In[49]:=",ExpressionUUID->"f47f20a2-ef10-4e3c-90e4-68dac4335aae"],
+
+Cell[BoxData["\<\"/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/\
+feynamps\"\>"], "Output",
+ CellChangeTimes->{3.781962107547695*^9},
+ CellLabel->"Out[49]=",ExpressionUUID->"be9a0083-bb42-4379-92e1-991b92ddc766"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"boxtest", "=", " ", 
+     RowBox[{"CalcFeynAmp", "[", 
+      RowBox[{"CreateFeynAmp", "[", "BoxDiags", "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"boxtest", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"boxtest", "//.", 
+        RowBox[{"Abbr", "[", "]"}]}], "//.", 
+       RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+      RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<ggHgg_box_\>\"", "<>", "\"\<test_2diags.m\>\""}], ",", 
+      RowBox[{"boxtest", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7819620256863613`*^9, 3.781962089281493*^9}, 
+   3.7819621226850433`*^9, {3.7819621740347443`*^9, 3.781962174315898*^9}, {
+   3.781962214751799*^9, 3.781962218521104*^9}},
+ CellLabel->"In[58]:=",ExpressionUUID->"6800b168-3c3c-4c90-9751-b09d8f332f95"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.781962109547442*^9, 3.781962176512355*^9, 
+  3.781962220554935*^9},
+ CellLabel->
+  "During evaluation of \
+In[58]:=",ExpressionUUID->"cfe0b0a5-e000-4ef4-b060-d0a61b123e10"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781962109547442*^9, 3.781962176512355*^9, 
+  3.781962220558318*^9},
+ CellLabel->
+  "During evaluation of \
+In[58]:=",ExpressionUUID->"45f9d3be-6c00-4116-8d77-940effdd0f13"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781962109547442*^9, 3.781962176512355*^9, 
+  3.781962220614401*^9},
+ CellLabel->
+  "During evaluation of \
+In[58]:=",ExpressionUUID->"6546963f-6dc7-4a2c-b5f3-e90c85ac3c1f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781962109547442*^9, 3.781962176512355*^9, 
+  3.781962220619871*^9},
+ CellLabel->
+  "During evaluation of \
+In[58]:=",ExpressionUUID->"53babf5d-4bec-4739-8005-a06241339b0c"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/hj-scattering-amplitudes/feynamps/fc-amp-1.\
+frm\"\>"], "Print",
+ CellChangeTimes->{3.781962109547442*^9, 3.781962176512355*^9, 
+  3.781962220625367*^9},
+ CellLabel->
+  "During evaluation of \
+In[58]:=",ExpressionUUID->"5781fdf9-69b4-4d1b-884e-6a54e167299c"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.781962109547442*^9, 3.781962176512355*^9, 
+  3.781962220634179*^9},
+ CellLabel->
+  "During evaluation of \
+In[58]:=",ExpressionUUID->"eeffcb8f-f1dd-4e33-84ab-c32270a70114"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.781962109547442*^9, 3.781962176512355*^9, 
+  3.781962221761533*^9},
+ CellLabel->
+  "During evaluation of \
+In[58]:=",ExpressionUUID->"0afebf41-54a3-4a92-bf05-5338b6d5e3ca"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Paint", "[", "BoxDiags", "]"}]], "Input",
+ CellChangeTimes->{{3.781964075347535*^9, 3.781964090404752*^9}, {
+   3.781964216568996*^9, 3.781964219131156*^9}, 3.7819646750125093`*^9, {
+   3.781965186107505*^9, 3.781965193972068*^9}},
+ CellLabel->
+  "In[117]:=",ExpressionUUID->"1df007b4-96eb-461b-86ae-1c696de119e6"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.781965194301896*^9},
+ CellLabel->
+  "During evaluation of \
+In[117]:=",ExpressionUUID->"21579126-847a-4684-9b4b-80e2512f899b"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 10.4}, {6.1, 11.6}, {6.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 11.6}, {13.1, 10.4}, {13.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 11.6}, {6.1, 10.4}, {6.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 10.4}, {13.1, 11.6}, {13.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.781965194379871*^9},
+ CellLabel->
+  "During evaluation of \
+In[117]:=",ExpressionUUID->"838c2144-a502-4cac-b833-05dc947b99d9"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"FeynArtsGraphics", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{"\<\"g\"\>", ",", "\<\"g\"\>"}], "}"}], "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{"\<\"H\"\>", ",", "\<\"g\"\>", ",", "\<\"g\"\>"}], "}"}]}], 
+   "]"}], "[", 
+  TagBox[
+   RowBox[{"(", "\[NoBreak]", GridBox[{
+      {
+       InterpretationBox[
+        RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T1 P1 N1\"\>", 
+         "\[InvisibleSpace]", "\<\"]\"\>"}],
+        SequenceForm["[", "T1 P1 N1", "]"],
+        Editable->False], 
+       InterpretationBox[
+        RowBox[{"\<\"[\"\>", "\[InvisibleSpace]", "\<\"T1 P2 N2\"\>", 
+         "\[InvisibleSpace]", "\<\"]\"\>"}],
+        SequenceForm["[", "T1 P2 N2", "]"],
+        Editable->False], "Null"},
+      {"Null", "Null", "Null"},
+      {"Null", "Null", "Null"}
+     },
+     GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.7]}, 
+         Offset[0.27999999999999997`]}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}}], "\[NoBreak]", ")"}],
+   Function[BoxForm`e$, 
+    MatrixForm[BoxForm`e$]]], "]"}]], "Output",
+ CellChangeTimes->{{3.7819640806124353`*^9, 3.781964092421804*^9}, 
+   3.781964675422564*^9, {3.781965186731625*^9, 3.781965194388124*^9}},
+ CellLabel->
+  "Out[117]=",ExpressionUUID->"97b45850-20a4-4e49-9235-15111d28f326"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"boxtest", "[", 
+  RowBox[{"[", "1", "]"}], "]"}]], "Input",
+ CellChangeTimes->{{3.781962152127438*^9, 3.781962154065456*^9}, {
+  3.78196222527927*^9, 3.7819622261106443`*^9}, {3.781964829550255*^9, 
+  3.781964830155107*^9}},ExpressionUUID->"3dcd3bc7-a60f-497e-8b2f-\
+3b81c95c1fcf"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"Den", "[", 
+    RowBox[{
+     RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0"}], "]"}], " ", 
+   
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{
+     "Glu1", ",", "Glu4", ",", "Glu2", ",", "Glu5", ",", "0", ",", "0"}], 
+     "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{"MW", " ", "SW"}]], 
+       RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+        RowBox[{"C0i", "[", 
+         RowBox[{"cc1", ",", "0", ",", 
+          RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+          "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"2", " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"e", "[", "2", "]"}], ",", 
+             RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"ec", "[", "4", "]"}], ",", 
+             RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+          RowBox[{
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"e", "[", "2", "]"}], ",", 
+             RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+          RowBox[{"2", " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"e", "[", "2", "]"}], ",", 
+             RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"ec", "[", "5", "]"}], ",", 
+             RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd133", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd233", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd222", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd3", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd22", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "4"}], " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"5", " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "S"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"5", " ", "T24"}], "-", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"5", " ", "S"}], "+", 
+                  RowBox[{"5", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T24"}], "+", 
+                  RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"16", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd223", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd23", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"Pair", "[", 
+               RowBox[{
+                RowBox[{"e", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"8", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd00", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", 
+               RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd002", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd003", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd13", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", 
+                  RowBox[{"3", " ", "T14"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd111", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+            RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd001", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd113", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd11", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{"MH2", "-", "T"}], ")"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "8"}], " ", "MH2"}], "-", 
+                  RowBox[{"2", " ", "S"}], "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", 
+                  RowBox[{"2", " ", "T24"}], "+", 
+                  RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd123", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", 
+                  RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc0", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S"}], "+", "S34", "-", "T", "+", 
+               RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd112", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "7"}], " ", "MH2"}], "+", 
+               RowBox[{"4", " ", "S34"}], "+", 
+               RowBox[{"3", " ", "T"}], "+", "T14", "+", 
+               RowBox[{"2", " ", "T24"}], "+", 
+               RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd122", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", "S"}], "+", "S34", "-", "T", "-", 
+               RowBox[{"2", " ", "T14"}], "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd12", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+               RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"7", " ", "MH2"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"2", " ", "T"}], "-", "T14", "-", 
+                  RowBox[{"4", " ", "T24"}], "-", 
+                  RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"19", " ", "MH2"}], "-", 
+                  RowBox[{"17", " ", "S34"}], "-", 
+                  RowBox[{"6", " ", "T"}], "-", 
+                  RowBox[{"5", " ", "T14"}], "-", 
+                  RowBox[{"12", " ", "T24"}], "-", 
+                  RowBox[{"16", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd2", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"6", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "9"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S34"}], "+", 
+                  RowBox[{"4", " ", "T"}], "+", 
+                  RowBox[{"4", " ", "T14"}], "+", 
+                  RowBox[{"4", " ", "T24"}], "+", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "17"}], " ", "MH2"}], "+", 
+                  RowBox[{"8", " ", "S34"}], "+", 
+                  RowBox[{"7", " ", "T"}], "+", 
+                  RowBox[{"7", " ", "T14"}], "+", 
+                  RowBox[{"8", " ", "T24"}], "+", 
+                  RowBox[{"10", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH2", "2"], "+", 
+                RowBox[{"4", " ", "S", " ", "S34"}], "+", 
+                RowBox[{"3", " ", "S34", " ", "T"}], "+", 
+                RowBox[{"S34", " ", "T14"}], "+", 
+                RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", "S34"}], "+", "T", "-", "T14", "+", 
+                   RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                RowBox[{"2", " ", "T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd0", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "MH2"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T24"}], ")"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", "S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"2", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd1", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"3", " ", "S"}], "+", "S34", "+", "T", "+", "T24", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], 
+    ")"}]}], "+", 
+  RowBox[{
+   RowBox[{"Den", "[", 
+    RowBox[{
+     RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0"}], "]"}], " ", 
+   
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{
+     "Glu1", ",", "Glu5", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}], 
+     "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{"MW", " ", "SW"}]], 
+       RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+        RowBox[{"C0i", "[", 
+         RowBox[{"cc1", ",", "0", ",", 
+          RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+          "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"2", " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"e", "[", "2", "]"}], ",", 
+             RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"ec", "[", "4", "]"}], ",", 
+             RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+          RowBox[{
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"e", "[", "2", "]"}], ",", 
+             RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+          RowBox[{"2", " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"e", "[", "2", "]"}], ",", 
+             RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+           RowBox[{"Pair", "[", 
+            RowBox[{
+             RowBox[{"ec", "[", "5", "]"}], ",", 
+             RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd133", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd233", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd222", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd3", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd22", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "4"}], " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"5", " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "S"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"5", " ", "T24"}], "-", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"5", " ", "S"}], "+", 
+                  RowBox[{"5", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T24"}], "+", 
+                  RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"16", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd223", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd23", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"Pair", "[", 
+               RowBox[{
+                RowBox[{"e", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"8", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd00", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", 
+               RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd002", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd003", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd13", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", 
+                  RowBox[{"3", " ", "T14"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd111", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+            RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd001", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd113", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd11", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{"MH2", "-", "T"}], ")"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "8"}], " ", "MH2"}], "-", 
+                  RowBox[{"2", " ", "S"}], "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", 
+                  RowBox[{"2", " ", "T24"}], "+", 
+                  RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd123", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", 
+                  RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc0", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S"}], "+", "S34", "-", "T", "+", 
+               RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd112", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "7"}], " ", "MH2"}], "+", 
+               RowBox[{"4", " ", "S34"}], "+", 
+               RowBox[{"3", " ", "T"}], "+", "T14", "+", 
+               RowBox[{"2", " ", "T24"}], "+", 
+               RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd122", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", "S"}], "+", "S34", "-", "T", "-", 
+               RowBox[{"2", " ", "T14"}], "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd12", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+               RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"7", " ", "MH2"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"2", " ", "T"}], "-", "T14", "-", 
+                  RowBox[{"4", " ", "T24"}], "-", 
+                  RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"19", " ", "MH2"}], "-", 
+                  RowBox[{"17", " ", "S34"}], "-", 
+                  RowBox[{"6", " ", "T"}], "-", 
+                  RowBox[{"5", " ", "T14"}], "-", 
+                  RowBox[{"12", " ", "T24"}], "-", 
+                  RowBox[{"16", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd2", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"6", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "9"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S34"}], "+", 
+                  RowBox[{"4", " ", "T"}], "+", 
+                  RowBox[{"4", " ", "T14"}], "+", 
+                  RowBox[{"4", " ", "T24"}], "+", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "17"}], " ", "MH2"}], "+", 
+                  RowBox[{"8", " ", "S34"}], "+", 
+                  RowBox[{"7", " ", "T"}], "+", 
+                  RowBox[{"7", " ", "T14"}], "+", 
+                  RowBox[{"8", " ", "T24"}], "+", 
+                  RowBox[{"10", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH2", "2"], "+", 
+                RowBox[{"4", " ", "S", " ", "S34"}], "+", 
+                RowBox[{"3", " ", "S34", " ", "T"}], "+", 
+                RowBox[{"S34", " ", "T14"}], "+", 
+                RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", "S34"}], "+", "T", "-", "T14", "+", 
+                   RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                RowBox[{"2", " ", "T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd0", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "MH2"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T24"}], ")"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", "S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], ")"}
+              ]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"2", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd1", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"3", " ", "S"}], "+", "S34", "+", "T", "+", "T24", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], 
+    ")"}]}], "+", 
+  RowBox[{
+   RowBox[{"Den", "[", 
+    RowBox[{
+     RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0"}], "]"}], " ", 
+   
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{
+     "Glu1", ",", "Glu2", ",", "Glu5", ",", "Glu4", ",", "0", ",", "0"}], 
+     "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc1", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd133", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd233", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd222", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd3", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd22", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "4"}], " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"5", " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "S"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"5", " ", "T24"}], "-", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"5", " ", "S"}], "+", 
+                  RowBox[{"5", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T24"}], "+", 
+                  RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"16", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd223", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd23", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"Pair", "[", 
+               RowBox[{
+                RowBox[{"e", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"8", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd00", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", 
+               RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd002", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd003", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd13", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", 
+                  RowBox[{"3", " ", "T14"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd111", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+            RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd001", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd113", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd11", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{"MH2", "-", "T"}], ")"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "8"}], " ", "MH2"}], "-", 
+                  RowBox[{"2", " ", "S"}], "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", 
+                  RowBox[{"2", " ", "T24"}], "+", 
+                  RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd123", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", 
+                  RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc0", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S"}], "+", "S34", "-", "T", "+", 
+               RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd112", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "7"}], " ", "MH2"}], "+", 
+               RowBox[{"4", " ", "S34"}], "+", 
+               RowBox[{"3", " ", "T"}], "+", "T14", "+", 
+               RowBox[{"2", " ", "T24"}], "+", 
+               RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd122", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", "S"}], "+", "S34", "-", "T", "-", 
+               RowBox[{"2", " ", "T14"}], "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd12", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+               RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"7", " ", "MH2"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"2", " ", "T"}], "-", "T14", "-", 
+                  RowBox[{"4", " ", "T24"}], "-", 
+                  RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"19", " ", "MH2"}], "-", 
+                  RowBox[{"17", " ", "S34"}], "-", 
+                  RowBox[{"6", " ", "T"}], "-", 
+                  RowBox[{"5", " ", "T14"}], "-", 
+                  RowBox[{"12", " ", "T24"}], "-", 
+                  RowBox[{"16", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}
+             ], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd2", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"6", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "9"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S34"}], "+", 
+                  RowBox[{"4", " ", "T"}], "+", 
+                  RowBox[{"4", " ", "T14"}], "+", 
+                  RowBox[{"4", " ", "T24"}], "+", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "17"}], " ", "MH2"}], "+", 
+                  RowBox[{"8", " ", "S34"}], "+", 
+                  RowBox[{"7", " ", "T"}], "+", 
+                  RowBox[{"7", " ", "T14"}], "+", 
+                  RowBox[{"8", " ", "T24"}], "+", 
+                  RowBox[{"10", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH2", "2"], "+", 
+                RowBox[{"4", " ", "S", " ", "S34"}], "+", 
+                RowBox[{"3", " ", "S34", " ", "T"}], "+", 
+                RowBox[{"S34", " ", "T14"}], "+", 
+                RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", "S34"}], "+", "T", "-", "T14", "+", 
+                   RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                RowBox[{"2", " ", "T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd0", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "MH2"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T24"}], ")"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", "S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"2", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd1", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"3", " ", "S"}], "+", "S34", "+", "T", "+", "T24", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], 
+    ")"}]}], "+", 
+  RowBox[{
+   RowBox[{"Den", "[", 
+    RowBox[{
+     RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0"}], "]"}], " ", 
+   
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{
+     "Glu1", ",", "Glu4", ",", "Glu5", ",", "Glu2", ",", "0", ",", "0"}], 
+     "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc1", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd133", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd233", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd222", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd3", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", 
+            RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd22", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "4"}], " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"5", " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "S"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"5", " ", "T24"}], "-", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"5", " ", "S"}], "+", 
+                  RowBox[{"5", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T24"}], "+", 
+                  RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", "S34", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"16", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd223", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", 
+            RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd23", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"Pair", "[", 
+               RowBox[{
+                RowBox[{"e", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T", "-", "T14"}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{"8", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"e", "[", "1", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+            RowBox[{"Pair", "[", 
+             RowBox[{
+              RowBox[{"ec", "[", "4", "]"}], ",", 
+              RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd00", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", 
+               RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd002", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd003", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd13", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", 
+                  RowBox[{"3", " ", "T14"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd111", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+            RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+        ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd001", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"-", "2"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd113", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"e", "[", "1", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "-", 
+               RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd11", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{"MH2", "-", "T"}], ")"}]}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "8"}], " ", "MH2"}], "-", 
+                  RowBox[{"2", " ", "S"}], "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", 
+                  RowBox[{"2", " ", "T24"}], "+", 
+                  RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd123", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", 
+                  RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", 
+                  RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"C0i", "[", 
+        RowBox[{"cc0", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "T", ",", 
+         "MT2", ",", "MT2", ",", "MT2"}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}], 
+         "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "S"}], "+", "S34", "-", "T", "+", 
+               RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd112", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "7"}], " ", "MH2"}], "+", 
+               RowBox[{"4", " ", "S34"}], "+", 
+               RowBox[{"3", " ", "T"}], "+", "T14", "+", 
+               RowBox[{"2", " ", "T24"}], "+", 
+               RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", "S34", "+", "T", "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"8", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd122", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"Pair", "[", 
+        RowBox[{
+         RowBox[{"ec", "[", "4", "]"}], ",", 
+         RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", "S"}], "+", "S34", "-", "T", "-", 
+               RowBox[{"2", " ", "T14"}], "+", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"2", " ", "S"}], "-", "S34", "+", "T14", "-", 
+               RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"4", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd12", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+               RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"7", " ", "MH2"}], "-", 
+                  RowBox[{"7", " ", "S34"}], "-", 
+                  RowBox[{"2", " ", "T"}], "-", "T14", "-", 
+                  RowBox[{"4", " ", "T24"}], "-", 
+                  RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"19", " ", "MH2"}], "-", 
+                  RowBox[{"17", " ", "S34"}], "-", 
+                  RowBox[{"6", " ", "T"}], "-", 
+                  RowBox[{"5", " ", "T14"}], "-", 
+                  RowBox[{"12", " ", "T24"}], "-", 
+                  RowBox[{"16", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", 
+               RowBox[{"3", " ", "S34"}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+            RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "5", "]"}], ",", 
+            RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+         RowBox[{"8", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"ec", "[", "4", "]"}], ",", 
+            RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], ")"}]}
+             ], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"3", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd2", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"2", " ", 
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"6", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "9"}], " ", "MH2"}], "+", 
+                  RowBox[{"4", " ", "S34"}], "+", 
+                  RowBox[{"4", " ", "T"}], "+", 
+                  RowBox[{"4", " ", "T14"}], "+", 
+                  RowBox[{"4", " ", "T24"}], "+", 
+                  RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "17"}], " ", "MH2"}], "+", 
+                  RowBox[{"8", " ", "S34"}], "+", 
+                  RowBox[{"7", " ", "T"}], "+", 
+                  RowBox[{"7", " ", "T14"}], "+", 
+                  RowBox[{"8", " ", "T24"}], "+", 
+                  RowBox[{"10", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "-", 
+         RowBox[{"4", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"S34", "+", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", " ", "S34", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"3", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", "MH2"}], "+", "T", "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH2", "2"], "+", 
+                RowBox[{"4", " ", "S", " ", "S34"}], "+", 
+                RowBox[{"3", " ", "S34", " ", "T"}], "+", 
+                RowBox[{"S34", " ", "T14"}], "+", 
+                RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", "S34"}], "+", "T", "-", "T14", "+", 
+                   RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                RowBox[{"2", " ", "T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", "S34", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd0", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "MH2"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T24"}], ")"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"2", " ", "S", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"T14", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", "MH2"}], "+", 
+                  RowBox[{"2", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"2", " ", "Alfas2", " ", "EL", " ", "MT2", " ", 
+       RowBox[{"D0i", "[", 
+        RowBox[{"dd1", ",", "MH2", ",", "0", ",", 
+         RowBox[{"MH2", "-", "S", "-", "T24", "-", "U"}], ",", "0", ",", 
+         "S34", ",", "T", ",", "MT2", ",", "MT2", ",", "MT2", ",", "MT2"}], 
+        "]"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "2", "]"}], ",", 
+            RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "2"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "U"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", 
+                  RowBox[{"3", " ", "S34"}], "+", 
+                  RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "-", 
+                  RowBox[{"3", " ", "S"}], "+", "S34", "+", "T", "+", "T24", 
+                  "+", 
+                  RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+           ")"}]}], "+", 
+         RowBox[{
+          RowBox[{"Pair", "[", 
+           RowBox[{
+            RowBox[{"e", "[", "1", "]"}], ",", 
+            RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"S", " ", "S34"}], "+", 
+                RowBox[{"S34", " ", "T"}], "+", 
+                RowBox[{"MH2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{"S", "-", "S34", "+", "T14", "-", "T24"}], ")"}]}], 
+                "+", 
+                RowBox[{"T", " ", "T24"}], "-", 
+                RowBox[{"T14", " ", "U"}]}], ")"}]}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"T14", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+              ")"}]}]}], ")"}]}], "-", 
+         RowBox[{"2", " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "4", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{"MH2", "+", "S34", "-", "T14"}], ")"}]}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "-", "T"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "2", "]"}], ",", 
+               RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"e", "[", "1", "]"}], ",", 
+               RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"MH2", "+", "S34"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "3"}], " ", "MH2"}], "+", 
+                  RowBox[{"3", " ", "T"}], "+", "T14"}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+             RowBox[{"Pair", "[", 
+              RowBox[{
+               RowBox[{"ec", "[", "5", "]"}], ",", 
+               RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}]}], 
+    ")"}]}]}]], "Output",
+ CellChangeTimes->{
+  3.781962119478126*^9, 3.78196215438957*^9, 3.781962193462893*^9, {
+   3.781962229727997*^9, 3.7819622310616913`*^9}},
+ CellLabel->"Out[62]=",ExpressionUUID->"f656a8cd-2599-4067-a9c2-ba0e03ca1d96"]
+}, Closed]],
+
+Cell[BoxData[" "], "Input",
+ CellChangeTimes->{{3.781964547570963*^9, 
+  3.781964576157257*^9}},ExpressionUUID->"f59e812d-d271-47da-888e-\
+9508b5fad2f0"]
+},
+WindowSize->{908, 679},
+WindowMargins->{{Automatic, -1186}, {-62, Automatic}},
+FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 621, 13, 84, "Input",ExpressionUUID->"5ed94a23-f6b7-4858-b120-72e0fcc40a50"],
+Cell[CellGroupData[{
+Cell[1204, 37, 189, 2, 30, "Input",ExpressionUUID->"bd1b37f2-ddfe-4e0c-b411-f633c74d2ba7"],
+Cell[1396, 41, 199, 2, 34, "Output",ExpressionUUID->"ae71b52c-3d7a-4512-8cd1-01fb837dbd16"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[1632, 48, 827, 12, 73, "Input",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
+Cell[CellGroupData[{
+Cell[2484, 64, 301, 6, 24, "Print",ExpressionUUID->"9fa33d93-e38f-4489-b1ec-1703a9cbbfb6"],
+Cell[2788, 72, 326, 6, 24, "Print",ExpressionUUID->"93de2919-7440-474a-8674-58dc028a05a6"],
+Cell[3117, 80, 315, 6, 24, "Print",ExpressionUUID->"388d581e-42b6-4aef-b367-11545d731106"]
+}, Open  ]],
+Cell[3447, 89, 821, 16, 42, "Message",ExpressionUUID->"1445b7ec-528d-4f9d-aa62-1011ec94ecfa"],
+Cell[CellGroupData[{
+Cell[4293, 109, 301, 6, 24, "Print",ExpressionUUID->"641a4548-97f7-4045-9625-7c73d34e155b"],
+Cell[4597, 117, 328, 6, 24, "Print",ExpressionUUID->"7f02f920-aaea-4477-beb6-6a1a8f2d4502"],
+Cell[4928, 125, 346, 6, 24, "Print",ExpressionUUID->"9cdd89f4-5903-407a-af1d-be06d2be462c"]
+}, Open  ]]
+}, Open  ]],
+Cell[5301, 135, 2377, 60, 220, "Input",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
+Cell[CellGroupData[{
+Cell[7703, 199, 6469, 173, 766, "Input",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
+Cell[CellGroupData[{
+Cell[14197, 376, 512, 9, 24, "Print",ExpressionUUID->"82547ed8-3aab-4649-84aa-19fe95d82789"],
+Cell[14712, 387, 503, 9, 24, "Print",ExpressionUUID->"9718c596-0b70-43c5-84df-551ad849ca2b"],
+Cell[15218, 398, 981, 21, 44, "Print",ExpressionUUID->"25782e3c-1f39-4dae-a858-296dc485d761"],
+Cell[16202, 421, 526, 9, 24, "Print",ExpressionUUID->"139243b0-67d6-44a0-a701-8b8cb91806e8"],
+Cell[16731, 432, 746, 15, 24, "Print",ExpressionUUID->"125e570f-24b6-4941-b434-3f26cd8aad5a"],
+Cell[17480, 449, 503, 9, 24, "Print",ExpressionUUID->"bf3dda0f-a0d9-41e6-85c8-99886d9643e0"],
+Cell[17986, 460, 977, 21, 44, "Print",ExpressionUUID->"138878c5-c418-49c9-8fd8-e499ad7e718c"],
+Cell[18966, 483, 975, 21, 44, "Print",ExpressionUUID->"b8ffb195-79c0-4ae8-aa36-86caca788c4d"],
+Cell[19944, 506, 505, 9, 24, "Print",ExpressionUUID->"fb4d152a-c582-4509-80be-dc798d279e8f"],
+Cell[20452, 517, 970, 23, 24, "Print",ExpressionUUID->"42d962e4-9a93-40a3-844a-c32643a4b3a0"],
+Cell[21425, 542, 503, 9, 24, "Print",ExpressionUUID->"db5d7701-1ea6-4dcc-bdba-3a52bbd45062"],
+Cell[21931, 553, 817, 16, 24, "Print",ExpressionUUID->"13d5f218-a22d-4e30-aa1b-f8c010bac126"],
+Cell[22751, 571, 525, 9, 24, "Print",ExpressionUUID->"fdb0dbef-bfe7-49aa-910a-9c7e56d7edef"],
+Cell[23279, 582, 670, 14, 24, "Print",ExpressionUUID->"0078fab2-b558-4fcc-99d7-7b080d1f5647"],
+Cell[23952, 598, 702, 14, 24, "Print",ExpressionUUID->"e9557e61-d15b-44cf-b087-8ab085e31974"],
+Cell[24657, 614, 700, 14, 24, "Print",ExpressionUUID->"7023db93-922f-42ab-af03-4e08c41ec007"],
+Cell[25360, 630, 742, 15, 24, "Print",ExpressionUUID->"a7049a1d-57f1-42d6-8c9e-001d5f274f33"],
+Cell[26105, 647, 503, 9, 24, "Print",ExpressionUUID->"fd004af9-4279-4b73-bcf8-5438bef4715c"],
+Cell[26611, 658, 763, 16, 24, "Print",ExpressionUUID->"65f9f4bd-8ee1-4e3b-bcaf-15af20238da0"],
+Cell[27377, 676, 503, 9, 24, "Print",ExpressionUUID->"85e90d43-c0ab-4078-8dd8-13eda9a7f53c"],
+Cell[27883, 687, 700, 14, 24, "Print",ExpressionUUID->"73888312-332d-4d2c-875c-032441f970ce"],
+Cell[28586, 703, 749, 15, 24, "Print",ExpressionUUID->"e4e62815-bdd9-480c-94aa-946f312fdb06"],
+Cell[29338, 720, 749, 15, 24, "Print",ExpressionUUID->"d785ba0c-4870-4856-adaf-f20a7ba6df8f"],
+Cell[30090, 737, 749, 15, 24, "Print",ExpressionUUID->"929b70a1-f10c-4163-8ba9-39d3469f5f12"],
+Cell[30842, 754, 749, 15, 24, "Print",ExpressionUUID->"6a34f3da-7d15-4388-9222-6d1e92009ce8"],
+Cell[31594, 771, 751, 15, 24, "Print",ExpressionUUID->"12f1863c-5a90-4119-b2b0-e3568f540290"],
+Cell[32348, 788, 749, 15, 24, "Print",ExpressionUUID->"ad0a359d-3d1f-4438-82b6-442faba233ef"],
+Cell[33100, 805, 749, 15, 24, "Print",ExpressionUUID->"ac3276e3-a34d-42a8-973e-e17fa6e5b774"],
+Cell[33852, 822, 749, 15, 24, "Print",ExpressionUUID->"5038ff0e-21ed-4e7a-b40d-db23acbdd981"],
+Cell[34604, 839, 749, 15, 24, "Print",ExpressionUUID->"19487acc-3280-4516-a3ba-427fb17285e0"],
+Cell[35356, 856, 751, 15, 24, "Print",ExpressionUUID->"a43f51c5-00b3-422e-a53d-f707467cb9bc"],
+Cell[36110, 873, 751, 15, 24, "Print",ExpressionUUID->"0e78c524-b669-4de7-84d9-5ede6a4af18b"],
+Cell[36864, 890, 751, 15, 24, "Print",ExpressionUUID->"fc31cfab-40da-4723-95cc-2704f8aa5312"],
+Cell[37618, 907, 753, 15, 24, "Print",ExpressionUUID->"7d67bee6-9d56-47f4-9a5a-96ce64a8e7ac"],
+Cell[38374, 924, 750, 15, 24, "Print",ExpressionUUID->"c4699cf8-85fa-4a6e-96f3-398ab2c82c1b"],
+Cell[39127, 941, 751, 15, 24, "Print",ExpressionUUID->"47fd9f87-196f-4b05-a5d7-bb504aec8669"],
+Cell[39881, 958, 751, 15, 24, "Print",ExpressionUUID->"a298ca84-b06a-4a0a-a32c-32a93c49365f"],
+Cell[40635, 975, 751, 15, 24, "Print",ExpressionUUID->"ed2d69f5-cf25-4aff-9632-11596189f5b1"],
+Cell[41389, 992, 751, 15, 24, "Print",ExpressionUUID->"27738425-8073-4305-9d05-1dd9caca8199"],
+Cell[42143, 1009, 751, 15, 24, "Print",ExpressionUUID->"d31c76fa-b043-4792-a250-97d1c072cc32"],
+Cell[42897, 1026, 751, 15, 24, "Print",ExpressionUUID->"deac3a4c-f707-4865-8da7-67168216cb3b"],
+Cell[43651, 1043, 751, 15, 24, "Print",ExpressionUUID->"28d41f59-0fa3-49e5-81e2-549ea8b3d6ba"],
+Cell[44405, 1060, 751, 15, 24, "Print",ExpressionUUID->"9d5af0c0-5d82-4cb7-9689-00e3ec303305"],
+Cell[45159, 1077, 751, 15, 24, "Print",ExpressionUUID->"ec101407-aa2d-4b11-bec3-6f0cc42beeba"],
+Cell[45913, 1094, 751, 15, 24, "Print",ExpressionUUID->"79c60b4a-a13a-4dc4-9712-11d6d7d2a9e0"],
+Cell[46667, 1111, 751, 15, 24, "Print",ExpressionUUID->"4c125a7f-d3a2-49d4-909e-e2d35932b892"],
+Cell[47421, 1128, 750, 15, 24, "Print",ExpressionUUID->"5a1ca0a1-2f18-4e52-8d11-23753787d736"],
+Cell[48174, 1145, 751, 15, 24, "Print",ExpressionUUID->"3cfa2bb2-392a-4b21-a179-e23869ab3963"],
+Cell[48928, 1162, 751, 15, 24, "Print",ExpressionUUID->"39935f75-7a91-409b-8337-bcbb96f0c9bb"],
+Cell[49682, 1179, 751, 15, 24, "Print",ExpressionUUID->"015efd48-2aa6-4807-a885-ecebc9f68342"],
+Cell[50436, 1196, 751, 15, 24, "Print",ExpressionUUID->"65747925-71d8-4522-be27-76a874e8ac77"],
+Cell[51190, 1213, 751, 15, 24, "Print",ExpressionUUID->"11ca6927-fabe-4476-838e-8be297d94526"],
+Cell[51944, 1230, 751, 15, 24, "Print",ExpressionUUID->"34266ebe-62d7-4d74-9893-dde175ad04c0"],
+Cell[52698, 1247, 751, 15, 24, "Print",ExpressionUUID->"8d28166a-d8c3-475b-b2c7-0fab0c2d6d18"],
+Cell[53452, 1264, 751, 15, 24, "Print",ExpressionUUID->"3d881013-db20-4c7d-8c59-484924367271"],
+Cell[54206, 1281, 751, 15, 24, "Print",ExpressionUUID->"6acd0975-fa7f-451f-a066-a4f61d6ca08b"],
+Cell[54960, 1298, 751, 15, 24, "Print",ExpressionUUID->"789643cd-02c5-4b13-acf5-6ea60332f1e9"],
+Cell[55714, 1315, 751, 15, 24, "Print",ExpressionUUID->"207b688a-67bc-4129-8710-8f72628e7ca2"],
+Cell[56468, 1332, 753, 15, 24, "Print",ExpressionUUID->"ccd247f9-8cfb-41c2-b0ec-6aff0346eeb8"],
+Cell[57224, 1349, 751, 15, 24, "Print",ExpressionUUID->"cdb61964-c838-49e8-b26d-8f5251bdf424"],
+Cell[57978, 1366, 753, 15, 24, "Print",ExpressionUUID->"cbf5a5cb-76ee-4956-9097-c430bb72d084"],
+Cell[58734, 1383, 751, 15, 24, "Print",ExpressionUUID->"6ff89f0c-2fb5-41f7-ae2b-97497b7975ee"],
+Cell[59488, 1400, 751, 15, 24, "Print",ExpressionUUID->"c74f441e-6d17-4be9-bbc7-0cb0fe8d923d"],
+Cell[60242, 1417, 753, 15, 24, "Print",ExpressionUUID->"dbfa2f7b-eb2b-43c0-86ed-e6a1c93e5a30"],
+Cell[60998, 1434, 751, 15, 24, "Print",ExpressionUUID->"259dbff3-ecc0-43c6-941d-0aa2fdd09cd2"],
+Cell[61752, 1451, 753, 15, 24, "Print",ExpressionUUID->"633d32db-e386-4f52-a5a8-6cac02c6ced2"],
+Cell[62508, 1468, 751, 15, 24, "Print",ExpressionUUID->"b3f2c91e-dbb6-4523-9af6-f15713012540"],
+Cell[63262, 1485, 751, 15, 24, "Print",ExpressionUUID->"1a159f5a-9781-4795-af3b-c420a769b788"],
+Cell[64016, 1502, 749, 15, 24, "Print",ExpressionUUID->"b1e6480b-d55e-4ab3-8fd8-65f733c04722"],
+Cell[64768, 1519, 751, 15, 24, "Print",ExpressionUUID->"810e4283-5ccf-408b-9328-41992ed4b95f"],
+Cell[65522, 1536, 751, 15, 24, "Print",ExpressionUUID->"a76a5958-408c-456f-b77b-311eef097efc"],
+Cell[66276, 1553, 751, 15, 24, "Print",ExpressionUUID->"4099d85c-527f-4c43-8106-512c554e33e7"],
+Cell[67030, 1570, 751, 15, 24, "Print",ExpressionUUID->"de194a67-ebf7-4089-9357-047a8e541f16"],
+Cell[67784, 1587, 750, 15, 24, "Print",ExpressionUUID->"a4c2720c-b735-4540-8c2b-292c27e31260"],
+Cell[68537, 1604, 751, 15, 24, "Print",ExpressionUUID->"f6402dfc-64fc-40e2-9e06-e0a7f225db12"],
+Cell[69291, 1621, 753, 15, 24, "Print",ExpressionUUID->"6f9fc23b-6eb0-4238-bf25-e833e202b59c"],
+Cell[70047, 1638, 751, 15, 24, "Print",ExpressionUUID->"e8237b60-199b-49b9-ae8d-cd396fafc0d0"],
+Cell[70801, 1655, 751, 15, 24, "Print",ExpressionUUID->"97938558-aa6e-4856-94a1-70c414180e65"],
+Cell[71555, 1672, 751, 15, 24, "Print",ExpressionUUID->"930605c0-d033-46ce-af8b-08efc3646c48"],
+Cell[72309, 1689, 753, 15, 24, "Print",ExpressionUUID->"0fbcd398-ed4d-4054-8847-2f7a3349f165"],
+Cell[73065, 1706, 753, 15, 24, "Print",ExpressionUUID->"21f75713-6843-4f05-80dc-c3cc8769711a"],
+Cell[73821, 1723, 751, 15, 24, "Print",ExpressionUUID->"dd4e2340-26f9-4996-90c0-e4a101153935"],
+Cell[74575, 1740, 751, 15, 24, "Print",ExpressionUUID->"1c16be79-42ff-44da-888d-230c7ad45e2f"],
+Cell[75329, 1757, 753, 15, 24, "Print",ExpressionUUID->"a376a200-7310-4aee-ae86-5ab77687f567"],
+Cell[76085, 1774, 753, 15, 24, "Print",ExpressionUUID->"2264d416-0e03-4710-9779-5ab95fdae5cc"],
+Cell[76841, 1791, 751, 15, 24, "Print",ExpressionUUID->"87d7341b-56f7-4b11-a782-a2c7e0a34b04"],
+Cell[77595, 1808, 751, 15, 24, "Print",ExpressionUUID->"69f37c98-f15e-4ba7-9d2d-bb3158a76050"],
+Cell[78349, 1825, 753, 15, 24, "Print",ExpressionUUID->"9bb196b4-2a5b-47da-87e7-4878c1d8006f"],
+Cell[79105, 1842, 751, 15, 24, "Print",ExpressionUUID->"d8e9ce5b-4f8a-41a9-81b9-70fea19ab22d"],
+Cell[79859, 1859, 751, 15, 24, "Print",ExpressionUUID->"847e4290-84b5-40b8-ab8f-1e8d71cc4d3d"],
+Cell[80613, 1876, 753, 15, 24, "Print",ExpressionUUID->"adacb977-4f71-49a2-ab6b-44b5e13eebdf"],
+Cell[81369, 1893, 753, 15, 24, "Print",ExpressionUUID->"46f1f536-97a2-48b2-8056-dcee76e3544b"],
+Cell[82125, 1910, 751, 15, 24, "Print",ExpressionUUID->"4800836b-b641-41f8-a542-18ce02c1b37d"],
+Cell[82879, 1927, 751, 15, 24, "Print",ExpressionUUID->"3d8e4ff6-1bbc-49f6-a1c8-26381cfb42d5"],
+Cell[83633, 1944, 750, 15, 24, "Print",ExpressionUUID->"72f3db9e-81d4-4f10-8175-2bc92e724e94"],
+Cell[84386, 1961, 751, 15, 24, "Print",ExpressionUUID->"88f53e9d-8f9d-4dd8-93ba-6e2fa9d324cc"],
+Cell[85140, 1978, 751, 15, 24, "Print",ExpressionUUID->"e93fe0cf-e57e-4c1c-b0ca-950b0d292e78"],
+Cell[85894, 1995, 751, 15, 24, "Print",ExpressionUUID->"d765a3a8-bd79-47c8-b436-eaf7366b974d"],
+Cell[86648, 2012, 753, 15, 24, "Print",ExpressionUUID->"fed0e7d7-fb74-4f20-9cc1-6f6b49a02e5d"],
+Cell[87404, 2029, 751, 15, 24, "Print",ExpressionUUID->"10a47594-8e2c-46f8-a78b-5950ffa59a66"],
+Cell[88158, 2046, 751, 15, 24, "Print",ExpressionUUID->"bc0c7f0a-4ab1-43ce-982c-8c0892732691"],
+Cell[88912, 2063, 751, 15, 24, "Print",ExpressionUUID->"5fda2afc-e184-4598-8f27-83c6d12321ef"],
+Cell[89666, 2080, 751, 15, 24, "Print",ExpressionUUID->"3899b430-0c47-40a6-a912-40a08c1b3014"],
+Cell[90420, 2097, 753, 15, 24, "Print",ExpressionUUID->"3fa84a26-afc6-4fab-9add-bf9dcb91a33a"],
+Cell[91176, 2114, 751, 15, 24, "Print",ExpressionUUID->"35c8abf7-6a08-472d-94ad-3a4e660e0851"],
+Cell[91930, 2131, 751, 15, 24, "Print",ExpressionUUID->"5e7f742e-99ba-4f0f-b826-0e164d6d0eec"],
+Cell[92684, 2148, 753, 15, 24, "Print",ExpressionUUID->"6a6e5ca5-8720-4eaf-81cf-e7db8f9d7870"],
+Cell[93440, 2165, 753, 15, 24, "Print",ExpressionUUID->"21439967-b63c-4eb4-aba2-5806fab9d220"],
+Cell[94196, 2182, 751, 15, 24, "Print",ExpressionUUID->"79ab941c-0a80-496a-8739-fc7061fe625f"],
+Cell[94950, 2199, 753, 15, 24, "Print",ExpressionUUID->"eadc1497-69a8-4852-be88-a716beef8bd4"],
+Cell[95706, 2216, 751, 15, 24, "Print",ExpressionUUID->"e238bcb2-8f4f-4d88-9c40-994c4647d1a6"],
+Cell[96460, 2233, 751, 15, 24, "Print",ExpressionUUID->"a1665974-10bb-4c9c-a740-93e05b36c075"],
+Cell[97214, 2250, 751, 15, 24, "Print",ExpressionUUID->"30bd9cb4-08ea-4b56-8efd-13be6c0b9e6c"],
+Cell[97968, 2267, 753, 15, 24, "Print",ExpressionUUID->"3be72b01-9637-4a1a-a3a1-ada1a2daa315"],
+Cell[98724, 2284, 751, 15, 24, "Print",ExpressionUUID->"bd0d0eae-6140-477c-a3f5-b3fbdad0441b"],
+Cell[99478, 2301, 753, 15, 24, "Print",ExpressionUUID->"26843cc6-d6f7-4f18-b764-926096ef85c1"],
+Cell[100234, 2318, 751, 15, 24, "Print",ExpressionUUID->"a53d7dc8-d1de-4162-a594-f45b6f553920"],
+Cell[100988, 2335, 751, 15, 24, "Print",ExpressionUUID->"dbac1e75-b1c5-4760-80de-ddb797f2b770"],
+Cell[101742, 2352, 753, 15, 24, "Print",ExpressionUUID->"dc615222-4dd3-4d12-8a1d-d45646253326"],
+Cell[102498, 2369, 751, 15, 24, "Print",ExpressionUUID->"73df4581-6e4d-49c9-8d5d-68a68dd6d4a3"],
+Cell[103252, 2386, 753, 15, 24, "Print",ExpressionUUID->"2251b02c-2402-49f7-bb02-7e68af6b447f"],
+Cell[104008, 2403, 755, 15, 24, "Print",ExpressionUUID->"b171551a-c92b-4368-a7e9-6726c61f89d2"],
+Cell[104766, 2420, 755, 15, 24, "Print",ExpressionUUID->"121e8834-ba54-4322-a701-f7f9c43be667"],
+Cell[105524, 2437, 753, 15, 24, "Print",ExpressionUUID->"2c665b01-bba6-4d4e-b975-41989b57b1c4"],
+Cell[106280, 2454, 753, 15, 24, "Print",ExpressionUUID->"f68dbeb3-be73-4898-8060-0cd3384e3d16"],
+Cell[107036, 2471, 755, 15, 24, "Print",ExpressionUUID->"4f613f74-ab48-455a-b515-121e5bbb052f"],
+Cell[107794, 2488, 753, 15, 24, "Print",ExpressionUUID->"227bb972-fe1f-4056-8655-5ab0f394cf47"],
+Cell[108550, 2505, 753, 15, 24, "Print",ExpressionUUID->"8701812c-2ea9-494b-8775-f43c04f12355"],
+Cell[109306, 2522, 753, 15, 24, "Print",ExpressionUUID->"7a827a44-f312-4418-8c64-5ec29983c26b"],
+Cell[110062, 2539, 755, 15, 24, "Print",ExpressionUUID->"29a7dee4-c791-41fb-97ae-bd602dd0f441"],
+Cell[110820, 2556, 755, 15, 24, "Print",ExpressionUUID->"0e3497ed-6fdc-4367-828b-4ff1312b1923"],
+Cell[111578, 2573, 753, 15, 24, "Print",ExpressionUUID->"4ce26d4e-9bb7-46bb-80c7-59bcbdcae3c6"],
+Cell[112334, 2590, 753, 15, 24, "Print",ExpressionUUID->"7c36150d-0168-4bc1-93e6-df63615befcc"],
+Cell[113090, 2607, 753, 15, 24, "Print",ExpressionUUID->"5e9b1d4f-5cd7-4ef5-ae4c-33c351106874"],
+Cell[113846, 2624, 753, 15, 24, "Print",ExpressionUUID->"f027456b-e8e8-4b5d-bd75-6bab59c43531"],
+Cell[114602, 2641, 755, 15, 24, "Print",ExpressionUUID->"2138762a-cf6c-48ab-a00f-02a96866170f"],
+Cell[115360, 2658, 752, 15, 24, "Print",ExpressionUUID->"d2366984-bf39-4ad7-b421-4abf4acec94a"],
+Cell[116115, 2675, 753, 15, 24, "Print",ExpressionUUID->"405e490b-02f8-469e-b702-3b3b4a86975b"],
+Cell[116871, 2692, 752, 15, 24, "Print",ExpressionUUID->"0ec73400-cdb6-4131-bab0-55007057c9ec"],
+Cell[117626, 2709, 755, 15, 24, "Print",ExpressionUUID->"b45e0caf-2c85-440e-8b77-58c849232283"],
+Cell[118384, 2726, 753, 15, 24, "Print",ExpressionUUID->"f3196f05-dd71-4394-a9c9-37a2cbc9e82f"],
+Cell[119140, 2743, 755, 15, 24, "Print",ExpressionUUID->"f6be694c-f797-49e6-b252-93e7671f096d"],
+Cell[119898, 2760, 753, 15, 24, "Print",ExpressionUUID->"bc44026b-d242-428c-b8e9-13593e486950"],
+Cell[120654, 2777, 753, 15, 24, "Print",ExpressionUUID->"30dd78cc-2bbb-4ab3-bd36-9d50dabca8f5"],
+Cell[121410, 2794, 753, 15, 24, "Print",ExpressionUUID->"edb182fb-c7b5-4466-b29a-8a8c9973679c"],
+Cell[122166, 2811, 753, 15, 24, "Print",ExpressionUUID->"3ff1233c-f233-45fc-938e-f482d1a49f17"],
+Cell[122922, 2828, 753, 15, 24, "Print",ExpressionUUID->"6580ad1c-9d83-4695-97c0-a48d4a8fd159"],
+Cell[123678, 2845, 753, 15, 24, "Print",ExpressionUUID->"7948a58a-031d-4916-bbe0-825daf5c04fa"],
+Cell[124434, 2862, 753, 15, 24, "Print",ExpressionUUID->"81ba9ba9-592e-44d7-af39-49abb75a47dc"],
+Cell[125190, 2879, 753, 15, 24, "Print",ExpressionUUID->"c489df7c-bd4e-488e-9f30-2abedded2ea2"],
+Cell[125946, 2896, 752, 15, 24, "Print",ExpressionUUID->"331e388c-c291-4900-b2c0-90ff83cd483a"],
+Cell[126701, 2913, 755, 15, 24, "Print",ExpressionUUID->"96ea70e3-4a93-4aed-a836-c8cca1b28f3b"],
+Cell[127459, 2930, 753, 15, 24, "Print",ExpressionUUID->"fff23d30-0447-4838-a646-241a573b3ebe"],
+Cell[128215, 2947, 753, 15, 24, "Print",ExpressionUUID->"c0b66eed-9e73-441c-8914-562ddb84ab36"],
+Cell[128971, 2964, 753, 15, 24, "Print",ExpressionUUID->"4e8816cf-d4d7-4d91-80de-7ca13dbb27ca"],
+Cell[129727, 2981, 755, 15, 24, "Print",ExpressionUUID->"0126cb4a-fffb-4c37-9d77-618f89a765eb"],
+Cell[130485, 2998, 753, 15, 24, "Print",ExpressionUUID->"2f3f0137-49b0-4a99-a921-b02046cc4d15"],
+Cell[131241, 3015, 751, 15, 24, "Print",ExpressionUUID->"2fe2a0d7-67be-41cf-bf16-d05446a0d7ef"],
+Cell[131995, 3032, 753, 15, 24, "Print",ExpressionUUID->"4f9d789d-7a42-4f41-bc3f-87a62b0614c9"],
+Cell[132751, 3049, 753, 15, 24, "Print",ExpressionUUID->"9a19c8e3-a662-42b6-9519-c1896bafd92f"],
+Cell[133507, 3066, 753, 15, 24, "Print",ExpressionUUID->"105e8c92-2644-4498-a954-ed143cdc7ac9"],
+Cell[134263, 3083, 755, 15, 24, "Print",ExpressionUUID->"b52ba640-ed49-4b75-bafc-110c4b741e3b"],
+Cell[135021, 3100, 753, 15, 24, "Print",ExpressionUUID->"eb8fd40d-27a2-4102-b721-662054b0d834"],
+Cell[135777, 3117, 753, 15, 24, "Print",ExpressionUUID->"4eca64f9-b71d-49c3-86f3-6d41f38445c2"],
+Cell[136533, 3134, 753, 15, 24, "Print",ExpressionUUID->"4c0888d2-098c-42f0-8de5-1ecb2cf32e96"],
+Cell[137289, 3151, 755, 15, 24, "Print",ExpressionUUID->"51399f54-a7b1-41f7-8b24-4995c2e4c181"],
+Cell[138047, 3168, 753, 15, 24, "Print",ExpressionUUID->"e0cd4f07-736e-4c4b-ada0-15537799ff3b"],
+Cell[138803, 3185, 753, 15, 24, "Print",ExpressionUUID->"e64ce777-61ca-495e-b1d1-b774ca2813f7"],
+Cell[139559, 3202, 752, 15, 24, "Print",ExpressionUUID->"55950657-495f-4ce6-9954-4ccc1d008ba1"],
+Cell[140314, 3219, 753, 15, 24, "Print",ExpressionUUID->"b27bb56d-16a0-4efc-8c0f-b77c0ca5b237"],
+Cell[141070, 3236, 752, 15, 24, "Print",ExpressionUUID->"ff7e949c-b3e5-4050-8645-b2c9a8634924"],
+Cell[141825, 3253, 753, 15, 24, "Print",ExpressionUUID->"947f4441-fa04-4981-afad-fead85116e2e"],
+Cell[142581, 3270, 753, 15, 24, "Print",ExpressionUUID->"548499f2-ce71-4d33-bed6-acec981c378b"],
+Cell[143337, 3287, 755, 15, 24, "Print",ExpressionUUID->"d857df5e-895e-47ab-b7d0-ee9d599c6824"],
+Cell[144095, 3304, 755, 15, 24, "Print",ExpressionUUID->"4e272f6a-214e-422f-a78e-e9a6f3d0c261"],
+Cell[144853, 3321, 753, 15, 24, "Print",ExpressionUUID->"cd52d99a-b269-43d7-85bc-c250b9fb745b"],
+Cell[145609, 3338, 752, 15, 24, "Print",ExpressionUUID->"b8abbe7b-62c5-479e-9a7d-6f7ffd90cb4b"],
+Cell[146364, 3355, 753, 15, 24, "Print",ExpressionUUID->"72891f6b-f40f-41b8-94cc-04a8ae336fb9"],
+Cell[147120, 3372, 755, 15, 24, "Print",ExpressionUUID->"da62e209-38fc-42c2-821f-7b4ffee434e9"],
+Cell[147878, 3389, 753, 15, 24, "Print",ExpressionUUID->"16b98302-49ba-430d-aefe-6649e74c9774"],
+Cell[148634, 3406, 751, 15, 24, "Print",ExpressionUUID->"3805fbc3-477d-495d-8701-dc77df462524"],
+Cell[149388, 3423, 755, 15, 24, "Print",ExpressionUUID->"43a7b04e-48a7-4bc0-a239-5b91d984cfd2"],
+Cell[150146, 3440, 753, 15, 24, "Print",ExpressionUUID->"b0aa5a61-d780-492f-8567-63a0eafd04b2"],
+Cell[150902, 3457, 753, 15, 24, "Print",ExpressionUUID->"ebaaf742-180e-494d-95c7-790b57511678"],
+Cell[151658, 3474, 753, 15, 24, "Print",ExpressionUUID->"348fc0e7-2581-4572-9f35-f6d518a9abc9"],
+Cell[152414, 3491, 753, 15, 24, "Print",ExpressionUUID->"a091d1f3-9e28-4e28-95c4-0b5f181b3659"],
+Cell[153170, 3508, 753, 15, 24, "Print",ExpressionUUID->"3157a799-e7b0-4b20-821a-654b1ad030de"],
+Cell[153926, 3525, 753, 15, 24, "Print",ExpressionUUID->"139dc464-0bea-483b-81ab-7c7e88bb0451"],
+Cell[154682, 3542, 753, 15, 24, "Print",ExpressionUUID->"10771fc1-8f30-4297-ac6a-5602e52c78a2"],
+Cell[155438, 3559, 755, 15, 24, "Print",ExpressionUUID->"2a1bdf5c-9496-46ff-8c4f-2abfe44fe505"],
+Cell[156196, 3576, 753, 15, 24, "Print",ExpressionUUID->"b2d717a8-f42a-4625-afcf-4fe461b55a36"],
+Cell[156952, 3593, 753, 15, 24, "Print",ExpressionUUID->"051d30e5-95d5-4424-98ce-d4c4f34ccbba"],
+Cell[157708, 3610, 753, 15, 24, "Print",ExpressionUUID->"0e28227f-b532-4a73-b195-1252bc87b49c"],
+Cell[158464, 3627, 753, 15, 24, "Print",ExpressionUUID->"fe06394f-461d-4df6-a551-9099d85c716c"],
+Cell[159220, 3644, 753, 15, 24, "Print",ExpressionUUID->"de8e07e8-567b-4bd1-84b3-5a0d83ee314d"],
+Cell[159976, 3661, 753, 15, 24, "Print",ExpressionUUID->"a064301d-faf6-42c5-9a53-aca27393b292"],
+Cell[160732, 3678, 755, 15, 24, "Print",ExpressionUUID->"7d6cc74f-da7a-414c-9380-c39bfb70205a"],
+Cell[161490, 3695, 753, 15, 24, "Print",ExpressionUUID->"4ac59094-b46e-4934-9c4f-5d06e34de6ca"],
+Cell[162246, 3712, 755, 15, 24, "Print",ExpressionUUID->"4449d3f1-8286-44a3-86db-194c8693e056"],
+Cell[163004, 3729, 753, 15, 24, "Print",ExpressionUUID->"515cfc96-84a6-4649-96d9-c125bc3a56d1"],
+Cell[163760, 3746, 755, 15, 24, "Print",ExpressionUUID->"3626fa9b-b8fe-4ea4-904b-60ed12fc2ed2"],
+Cell[164518, 3763, 755, 15, 24, "Print",ExpressionUUID->"e1d5b86b-9e8a-453f-a16f-0accdcdc2c87"],
+Cell[165276, 3780, 755, 15, 24, "Print",ExpressionUUID->"93292a2b-f0ad-4492-829b-4eea07bb57b3"],
+Cell[166034, 3797, 755, 15, 24, "Print",ExpressionUUID->"b206cc52-ff15-4dc2-a197-dafb4b374bf0"],
+Cell[166792, 3814, 753, 15, 24, "Print",ExpressionUUID->"3f4e5136-0698-432a-92f4-0fb093f4500e"],
+Cell[167548, 3831, 753, 15, 24, "Print",ExpressionUUID->"0d784b3a-1374-48af-a932-5e988f518427"],
+Cell[168304, 3848, 755, 15, 24, "Print",ExpressionUUID->"0751048b-0c48-42b1-ac27-23c88ef9a706"],
+Cell[169062, 3865, 753, 15, 24, "Print",ExpressionUUID->"7a776c35-4069-4736-b7c2-72bac5737a11"],
+Cell[169818, 3882, 753, 15, 24, "Print",ExpressionUUID->"b301107f-e565-4755-b53f-43109f3432d9"],
+Cell[170574, 3899, 753, 15, 24, "Print",ExpressionUUID->"9b8966a2-310d-4d27-add5-3ec9f9c97bbf"],
+Cell[171330, 3916, 753, 15, 24, "Print",ExpressionUUID->"36df7a65-bac7-46c8-96d7-c02365d0452a"],
+Cell[172086, 3933, 752, 15, 24, "Print",ExpressionUUID->"d85a8d2b-99bc-4c6c-9f5d-902f07b773b3"],
+Cell[172841, 3950, 753, 15, 24, "Print",ExpressionUUID->"447afd86-4868-415e-8578-bd168d3c1f69"],
+Cell[173597, 3967, 753, 15, 24, "Print",ExpressionUUID->"92dadf67-cc06-4b54-bfcf-b37c83936525"],
+Cell[174353, 3984, 753, 15, 24, "Print",ExpressionUUID->"43fade29-d335-4b89-b396-f802329dfca6"],
+Cell[175109, 4001, 753, 15, 24, "Print",ExpressionUUID->"2d8efd03-bc11-4335-8633-da2f48a2fc98"],
+Cell[175865, 4018, 753, 15, 24, "Print",ExpressionUUID->"5e390f6f-3dcf-47a7-8049-879b5452ea1c"],
+Cell[176621, 4035, 753, 15, 24, "Print",ExpressionUUID->"09226ca6-df03-4b2b-a94a-0bcb8231967d"],
+Cell[177377, 4052, 755, 15, 24, "Print",ExpressionUUID->"a5dec9c7-f605-4597-81a6-84e4212315bd"],
+Cell[178135, 4069, 753, 15, 24, "Print",ExpressionUUID->"b16972b8-c948-49d5-8497-71f12b93a065"],
+Cell[178891, 4086, 753, 15, 24, "Print",ExpressionUUID->"0ce0d2ad-8f13-445a-a071-d2c5c534506c"],
+Cell[179647, 4103, 755, 15, 24, "Print",ExpressionUUID->"f70b6e03-2322-463b-9d65-263b2562623b"],
+Cell[180405, 4120, 753, 15, 24, "Print",ExpressionUUID->"052957dc-6f0c-456a-877f-e1fd50c50ee3"],
+Cell[181161, 4137, 753, 15, 24, "Print",ExpressionUUID->"e8c2df3b-e87a-4baa-900c-2f0e23f00c9c"],
+Cell[181917, 4154, 755, 15, 24, "Print",ExpressionUUID->"9120dc9b-74bc-44ac-a702-7d2f9f73eb96"],
+Cell[182675, 4171, 755, 15, 24, "Print",ExpressionUUID->"ae29d652-21cd-4836-9ae0-fbf1dec1686e"],
+Cell[183433, 4188, 753, 15, 24, "Print",ExpressionUUID->"ba94897a-d790-4eaf-b89b-ccc7802847e3"],
+Cell[184189, 4205, 753, 15, 24, "Print",ExpressionUUID->"36632854-3385-4e82-b182-721aa1466ff3"],
+Cell[184945, 4222, 753, 15, 24, "Print",ExpressionUUID->"01db90ea-f5f8-43ef-a30f-ba8bb6290681"],
+Cell[185701, 4239, 753, 15, 24, "Print",ExpressionUUID->"c886a26e-4fa9-4988-a753-7fe21b53e604"],
+Cell[186457, 4256, 752, 15, 24, "Print",ExpressionUUID->"f7201ab4-aba6-4269-a4d7-b8a761ec3910"],
+Cell[187212, 4273, 753, 15, 24, "Print",ExpressionUUID->"cdc6e3e3-289a-41ba-8ecd-10dab12e221e"],
+Cell[187968, 4290, 753, 15, 24, "Print",ExpressionUUID->"2c8d081a-d61e-4fcd-b272-222e508efe06"],
+Cell[188724, 4307, 753, 15, 24, "Print",ExpressionUUID->"624c83ae-d0ac-4a5f-9fe8-fead9c37e3d7"],
+Cell[189480, 4324, 753, 15, 24, "Print",ExpressionUUID->"fbfc843c-94d6-4a3e-ab39-78460c90307d"],
+Cell[190236, 4341, 755, 15, 24, "Print",ExpressionUUID->"3fae94c1-4f4e-4b60-b0f3-65b9568e4bef"],
+Cell[190994, 4358, 753, 15, 24, "Print",ExpressionUUID->"24984f2b-5797-4978-9f10-06484afbe6ab"],
+Cell[191750, 4375, 753, 15, 24, "Print",ExpressionUUID->"e3338577-2e3e-40bf-9561-920ef1089476"],
+Cell[192506, 4392, 753, 15, 24, "Print",ExpressionUUID->"20dd1de1-a951-48f0-b6f3-f2c983b36f23"],
+Cell[193262, 4409, 753, 15, 24, "Print",ExpressionUUID->"1a7146a5-687d-4a3e-84e3-c787c50e3c71"],
+Cell[194018, 4426, 753, 15, 24, "Print",ExpressionUUID->"96a23575-b30f-497e-8ac7-d41502343579"],
+Cell[194774, 4443, 505, 9, 24, "Print",ExpressionUUID->"cb7c0cea-f860-41e7-99ce-847857463c0e"],
+Cell[195282, 4454, 698, 14, 24, "Print",ExpressionUUID->"67e1e5fc-838c-4e16-afb5-4c6c7f02a34a"],
+Cell[195983, 4470, 685, 14, 24, "Print",ExpressionUUID->"5b9020e6-02b1-49c1-8fdf-9bf0f148ad84"],
+Cell[196671, 4486, 856, 18, 24, "Print",ExpressionUUID->"9c60dfa7-261b-4721-839a-bb3d148d60b6"],
+Cell[197530, 4506, 856, 18, 24, "Print",ExpressionUUID->"ad6ecfed-0b7e-4cc2-a7ab-49a74e2854fa"],
+Cell[198389, 4526, 856, 18, 24, "Print",ExpressionUUID->"597127a3-ecca-4efa-af70-8402c7256f5b"],
+Cell[199248, 4546, 856, 18, 24, "Print",ExpressionUUID->"aeb992a2-8666-4334-9b51-7cde392ec260"],
+Cell[200107, 4566, 862, 18, 24, "Print",ExpressionUUID->"c0e4fbe4-f8a4-49d6-9a59-d2f1b14cf323"],
+Cell[200972, 4586, 860, 18, 24, "Print",ExpressionUUID->"47c0185a-21cc-4bcf-97cb-addd63834baf"],
+Cell[201835, 4606, 860, 18, 24, "Print",ExpressionUUID->"0c66a295-f98e-4ffc-84a1-ee2cd9e4601a"],
+Cell[202698, 4626, 860, 18, 24, "Print",ExpressionUUID->"346a332e-45fc-42d4-b477-871b1fb8eb66"],
+Cell[203561, 4646, 862, 18, 24, "Print",ExpressionUUID->"fd8719cf-6ffd-4c7a-adce-1daf5dfad48c"],
+Cell[204426, 4666, 862, 18, 24, "Print",ExpressionUUID->"42daa2dc-40df-4234-94e2-bf5b2addb871"],
+Cell[205291, 4686, 864, 18, 24, "Print",ExpressionUUID->"09ae5d2d-df52-4d4d-9e03-bb439d6078ce"],
+Cell[206158, 4706, 862, 18, 24, "Print",ExpressionUUID->"b036ce12-3837-4bc4-a37a-f3f46674cd07"],
+Cell[207023, 4726, 864, 18, 24, "Print",ExpressionUUID->"8f75d936-b32f-4596-9bb9-e692218a372b"],
+Cell[207890, 4746, 862, 18, 24, "Print",ExpressionUUID->"51fd0b18-56dd-428d-90d5-ba974e40c085"],
+Cell[208755, 4766, 862, 18, 24, "Print",ExpressionUUID->"b59dd960-3b69-4a0d-aa5f-642e24911df8"],
+Cell[209620, 4786, 862, 18, 24, "Print",ExpressionUUID->"6836c385-db42-4439-82c2-1fc29fdcda6a"],
+Cell[210485, 4806, 862, 18, 24, "Print",ExpressionUUID->"6693d046-c3f0-4358-b8bb-1c58da903a84"],
+Cell[211350, 4826, 862, 18, 24, "Print",ExpressionUUID->"4ec321e4-96ee-4039-9014-dbafedd09ba2"],
+Cell[212215, 4846, 864, 18, 24, "Print",ExpressionUUID->"c6a479c8-30cd-4b26-91b4-cdc6e2a30152"],
+Cell[213082, 4866, 187484, 3577, 296, "Print",ExpressionUUID->"6cb5a7b8-bdde-41d2-a1c4-a4b6677f6ecf"],
+Cell[400569, 8445, 183550, 3564, 296, "Print",ExpressionUUID->"f6e58ed7-f06a-41d9-bd0c-ed91b5593c53"],
+Cell[584122, 12011, 199848, 3830, 296, "Print",ExpressionUUID->"a6e05591-e69a-4d0e-906e-5d9445e85c9b"],
+Cell[783973, 15843, 192231, 3705, 296, "Print",ExpressionUUID->"abc3a301-7973-4147-ae4e-76eeac7fae1c"],
+Cell[976207, 19550, 38866, 782, 296, "Print",ExpressionUUID->"68844e1e-2871-4a28-94b0-01018303a9f2"],
+Cell[1015076, 20334, 856, 18, 24, "Print",ExpressionUUID->"5d96d969-5a40-4695-8a2c-f7491f7b3401"],
+Cell[1015935, 20354, 856, 18, 24, "Print",ExpressionUUID->"4d4d838f-7d38-4eac-96b4-298ecfa018ae"],
+Cell[1016794, 20374, 858, 18, 24, "Print",ExpressionUUID->"b9dae5e0-1113-42c0-83ed-3551b3312266"],
+Cell[1017655, 20394, 856, 18, 24, "Print",ExpressionUUID->"62ddf54c-55f0-4225-a924-40b9412e317d"],
+Cell[1018514, 20414, 860, 18, 24, "Print",ExpressionUUID->"aed23f70-69a3-4cdc-9c3d-af01745f4454"],
+Cell[1019377, 20434, 860, 18, 24, "Print",ExpressionUUID->"6dc9c6cf-2d5d-4180-bd51-2aefcb60d097"],
+Cell[1020240, 20454, 860, 18, 24, "Print",ExpressionUUID->"62ea1e7b-6880-4823-a9ea-5da3e8fd3f6e"],
+Cell[1021103, 20474, 860, 18, 24, "Print",ExpressionUUID->"d10d7d30-e876-4be8-b4df-5aad76a0d99f"],
+Cell[1021966, 20494, 862, 18, 24, "Print",ExpressionUUID->"0bb631b7-0f98-4427-8c6b-a618738d4428"],
+Cell[1022831, 20514, 862, 18, 24, "Print",ExpressionUUID->"54d5425e-3b63-48fe-bc51-ca1b13e40f22"],
+Cell[1023696, 20534, 862, 18, 24, "Print",ExpressionUUID->"41a1f6d7-c5eb-42e0-9235-3aaa723df59b"],
+Cell[1024561, 20554, 861, 18, 24, "Print",ExpressionUUID->"546ba414-8c45-48ac-8abc-6199cf4c399b"],
+Cell[1025425, 20574, 862, 18, 24, "Print",ExpressionUUID->"ee23c09b-e2ce-45ad-9fcd-52f4338a3cb6"],
+Cell[1026290, 20594, 862, 18, 24, "Print",ExpressionUUID->"43bf9480-051d-435a-a2e3-511830b5c19a"],
+Cell[1027155, 20614, 862, 18, 24, "Print",ExpressionUUID->"3c2b6867-ce54-4af9-9a4d-5517d9377cc5"],
+Cell[1028020, 20634, 862, 18, 24, "Print",ExpressionUUID->"cf269a5f-aa4a-41d8-843f-35737997e57e"],
+Cell[1028885, 20654, 862, 18, 24, "Print",ExpressionUUID->"6ca93d6b-5082-410b-afdb-d2509e614ef1"],
+Cell[1029750, 20674, 864, 18, 24, "Print",ExpressionUUID->"26bfc511-c2fa-4397-b319-46ee20290222"],
+Cell[1030617, 20694, 862, 18, 24, "Print",ExpressionUUID->"0d86c9ec-7015-4dec-b23a-e5fd680a498f"],
+Cell[1031482, 20714, 507, 9, 24, "Print",ExpressionUUID->"46a5e98e-c39a-4f90-8178-7fc2a6af4461"],
+Cell[1031992, 20725, 505, 9, 24, "Print",ExpressionUUID->"20974ed1-622a-479e-b84c-431e78237400"],
+Cell[1032500, 20736, 765, 16, 24, "Print",ExpressionUUID->"f71cff21-7456-4f22-a5ee-3f85729a0d0f"],
+Cell[1033268, 20754, 503, 9, 24, "Print",ExpressionUUID->"5396d7a4-d3e9-4325-b2d8-ffa52d48ee32"],
+Cell[1033774, 20765, 700, 14, 24, "Print",ExpressionUUID->"1fb61007-ee05-4d11-8f53-8e44a32c8738"],
+Cell[1034477, 20781, 748, 15, 24, "Print",ExpressionUUID->"2efd9ff6-e01c-4732-bb0a-65244d738874"],
+Cell[1035228, 20798, 749, 15, 24, "Print",ExpressionUUID->"05c9dea2-85b7-43e2-b504-54bebb7e49f4"],
+Cell[1035980, 20815, 749, 15, 24, "Print",ExpressionUUID->"19d8d665-696d-4a2c-8965-3682cd777cb5"],
+Cell[1036732, 20832, 749, 15, 24, "Print",ExpressionUUID->"c31fecda-e35d-4ba3-b64e-319c0894ebe2"],
+Cell[1037484, 20849, 751, 15, 24, "Print",ExpressionUUID->"9198564d-f0b5-49c8-a27d-f39b1359c1a7"],
+Cell[1038238, 20866, 749, 15, 24, "Print",ExpressionUUID->"52f1e8d6-0086-47bf-80e9-1a5ab7fcf771"],
+Cell[1038990, 20883, 749, 15, 24, "Print",ExpressionUUID->"619ebbe5-0e1c-41b5-b046-1d87d47e9333"],
+Cell[1039742, 20900, 749, 15, 24, "Print",ExpressionUUID->"3f059dd7-d4af-47a3-b413-8b764388481a"],
+Cell[1040494, 20917, 748, 15, 24, "Print",ExpressionUUID->"74d8d031-6e6e-4abf-8100-6b8db5cd15ac"],
+Cell[1041245, 20934, 751, 15, 24, "Print",ExpressionUUID->"4dea7f1c-01e6-48e0-b927-96e8eae07a2d"],
+Cell[1041999, 20951, 753, 15, 24, "Print",ExpressionUUID->"04468c1a-62b1-438c-9578-1c92f93a3687"],
+Cell[1042755, 20968, 751, 15, 24, "Print",ExpressionUUID->"91a8a1f7-4035-432b-b3d5-d9be2ab94b5f"],
+Cell[1043509, 20985, 750, 15, 24, "Print",ExpressionUUID->"069702f3-15f9-4d29-83c1-3bb5f36ce7dc"],
+Cell[1044262, 21002, 753, 15, 24, "Print",ExpressionUUID->"9a1904cd-b8a4-4144-bfa3-d878c6e2c97c"],
+Cell[1045018, 21019, 751, 15, 24, "Print",ExpressionUUID->"29308435-04f2-4370-80d5-334e0a95b733"],
+Cell[1045772, 21036, 753, 15, 24, "Print",ExpressionUUID->"a12a8ab6-b265-4d0f-b1c5-fb347118249a"],
+Cell[1046528, 21053, 753, 15, 24, "Print",ExpressionUUID->"d42d114d-4647-4a3a-a8b9-e94b5358a700"],
+Cell[1047284, 21070, 753, 15, 24, "Print",ExpressionUUID->"3fd60cc4-f222-46ec-8694-0260a35423b9"],
+Cell[1048040, 21087, 751, 15, 24, "Print",ExpressionUUID->"a8f2a3b9-9ac3-4054-83d1-dad4cae9b3df"],
+Cell[1048794, 21104, 753, 15, 24, "Print",ExpressionUUID->"f547eb36-aaa9-4619-b1a4-693332f481f8"],
+Cell[1049550, 21121, 751, 15, 24, "Print",ExpressionUUID->"dda25a37-55e3-4462-955e-ea39c358dd04"],
+Cell[1050304, 21138, 751, 15, 24, "Print",ExpressionUUID->"96ba9938-44fe-469d-b194-5d715304924a"],
+Cell[1051058, 21155, 751, 15, 24, "Print",ExpressionUUID->"76871681-66aa-4898-8ed6-3c9deee9f555"],
+Cell[1051812, 21172, 753, 15, 24, "Print",ExpressionUUID->"52c0815d-cff8-420c-8d74-18dd56330023"],
+Cell[1052568, 21189, 753, 15, 24, "Print",ExpressionUUID->"48181460-6f56-42b3-96fa-9d29000a248a"],
+Cell[1053324, 21206, 751, 15, 24, "Print",ExpressionUUID->"798cdf6f-76f7-445e-b738-5943bd7abe45"],
+Cell[1054078, 21223, 751, 15, 24, "Print",ExpressionUUID->"c493fca1-b135-4819-bd82-81f736594971"],
+Cell[1054832, 21240, 751, 15, 24, "Print",ExpressionUUID->"d9739cfc-5de1-49be-8573-da68ecb23dc0"],
+Cell[1055586, 21257, 751, 15, 24, "Print",ExpressionUUID->"0a9e77a4-8cef-4591-ad55-953ee064c981"],
+Cell[1056340, 21274, 751, 15, 24, "Print",ExpressionUUID->"eced675b-9879-4b94-9987-b66b6128840b"],
+Cell[1057094, 21291, 751, 15, 24, "Print",ExpressionUUID->"1ed14472-9e25-4a14-b1b0-d1fb8f4aff2c"],
+Cell[1057848, 21308, 751, 15, 24, "Print",ExpressionUUID->"4855c77b-cc40-4afa-9c49-f38bc2584a42"],
+Cell[1058602, 21325, 751, 15, 24, "Print",ExpressionUUID->"7e5b88eb-df67-4c97-88b1-ec700ae10044"],
+Cell[1059356, 21342, 753, 15, 24, "Print",ExpressionUUID->"c23a1e22-c38c-4acc-9aa5-9c5e4f273aee"],
+Cell[1060112, 21359, 751, 15, 24, "Print",ExpressionUUID->"be8d251e-2d97-42f5-a13e-2a8d12f3a106"],
+Cell[1060866, 21376, 753, 15, 24, "Print",ExpressionUUID->"8f6ea87b-5303-4158-a29b-1f40acc4a1a8"],
+Cell[1061622, 21393, 751, 15, 24, "Print",ExpressionUUID->"3f2cfd25-54c0-4cc6-be62-82973024d900"],
+Cell[1062376, 21410, 751, 15, 24, "Print",ExpressionUUID->"b54faa9b-7862-4c5b-896e-7643988eba5c"],
+Cell[1063130, 21427, 753, 15, 24, "Print",ExpressionUUID->"adec28d1-756c-4f08-867e-ee9ca8ba5ce2"],
+Cell[1063886, 21444, 751, 15, 24, "Print",ExpressionUUID->"8d97e262-1bf3-4955-b041-728bfcda8de0"],
+Cell[1064640, 21461, 753, 15, 24, "Print",ExpressionUUID->"bfe08e1e-99ec-4679-a112-d98996a5b6f0"],
+Cell[1065396, 21478, 751, 15, 24, "Print",ExpressionUUID->"e8f75305-efbf-4ee9-92de-3a7ad767d3aa"],
+Cell[1066150, 21495, 751, 15, 24, "Print",ExpressionUUID->"152ab7f1-5825-47ee-9333-a1a55853d9de"],
+Cell[1066904, 21512, 753, 15, 24, "Print",ExpressionUUID->"42c21416-066a-4908-9a05-09b78009aa09"],
+Cell[1067660, 21529, 753, 15, 24, "Print",ExpressionUUID->"94c9f7df-ce75-4d13-9c47-4b563d8af282"],
+Cell[1068416, 21546, 751, 15, 24, "Print",ExpressionUUID->"e1ecaec2-dcc9-40e2-bbfe-9ea12032043d"],
+Cell[1069170, 21563, 751, 15, 24, "Print",ExpressionUUID->"d1932679-fad4-437d-b150-d8d584a0ccf1"],
+Cell[1069924, 21580, 751, 15, 24, "Print",ExpressionUUID->"715faf1e-fb00-4d8f-ac8a-1e09ccb69b0a"],
+Cell[1070678, 21597, 751, 15, 24, "Print",ExpressionUUID->"fd12e2ad-39ca-426b-8e3c-f6ef6faee08b"],
+Cell[1071432, 21614, 751, 15, 24, "Print",ExpressionUUID->"f1f7d8a0-07d7-4d6f-842e-28617aee1138"],
+Cell[1072186, 21631, 753, 15, 24, "Print",ExpressionUUID->"25f43910-5c27-4d99-8cfa-3dfc74190c5c"],
+Cell[1072942, 21648, 751, 15, 24, "Print",ExpressionUUID->"c801d38d-e11b-45e3-915e-ac0d0f532458"],
+Cell[1073696, 21665, 751, 15, 24, "Print",ExpressionUUID->"713dd9ff-91f4-4d34-a6ab-a3ddee0b071d"],
+Cell[1074450, 21682, 751, 15, 24, "Print",ExpressionUUID->"011a32de-35b5-4dde-a028-f330cc490e67"],
+Cell[1075204, 21699, 753, 15, 24, "Print",ExpressionUUID->"1572dcad-fa8e-4937-b320-f0d440b42fd7"],
+Cell[1075960, 21716, 751, 15, 24, "Print",ExpressionUUID->"ad7934db-ece9-451a-b0fc-72a0d634d5f6"],
+Cell[1076714, 21733, 751, 15, 24, "Print",ExpressionUUID->"f8571aff-21df-4e70-98ba-a319ee162803"],
+Cell[1077468, 21750, 751, 15, 24, "Print",ExpressionUUID->"feb1a159-83f3-4a3d-a977-26eb31d3d7f4"],
+Cell[1078222, 21767, 751, 15, 24, "Print",ExpressionUUID->"6159094e-068a-4654-8163-afab6c6074eb"],
+Cell[1078976, 21784, 750, 15, 24, "Print",ExpressionUUID->"5fd7649a-15b4-46ea-b692-c575579883b4"],
+Cell[1079729, 21801, 753, 15, 24, "Print",ExpressionUUID->"62c239d2-7d6f-4b63-9d64-763823631b5c"],
+Cell[1080485, 21818, 751, 15, 24, "Print",ExpressionUUID->"5d9d94f8-808b-4675-b196-1ed8a6382653"],
+Cell[1081239, 21835, 751, 15, 24, "Print",ExpressionUUID->"669c9123-67c3-4f1a-ae74-87344a6b79bf"],
+Cell[1081993, 21852, 750, 15, 24, "Print",ExpressionUUID->"77514e2a-b6da-4634-a62f-ce88971fae3d"],
+Cell[1082746, 21869, 751, 15, 24, "Print",ExpressionUUID->"9e745511-324c-4485-bb7b-462d8b506c83"],
+Cell[1083500, 21886, 751, 15, 24, "Print",ExpressionUUID->"392b54cd-15ee-44b1-b583-9914c693792c"],
+Cell[1084254, 21903, 751, 15, 24, "Print",ExpressionUUID->"7549bb18-38a5-4e3a-b660-e92b1ac4b7e7"],
+Cell[1085008, 21920, 753, 15, 24, "Print",ExpressionUUID->"5d47261e-6564-4087-883a-92e5429151f8"],
+Cell[1085764, 21937, 751, 15, 24, "Print",ExpressionUUID->"bc1f211e-7adf-4951-a765-567b51e3a88f"],
+Cell[1086518, 21954, 751, 15, 24, "Print",ExpressionUUID->"d418375f-1e54-4088-831c-70a768ff759f"],
+Cell[1087272, 21971, 751, 15, 24, "Print",ExpressionUUID->"ac64432b-37ae-41e3-a1b2-c08ec822ebe3"],
+Cell[1088026, 21988, 753, 15, 24, "Print",ExpressionUUID->"7343b51f-9418-461c-861f-25c6682890f8"],
+Cell[1088782, 22005, 751, 15, 24, "Print",ExpressionUUID->"b3dc586d-4ebc-400e-b8cb-5ce02cdb9a6d"],
+Cell[1089536, 22022, 751, 15, 24, "Print",ExpressionUUID->"8ca2c10b-5aa6-49fd-91ed-ccb2ef8408f5"],
+Cell[1090290, 22039, 751, 15, 24, "Print",ExpressionUUID->"c9364953-1c56-4d3e-85b2-a233468eab03"],
+Cell[1091044, 22056, 753, 15, 24, "Print",ExpressionUUID->"32bc5365-2e9f-4bdb-a76f-d27fa24c3804"],
+Cell[1091800, 22073, 753, 15, 24, "Print",ExpressionUUID->"e37e6217-4194-4b16-a0be-6be83b0f1fb1"],
+Cell[1092556, 22090, 751, 15, 24, "Print",ExpressionUUID->"25b4389c-a8bb-4846-80fd-bf8dcc9d79ac"],
+Cell[1093310, 22107, 751, 15, 24, "Print",ExpressionUUID->"6d81ee86-c27f-4838-8473-dda724120873"],
+Cell[1094064, 22124, 751, 15, 24, "Print",ExpressionUUID->"5681e58d-8d57-486f-99b9-1a6029eeb63c"],
+Cell[1094818, 22141, 753, 15, 24, "Print",ExpressionUUID->"c15d523e-5225-40b3-985c-c9d79cabd344"],
+Cell[1095574, 22158, 751, 15, 24, "Print",ExpressionUUID->"7bdcf1fc-3461-4599-bb2f-a050d11cb2c9"],
+Cell[1096328, 22175, 751, 15, 24, "Print",ExpressionUUID->"95a1529d-2bdb-4f95-b7e7-d5bd7bf9e7a1"],
+Cell[1097082, 22192, 751, 15, 24, "Print",ExpressionUUID->"6e4a54eb-0853-4e92-9c5a-520d4cf5dbe5"],
+Cell[1097836, 22209, 751, 15, 24, "Print",ExpressionUUID->"c02385be-d5f0-41e9-a647-2bcfca94a5e1"],
+Cell[1098590, 22226, 753, 15, 24, "Print",ExpressionUUID->"31e4083d-d88d-4f58-9c66-3c1dc5b08e14"],
+Cell[1099346, 22243, 751, 15, 24, "Print",ExpressionUUID->"c197b1fb-99c3-4250-bd3e-1c138c4b2a8b"],
+Cell[1100100, 22260, 751, 15, 24, "Print",ExpressionUUID->"ce6bd9e2-187f-424a-aac1-cbc7e666e845"],
+Cell[1100854, 22277, 751, 15, 24, "Print",ExpressionUUID->"12987338-319b-443f-b492-2d8687e73832"],
+Cell[1101608, 22294, 751, 15, 24, "Print",ExpressionUUID->"3e79ad8c-0918-4810-b41a-d5e903bc0e57"],
+Cell[1102362, 22311, 751, 15, 24, "Print",ExpressionUUID->"f42dc57d-bb75-43d6-8cc4-72d6e077cdb6"],
+Cell[1103116, 22328, 751, 15, 24, "Print",ExpressionUUID->"138f5c4c-4650-44b8-97b0-a52892d354cf"],
+Cell[1103870, 22345, 751, 15, 24, "Print",ExpressionUUID->"c8adf531-8daf-479a-977f-7505a8364557"],
+Cell[1104624, 22362, 753, 15, 24, "Print",ExpressionUUID->"1ff22d62-f6fc-4ebc-aee3-10b8b2a6c119"],
+Cell[1105380, 22379, 751, 15, 24, "Print",ExpressionUUID->"1692b1b1-00b3-4b78-aa14-a19a3573ce9d"],
+Cell[1106134, 22396, 751, 15, 24, "Print",ExpressionUUID->"609830e7-5f67-4875-8e0f-c6a2c1256ebd"],
+Cell[1106888, 22413, 751, 15, 24, "Print",ExpressionUUID->"480653f5-6770-4dda-955f-c22767c662af"],
+Cell[1107642, 22430, 751, 15, 24, "Print",ExpressionUUID->"ba320a6b-3c62-4d64-ad9a-a9b90e40efc6"],
+Cell[1108396, 22447, 751, 15, 24, "Print",ExpressionUUID->"03d0dc7c-6950-465f-85de-1676bbe5fd78"],
+Cell[1109150, 22464, 753, 15, 24, "Print",ExpressionUUID->"8c6ff4ee-5a2f-41e9-8d47-6852ee824baf"],
+Cell[1109906, 22481, 755, 15, 24, "Print",ExpressionUUID->"ca98ebdb-988d-42dd-af7d-df13c66aa61c"],
+Cell[1110664, 22498, 752, 15, 24, "Print",ExpressionUUID->"38c67e12-e4b9-4287-b633-30a8b0cf3865"],
+Cell[1111419, 22515, 753, 15, 24, "Print",ExpressionUUID->"1c77c34b-24b7-4413-9d76-85cb00439782"],
+Cell[1112175, 22532, 753, 15, 24, "Print",ExpressionUUID->"2d0b8301-de75-453c-987e-87af3191aa60"],
+Cell[1112931, 22549, 753, 15, 24, "Print",ExpressionUUID->"1412e375-605a-4af1-a7ae-43258764f730"],
+Cell[1113687, 22566, 752, 15, 24, "Print",ExpressionUUID->"59f92e4d-bdc3-47c9-98f3-1bfba299c3c2"],
+Cell[1114442, 22583, 753, 15, 24, "Print",ExpressionUUID->"a8b0e6ac-581c-4d9e-aeeb-12a0151d046e"],
+Cell[1115198, 22600, 753, 15, 24, "Print",ExpressionUUID->"21d5453b-bcb6-4fb1-a675-1ac73bbbf7a4"],
+Cell[1115954, 22617, 751, 15, 24, "Print",ExpressionUUID->"82d82324-f67c-44fc-8795-675d574f09a4"],
+Cell[1116708, 22634, 753, 15, 24, "Print",ExpressionUUID->"cf65a313-4aa8-4860-94e9-f75432946522"],
+Cell[1117464, 22651, 753, 15, 24, "Print",ExpressionUUID->"dd0e1e81-d013-491a-b2b0-a5f6b6fdb0ff"],
+Cell[1118220, 22668, 753, 15, 24, "Print",ExpressionUUID->"10bdcead-728f-4848-b405-5f1c941c693d"],
+Cell[1118976, 22685, 753, 15, 24, "Print",ExpressionUUID->"6591244c-dd72-4412-94c7-3d0268ea2897"],
+Cell[1119732, 22702, 753, 15, 24, "Print",ExpressionUUID->"4862a992-835f-4b76-94bd-11cab6bd1349"],
+Cell[1120488, 22719, 752, 15, 24, "Print",ExpressionUUID->"b7b9ade7-3d31-4630-b03b-af803e81de5e"],
+Cell[1121243, 22736, 753, 15, 24, "Print",ExpressionUUID->"99cf2a9f-2d24-4b8f-9907-677c73e06057"],
+Cell[1121999, 22753, 753, 15, 24, "Print",ExpressionUUID->"6a1146b3-d69d-4d43-9761-fec392018966"],
+Cell[1122755, 22770, 753, 15, 24, "Print",ExpressionUUID->"c70b38cb-29ce-4618-a59b-fd4c4cee56a9"],
+Cell[1123511, 22787, 753, 15, 24, "Print",ExpressionUUID->"39fe8443-fe79-48b3-9161-39c836bec30a"],
+Cell[1124267, 22804, 755, 15, 24, "Print",ExpressionUUID->"ce659c74-6228-45c1-ae19-1851eb659001"],
+Cell[1125025, 22821, 503, 9, 24, "Print",ExpressionUUID->"b00c9a0e-34fb-4f74-94bf-db724d98d500"],
+Cell[1125531, 22832, 698, 14, 24, "Print",ExpressionUUID->"deb3941f-eba3-48d2-bfa0-31eea89b20b6"],
+Cell[1126232, 22848, 683, 14, 24, "Print",ExpressionUUID->"75c2ca29-b7b7-4005-8298-795092300120"],
+Cell[1126918, 22864, 862, 18, 24, "Print",ExpressionUUID->"c2190487-2e72-447b-9ff7-f848e6603662"],
+Cell[1127783, 22884, 859, 18, 24, "Print",ExpressionUUID->"7b59d197-c868-4cc5-b1a1-ef60f2df65d3"],
+Cell[1128645, 22904, 860, 18, 24, "Print",ExpressionUUID->"0798aee8-ddb6-4671-b1b8-533942f0bb59"],
+Cell[1129508, 22924, 860, 18, 24, "Print",ExpressionUUID->"7cbf9eae-0bb2-4fcd-beb3-69ce8009a9f8"],
+Cell[1130371, 22944, 862, 18, 24, "Print",ExpressionUUID->"2ff2a498-80b4-4a54-aaf4-80b77e4c20e8"],
+Cell[1131236, 22964, 860, 18, 24, "Print",ExpressionUUID->"335d9373-7dbd-4725-b3e5-3561cf72ef5b"],
+Cell[1132099, 22984, 860, 18, 24, "Print",ExpressionUUID->"27fb4bfc-68ce-470a-bc6d-779fa2a2476a"],
+Cell[1132962, 23004, 860, 18, 24, "Print",ExpressionUUID->"84bbee73-40b4-4153-8877-9878d947bc05"],
+Cell[1133825, 23024, 860, 18, 24, "Print",ExpressionUUID->"a0b9f349-f01f-4b56-aa22-104aeb07523c"],
+Cell[1134688, 23044, 862, 18, 24, "Print",ExpressionUUID->"ba505887-8e78-475a-a8a9-9db3d4bac1fd"],
+Cell[1135553, 23064, 862, 18, 24, "Print",ExpressionUUID->"0714c39f-3d6d-40a2-b704-98d27f147980"],
+Cell[1136418, 23084, 862, 18, 24, "Print",ExpressionUUID->"e4d9a7fb-8dfe-48c8-8d51-b239daa25093"],
+Cell[1137283, 23104, 862, 18, 24, "Print",ExpressionUUID->"9d97d9e5-6d19-49fb-a924-9a50c978e046"],
+Cell[1138148, 23124, 862, 18, 24, "Print",ExpressionUUID->"2edf46d0-6e5f-4e30-aa9a-89f1d2b647e7"],
+Cell[1139013, 23144, 864, 18, 24, "Print",ExpressionUUID->"01b467b2-d84d-4d32-9ef0-2457ba9c1c8c"],
+Cell[1139880, 23164, 862, 18, 24, "Print",ExpressionUUID->"768d4280-2555-4d53-a86a-5c287600a818"],
+Cell[1140745, 23184, 862, 18, 24, "Print",ExpressionUUID->"7b2c8ba5-e531-4fad-924d-19ce24d14c75"],
+Cell[1141610, 23204, 862, 18, 24, "Print",ExpressionUUID->"fd40e96e-6c31-413b-87c6-f006a390ed42"],
+Cell[1142475, 23224, 169316, 3288, 296, "Print",ExpressionUUID->"43e18308-972b-4767-9950-dcd2b611ebe7"],
+Cell[1311794, 26514, 186670, 3577, 296, "Print",ExpressionUUID->"a281930c-93ac-4a18-939a-4861b0076926"],
+Cell[1498467, 30093, 194214, 3696, 296, "Print",ExpressionUUID->"26b31771-ae9b-4a1a-8373-97329aa54623"],
+Cell[1692684, 33791, 152531, 3009, 296, "Print",ExpressionUUID->"3b23959e-b3c8-4442-aa8d-6ecb8927d8b8"],
+Cell[1845218, 36802, 862, 18, 24, "Print",ExpressionUUID->"39a9cec1-26e6-4ee2-b77e-f15d11939d1e"],
+Cell[1846083, 36822, 862, 18, 24, "Print",ExpressionUUID->"63050aea-57c5-463b-bed9-1c10c0aa36c5"],
+Cell[1846948, 36842, 862, 18, 24, "Print",ExpressionUUID->"ed58d815-8e24-4227-93ca-2f60d3f2fc8c"],
+Cell[1847813, 36862, 862, 18, 24, "Print",ExpressionUUID->"3197b41f-6f83-49d5-8e09-07d8dfc9092d"],
+Cell[1848678, 36882, 860, 18, 24, "Print",ExpressionUUID->"585f7a1b-5a01-4e6f-8ed7-dc05e0c9fb3c"],
+Cell[1849541, 36902, 860, 18, 24, "Print",ExpressionUUID->"6dfa12bd-10a9-4748-8502-126c019346e9"],
+Cell[1850404, 36922, 862, 18, 24, "Print",ExpressionUUID->"2e1f0bb2-e05f-4c98-bc52-5eb37500cbd7"],
+Cell[1851269, 36942, 862, 18, 24, "Print",ExpressionUUID->"8ef0091e-4a8d-46a7-8b1f-8f42386e9882"],
+Cell[1852134, 36962, 859, 18, 24, "Print",ExpressionUUID->"5d651794-502e-4efd-8b0f-b73fe8f2e9e4"],
+Cell[1852996, 36982, 862, 18, 24, "Print",ExpressionUUID->"710fcab8-5052-4e1d-b640-79a8dcfd5b3a"],
+Cell[1853861, 37002, 864, 18, 24, "Print",ExpressionUUID->"4b2225bf-ae89-4945-8bb5-faa5599ba77a"],
+Cell[1854728, 37022, 864, 18, 24, "Print",ExpressionUUID->"0c338596-ebc8-4a51-93ba-7e12fb5240f6"],
+Cell[1855595, 37042, 862, 18, 24, "Print",ExpressionUUID->"e2807b31-e616-49ef-b46e-5c683c771ad9"],
+Cell[1856460, 37062, 862, 18, 24, "Print",ExpressionUUID->"cfc799dc-22f9-4ada-b14f-3a2423d55ce9"],
+Cell[1857325, 37082, 862, 18, 24, "Print",ExpressionUUID->"fef6d33c-2ccd-4607-ae7b-1e080bac577e"],
+Cell[1858190, 37102, 862, 18, 24, "Print",ExpressionUUID->"a8a71d73-ba36-43b5-a013-833dbedba0de"],
+Cell[1859055, 37122, 862, 18, 24, "Print",ExpressionUUID->"f74b3b69-cdc0-4e86-bdfb-2330418038e7"],
+Cell[1859920, 37142, 862, 18, 24, "Print",ExpressionUUID->"965b5775-c453-4f50-9616-9f1331870819"]
+}, Open  ]],
+Cell[1860797, 37163, 483, 7, 34, "Output",ExpressionUUID->"99f47719-ca07-4c8e-905b-3e8d8451abaf"],
+Cell[CellGroupData[{
+Cell[1861305, 37174, 503, 9, 24, "Print",ExpressionUUID->"028cea9c-a641-4dc7-a676-d8921ec8c8c4"],
+Cell[1861811, 37185, 720, 14, 24, "Print",ExpressionUUID->"5e1b8205-e2a6-4770-95a9-70ddfa3f9670"],
+Cell[1862534, 37201, 749, 15, 24, "Print",ExpressionUUID->"f81eaa7b-f315-4320-87f9-18482a76cf96"],
+Cell[1863286, 37218, 749, 15, 24, "Print",ExpressionUUID->"9918ca88-8d1f-42b9-b8c9-a5865e5a60b1"],
+Cell[1864038, 37235, 751, 15, 24, "Print",ExpressionUUID->"b1e55a28-ec28-4d6c-9f52-0164afb56f50"],
+Cell[1864792, 37252, 749, 15, 24, "Print",ExpressionUUID->"74a986fa-f68c-4a05-bd85-bdb6c9b7fb67"],
+Cell[1865544, 37269, 749, 15, 24, "Print",ExpressionUUID->"8a4ee6fe-e31a-4187-83df-15cf4b757e54"],
+Cell[1866296, 37286, 748, 15, 24, "Print",ExpressionUUID->"f2b67bb4-28b1-4ce2-a667-652fd92b3565"],
+Cell[1867047, 37303, 749, 15, 24, "Print",ExpressionUUID->"470c7dee-1f8f-48ec-93a1-9195b2eae671"],
+Cell[1867799, 37320, 749, 15, 24, "Print",ExpressionUUID->"1989777a-b636-4f7f-a3f7-50bcf7ebcca2"],
+Cell[1868551, 37337, 751, 15, 24, "Print",ExpressionUUID->"54310362-3c5c-43dc-b562-02028c423a26"],
+Cell[1869305, 37354, 751, 15, 24, "Print",ExpressionUUID->"c91b31a7-c605-4534-a09d-656a88a79fb7"],
+Cell[1870059, 37371, 753, 15, 24, "Print",ExpressionUUID->"ccea84e8-4b1c-47cd-ba3c-1f5728ffeeaa"],
+Cell[1870815, 37388, 753, 15, 24, "Print",ExpressionUUID->"b154d7d9-62ac-4bf4-944d-66dfcb5a1410"],
+Cell[1871571, 37405, 751, 15, 24, "Print",ExpressionUUID->"4b25875e-5405-41dd-995c-e4a6e761364a"],
+Cell[1872325, 37422, 751, 15, 24, "Print",ExpressionUUID->"9bf30ba5-fe16-4839-bacc-d23d0e80cc5a"],
+Cell[1873079, 37439, 751, 15, 24, "Print",ExpressionUUID->"1fe833bb-4f34-4708-a5ee-8846f6b06144"],
+Cell[1873833, 37456, 751, 15, 24, "Print",ExpressionUUID->"47f8b868-25d0-4723-8f32-7e51875c214d"],
+Cell[1874587, 37473, 753, 15, 24, "Print",ExpressionUUID->"b0cdadd7-8689-4d7f-8c3b-d0cb94d1f6f0"],
+Cell[1875343, 37490, 751, 15, 24, "Print",ExpressionUUID->"dd331ce9-7dbc-4379-991e-cc9eb19ed201"],
+Cell[1876097, 37507, 753, 15, 24, "Print",ExpressionUUID->"c7a4f1b6-c358-49bf-a1b3-b9a109e6c743"],
+Cell[1876853, 37524, 683, 14, 24, "Print",ExpressionUUID->"f00fe8e0-84fb-4edf-9e0a-d8c5c65fe941"],
+Cell[1877539, 37540, 604, 11, 44, "Print",ExpressionUUID->"6040d29e-6d53-44d0-8153-6fc39f3c7ad0"],
+Cell[1878146, 37553, 521, 9, 24, "Print",ExpressionUUID->"bb6dbc3a-13d4-408e-96dc-bb945f8ae988"],
+Cell[1878670, 37564, 508, 9, 44, "Print",ExpressionUUID->"91f41a42-36a8-4f0d-ac3f-33d2721a360a"],
+Cell[1879181, 37575, 503, 9, 24, "Print",ExpressionUUID->"4d541f4b-6be4-42a9-865f-08d3e4f02f7f"],
+Cell[1879687, 37586, 720, 14, 24, "Print",ExpressionUUID->"c3a632d3-c811-4930-994a-86a578306a39"],
+Cell[1880410, 37602, 751, 15, 24, "Print",ExpressionUUID->"5705f1c0-a9f7-406c-8b56-178385e02a8f"],
+Cell[1881164, 37619, 749, 15, 24, "Print",ExpressionUUID->"751f2a4f-1c25-4863-ad62-e37d5ee5391d"],
+Cell[1881916, 37636, 749, 15, 24, "Print",ExpressionUUID->"4979249c-da8e-4be3-a949-1348bde39d08"],
+Cell[1882668, 37653, 749, 15, 24, "Print",ExpressionUUID->"963f0eb3-2c59-441c-b86c-1db226782a26"],
+Cell[1883420, 37670, 749, 15, 24, "Print",ExpressionUUID->"de4b0d6d-64df-493f-81eb-63d90b54b983"],
+Cell[1884172, 37687, 681, 14, 24, "Print",ExpressionUUID->"e64d20da-e798-4c8d-92f2-05ce99feed2e"],
+Cell[1884856, 37703, 615, 11, 44, "Print",ExpressionUUID->"aef5aa6f-c12e-4ade-9da5-cbdc9bf8e6d6"],
+Cell[1885474, 37716, 521, 9, 24, "Print",ExpressionUUID->"ee35f8ee-5ffb-4c30-a332-a3f39f927483"],
+Cell[1885998, 37727, 508, 9, 44, "Print",ExpressionUUID->"10f45da7-6d44-4076-8e48-7a7279b328ca"],
+Cell[1886509, 37738, 503, 9, 24, "Print",ExpressionUUID->"012bb82c-b12f-4eb5-ba4a-61a5d2c30e22"],
+Cell[1887015, 37749, 720, 14, 24, "Print",ExpressionUUID->"3bc49a64-8d42-4a7c-9b15-952daa8d84af"],
+Cell[1887738, 37765, 747, 15, 24, "Print",ExpressionUUID->"d158b529-d400-46ed-853b-8fc7c259fd9a"],
+Cell[1888488, 37782, 751, 15, 24, "Print",ExpressionUUID->"1417d32f-28c1-4c88-b012-acc03f98dbb6"],
+Cell[1889242, 37799, 749, 15, 24, "Print",ExpressionUUID->"e4514c64-e2c0-4d65-affb-dfb598f43e52"],
+Cell[1889994, 37816, 749, 15, 24, "Print",ExpressionUUID->"d6989616-a8aa-450e-ac2d-147bfb45aa9e"],
+Cell[1890746, 37833, 749, 15, 24, "Print",ExpressionUUID->"fc03f14e-3edd-4ece-923e-593ae6734f14"],
+Cell[1891498, 37850, 681, 14, 24, "Print",ExpressionUUID->"fde60955-dd63-44fa-b19a-6f72da8ac468"],
+Cell[1892182, 37866, 613, 11, 44, "Print",ExpressionUUID->"fc43e771-d461-421b-8bf4-22dd3c957724"],
+Cell[1892798, 37879, 519, 9, 24, "Print",ExpressionUUID->"0b6743ad-73b7-4fe8-9167-10c878a8d4e7"],
+Cell[1893320, 37890, 508, 9, 44, "Print",ExpressionUUID->"327de8e5-a8e3-4ce2-ab53-850288d74a80"],
+Cell[1893831, 37901, 505, 9, 24, "Print",ExpressionUUID->"fa57134d-23e9-4e2f-a0a1-57a75c407b6d"],
+Cell[1894339, 37912, 722, 14, 24, "Print",ExpressionUUID->"2bee25e7-fe13-45dc-9768-04858a0bef7d"],
+Cell[1895064, 37928, 751, 15, 24, "Print",ExpressionUUID->"f91df3c9-f1af-4bf2-9fd3-424777247bda"],
+Cell[1895818, 37945, 748, 15, 24, "Print",ExpressionUUID->"e854471a-1851-40a7-becb-1ff08282542d"],
+Cell[1896569, 37962, 749, 15, 24, "Print",ExpressionUUID->"0b36bc86-4cb0-4a05-b035-23a8686d58e1"],
+Cell[1897321, 37979, 748, 15, 24, "Print",ExpressionUUID->"326f31b4-0e36-4ac6-8534-f3bc2fd54298"],
+Cell[1898072, 37996, 749, 15, 24, "Print",ExpressionUUID->"10afec88-1590-42fa-93aa-c7b11528b555"],
+Cell[1898824, 38013, 683, 14, 24, "Print",ExpressionUUID->"2a48ed9d-efd8-4ad8-bf78-1d438b60dbc5"],
+Cell[1899510, 38029, 613, 11, 44, "Print",ExpressionUUID->"146b555c-f748-4d8c-8a0b-5caec38174d4"],
+Cell[1900126, 38042, 521, 9, 24, "Print",ExpressionUUID->"037cf7c7-d26e-4c50-ba58-a1dc6118b841"],
+Cell[1900650, 38053, 508, 9, 44, "Print",ExpressionUUID->"0fb0bddc-5ad9-4893-91de-d9907cffd57e"],
+Cell[1901161, 38064, 505, 9, 24, "Print",ExpressionUUID->"dd3299fe-39bd-448d-aaf9-2bd8437a32fc"],
+Cell[1901669, 38075, 722, 14, 24, "Print",ExpressionUUID->"6cc5300b-82e9-4dec-a203-fbc22742a26c"],
+Cell[1902394, 38091, 749, 15, 24, "Print",ExpressionUUID->"ee972d17-2be9-4949-8bac-6e311cc19548"],
+Cell[1903146, 38108, 751, 15, 24, "Print",ExpressionUUID->"7778620a-a11b-4bb7-9466-7dace532b3be"],
+Cell[1903900, 38125, 749, 15, 24, "Print",ExpressionUUID->"19e05a26-9b30-44cb-b2df-abedd8c9993b"],
+Cell[1904652, 38142, 751, 15, 24, "Print",ExpressionUUID->"26e74d0e-ac56-4a07-a8f3-3c8822bd90a8"],
+Cell[1905406, 38159, 749, 15, 24, "Print",ExpressionUUID->"80f18fdd-fed9-44b4-8d1d-bd6d351be73f"],
+Cell[1906158, 38176, 683, 14, 24, "Print",ExpressionUUID->"899c41f4-e386-4fd6-b113-ec40cbd9b330"],
+Cell[1906844, 38192, 613, 11, 44, "Print",ExpressionUUID->"6a8a4354-3175-4957-80d5-366d64282bfc"],
+Cell[1907460, 38205, 519, 9, 24, "Print",ExpressionUUID->"a55dee86-a5c1-4ec0-b23b-925c46b2b554"],
+Cell[1907982, 38216, 510, 9, 44, "Print",ExpressionUUID->"247be3c5-77c8-4e54-a460-74b332d77fb9"]
+}, Open  ]]
+}, Open  ]],
+Cell[1908519, 38229, 208, 4, 73, "Input",ExpressionUUID->"1196f9bd-2548-4d35-85be-81bb05e735d1"],
+Cell[1908730, 38235, 265, 7, 30, "Input",ExpressionUUID->"a1b461b0-3311-471b-8622-0ce80ecc8bc5"],
+Cell[1908998, 38244, 1863, 53, 220, "Input",ExpressionUUID->"8a1b2c8b-00d6-46e3-89a1-77170c10da2a"],
+Cell[CellGroupData[{
+Cell[1910886, 38301, 2041, 57, 241, "Input",ExpressionUUID->"f40f6a8e-04da-4014-9f19-bcf1eb59b485"],
+Cell[CellGroupData[{
+Cell[1912952, 38362, 285, 6, 24, "Print",ExpressionUUID->"06a91ed0-39d0-490c-b189-161a03a8065c"],
+Cell[1913240, 38370, 545, 13, 24, "Print",ExpressionUUID->"5f925a71-94f5-4f30-a7db-99d61266dc13"],
+Cell[1913788, 38385, 285, 6, 24, "Print",ExpressionUUID->"c2a88071-8f05-4f83-8a15-4d79eeda7116"],
+Cell[1914076, 38393, 484, 11, 24, "Print",ExpressionUUID->"441feb10-1427-428a-968a-2f4369287f28"],
+Cell[1914563, 38406, 530, 12, 24, "Print",ExpressionUUID->"0d21fd4f-9aae-4979-a4e2-bd1750be24bf"],
+Cell[1915096, 38420, 533, 12, 24, "Print",ExpressionUUID->"9a8a0e42-066b-41c6-b668-41dc8bd288a1"],
+Cell[1915632, 38434, 531, 12, 24, "Print",ExpressionUUID->"3cb56e73-b571-48dd-92ec-1876f9016043"],
+Cell[1916166, 38448, 533, 12, 24, "Print",ExpressionUUID->"96cfe7d0-49fc-48f9-b5a7-48f3ca05d6e3"],
+Cell[1916702, 38462, 285, 6, 24, "Print",ExpressionUUID->"cee5109b-b5c3-404f-94e9-d3a2d0a69c8d"],
+Cell[1916990, 38470, 480, 11, 24, "Print",ExpressionUUID->"3918d0bf-3980-4f1d-a173-99bb7c383288"],
+Cell[1917473, 38483, 465, 11, 24, "Print",ExpressionUUID->"7ccd23bb-39f2-4293-871b-86da585289d9"],
+Cell[1917941, 38496, 623, 14, 24, "Print",ExpressionUUID->"1b9cf5db-8e88-47ab-9d90-bdad5f1b68fe"],
+Cell[1918567, 38512, 18738, 396, 296, "Print",ExpressionUUID->"18f1a494-a175-46f3-bd70-4d02fba1fc2a"]
+}, Open  ]],
+Cell[1937320, 38911, 259, 5, 34, "Output",ExpressionUUID->"5a4940e7-c17a-4b2d-a6da-62cf09d7b1c7"],
+Cell[1937582, 38918, 625, 14, 24, "Print",ExpressionUUID->"14daf765-6f28-4f5d-bc35-a544be0c2f0b"],
+Cell[1938210, 38934, 257, 5, 34, "Output",ExpressionUUID->"0a80dd32-0887-48fd-b38f-13c5084a7a73"],
+Cell[CellGroupData[{
+Cell[1938492, 38943, 285, 6, 24, "Print",ExpressionUUID->"73a678e6-ba32-4526-8a36-165a9e5dde3b"],
+Cell[1938780, 38951, 502, 11, 24, "Print",ExpressionUUID->"af1dedeb-75b2-4c5f-b6d5-7775ae8ca43d"],
+Cell[1939285, 38964, 533, 12, 24, "Print",ExpressionUUID->"9c83cf1f-f686-4947-922c-8d264da87644"],
+Cell[1939821, 38978, 463, 11, 24, "Print",ExpressionUUID->"13c809f7-0e8c-4c6b-9175-54c8442a846e"],
+Cell[1940287, 38991, 397, 8, 44, "Print",ExpressionUUID->"a56ba7fd-7a82-478f-aaf1-0a8a5170e2ed"],
+Cell[1940687, 39001, 303, 6, 24, "Print",ExpressionUUID->"6ac500b9-6ba1-4515-bb30-0140a2a13b64"],
+Cell[1940993, 39009, 290, 6, 44, "Print",ExpressionUUID->"e3433f86-3d49-4360-99e2-39ecadb30aa1"]
+}, Open  ]]
+}, Open  ]],
+Cell[1941310, 39019, 296, 7, 30, "Input",ExpressionUUID->"ecd42304-902e-4024-9f46-7009f0ce5938"],
+Cell[1941609, 39028, 1913, 53, 220, "Input",ExpressionUUID->"e57cdab3-afd9-427f-89f7-863e6dfd567d"],
+Cell[CellGroupData[{
+Cell[1943547, 39085, 3457, 92, 346, "Input",ExpressionUUID->"25cf9944-5be2-40ab-999c-e1a6d72c9b57"],
+Cell[CellGroupData[{
+Cell[1947029, 39181, 344, 6, 24, "Print",ExpressionUUID->"98d2f184-f8b5-431d-b719-9532ec43c006"],
+Cell[1947376, 39189, 786, 17, 24, "Print",ExpressionUUID->"7d2280c4-7c8f-4431-a443-e63e708b205f"],
+Cell[1948165, 39208, 369, 6, 24, "Print",ExpressionUUID->"641d03a9-dda1-40c7-a400-fb8fe1d8c537"],
+Cell[1948537, 39216, 589, 12, 24, "Print",ExpressionUUID->"0935cc93-c75a-4797-85f7-dd61ff8f1aa4"],
+Cell[1949129, 39230, 346, 6, 24, "Print",ExpressionUUID->"20274d56-cfdf-4ca3-a453-12f29eee85ad"],
+Cell[1949478, 39238, 784, 17, 24, "Print",ExpressionUUID->"d4f9f1ff-adc3-4405-8915-b52096e2bfb2"],
+Cell[1950265, 39257, 780, 17, 24, "Print",ExpressionUUID->"5e5c0a11-3b1b-428f-b389-030fda590a10"],
+Cell[1951048, 39276, 344, 6, 24, "Print",ExpressionUUID->"41edee67-8147-4ddf-b8b3-2c972d97e4b0"],
+Cell[1951395, 39284, 983, 25, 24, "Print",ExpressionUUID->"cc54349c-d0e7-4b73-b74c-8e601e99a16c"],
+Cell[1952381, 39311, 344, 6, 24, "Print",ExpressionUUID->"3bf39df8-eb74-4b18-b17e-20f3c9f189e1"],
+Cell[1952728, 39319, 656, 13, 24, "Print",ExpressionUUID->"3a5f107a-2a2a-4855-bcfa-2d5a900d0fb8"],
+Cell[1953387, 39334, 368, 6, 24, "Print",ExpressionUUID->"48f2dfd7-4247-4cb9-bfdb-81172029752b"],
+Cell[1953758, 39342, 513, 11, 24, "Print",ExpressionUUID->"2fc7f28f-d458-454b-93d5-b9c23c226a88"],
+Cell[1954274, 39355, 543, 11, 24, "Print",ExpressionUUID->"912bf4cb-700e-4019-8592-3bd9e8ac121d"],
+Cell[1954820, 39368, 539, 11, 24, "Print",ExpressionUUID->"b2af981f-d490-4046-a578-2c1db2dd946f"],
+Cell[1955362, 39381, 583, 12, 24, "Print",ExpressionUUID->"3bec82a4-28b2-4b2c-b095-ebdac88e4385"],
+Cell[1955948, 39395, 344, 6, 24, "Print",ExpressionUUID->"2fa999d8-c24b-4cca-a146-145a53c65063"],
+Cell[1956295, 39403, 604, 13, 24, "Print",ExpressionUUID->"e74483bd-0eb5-4a50-b44c-b1445864199b"],
+Cell[1956902, 39418, 344, 6, 24, "Print",ExpressionUUID->"390712a1-4435-4b5b-920d-bfdd4ab0e4a5"],
+Cell[1957249, 39426, 543, 11, 24, "Print",ExpressionUUID->"ebacefc4-4391-400e-b7c4-00ba538b73c8"],
+Cell[1957795, 39439, 592, 12, 24, "Print",ExpressionUUID->"0392a59c-a493-4f7d-ba3a-81c8960bee91"],
+Cell[1958390, 39453, 590, 12, 24, "Print",ExpressionUUID->"56418129-8df4-485b-99fc-a9255bdc42ca"],
+Cell[1958983, 39467, 590, 12, 24, "Print",ExpressionUUID->"474670ff-0dbf-49a6-acba-5808fbfcaa4f"],
+Cell[1959576, 39481, 590, 12, 24, "Print",ExpressionUUID->"2107defa-d64f-41b1-b929-8c2559523df4"],
+Cell[1960169, 39495, 592, 12, 24, "Print",ExpressionUUID->"0bdddc97-eb68-4aee-abc1-976efa87a512"],
+Cell[1960764, 39509, 590, 12, 24, "Print",ExpressionUUID->"bbab9486-4a4e-4653-ab19-5411a353d70c"],
+Cell[1961357, 39523, 590, 12, 24, "Print",ExpressionUUID->"3e2dc1b6-3f32-4274-9f1f-f5a5b395e838"],
+Cell[1961950, 39537, 590, 12, 24, "Print",ExpressionUUID->"c24afb34-1f07-48ee-9d10-bd32ba9bff69"],
+Cell[1962543, 39551, 590, 12, 24, "Print",ExpressionUUID->"f746e358-263f-4d9d-8bce-697f70a8c1f0"],
+Cell[1963136, 39565, 592, 12, 24, "Print",ExpressionUUID->"a4f1c0fe-68cd-4ea6-91a2-516d2277c497"],
+Cell[1963731, 39579, 594, 12, 24, "Print",ExpressionUUID->"9631a95d-a354-4dd2-b950-31b0c1b65862"],
+Cell[1964328, 39593, 592, 12, 24, "Print",ExpressionUUID->"714b0dea-39f1-4f21-b716-a6f9cfc48117"],
+Cell[1964923, 39607, 594, 12, 24, "Print",ExpressionUUID->"190c4351-d809-4f28-b525-bbad979c6aa9"],
+Cell[1965520, 39621, 592, 12, 24, "Print",ExpressionUUID->"1a797554-ebec-4d21-aadc-6c85b39104d9"],
+Cell[1966115, 39635, 592, 12, 24, "Print",ExpressionUUID->"b5eb8ed0-7234-47ff-89bb-3f68eb29d8b6"],
+Cell[1966710, 39649, 592, 12, 24, "Print",ExpressionUUID->"5c3af5c3-475a-4e7a-a1cf-8139755ceb24"],
+Cell[1967305, 39663, 591, 12, 24, "Print",ExpressionUUID->"f6216273-5934-439d-a5a5-8e8283b2483b"],
+Cell[1967899, 39677, 592, 12, 24, "Print",ExpressionUUID->"e63a6dad-3964-43a6-b00f-6a30de03c956"],
+Cell[1968494, 39691, 592, 12, 24, "Print",ExpressionUUID->"fe3cf145-fe87-45d3-9b18-d63484012a17"],
+Cell[1969089, 39705, 592, 12, 24, "Print",ExpressionUUID->"995c82e4-de12-446f-b3c8-365c27a846df"],
+Cell[1969684, 39719, 594, 12, 24, "Print",ExpressionUUID->"9b768988-9d6f-4d10-8d7b-727a341783d7"],
+Cell[1970281, 39733, 594, 12, 24, "Print",ExpressionUUID->"f19df51a-9194-41a6-94d1-0e60a86240ac"],
+Cell[1970878, 39747, 592, 12, 24, "Print",ExpressionUUID->"7b0d2642-f652-4dc5-b7e8-558cd02dfde6"],
+Cell[1971473, 39761, 592, 12, 24, "Print",ExpressionUUID->"a235ae7d-f6b9-4d33-97f4-586aafd1c121"],
+Cell[1972068, 39775, 343, 6, 24, "Print",ExpressionUUID->"8c7a5c53-f58e-4c8a-84ae-b2fa82846a3a"],
+Cell[1972414, 39783, 539, 11, 24, "Print",ExpressionUUID->"21225e42-2fa6-4f5e-8234-816afb69b60f"],
+Cell[1972956, 39796, 521, 11, 24, "Print",ExpressionUUID->"c708e598-0982-4ade-b8bf-b4cee8fbc356"],
+Cell[1973480, 39809, 693, 15, 24, "Print",ExpressionUUID->"a09e2885-314f-4ad4-a5a5-9bc7a1978041"],
+Cell[1974176, 39826, 695, 15, 24, "Print",ExpressionUUID->"b4b2ddba-e4fd-405d-8f9b-ed4d80268f77"],
+Cell[1974874, 39843, 695, 15, 24, "Print",ExpressionUUID->"49ffff17-870c-4fd3-9fdf-3561d972d6ff"],
+Cell[1975572, 39860, 89261, 1769, 296, "Print",ExpressionUUID->"f49c3d36-7df3-42ed-987e-ae6c8e1a5a5a"]
+}, Open  ]],
+Cell[2064848, 41632, 448, 7, 34, "Output",ExpressionUUID->"7b8420a1-186a-4317-8a92-b10b0910f03c"],
+Cell[CellGroupData[{
+Cell[2065321, 41643, 693, 15, 24, "Print",ExpressionUUID->"91f1ad6c-1b8f-4043-b9e8-32984e161452"],
+Cell[2066017, 41660, 693, 15, 24, "Print",ExpressionUUID->"6cdd97b7-ce6a-4ad9-a880-3b0e0379a6f1"],
+Cell[2066713, 41677, 693, 15, 24, "Print",ExpressionUUID->"f962e94a-5e73-4474-b3fd-734f11918be3"]
+}, Open  ]],
+Cell[2067421, 41695, 446, 7, 34, "Output",ExpressionUUID->"587d6cfe-595c-4a70-bebf-3e63b3bbf3d9"],
+Cell[CellGroupData[{
+Cell[2067892, 41706, 344, 6, 24, "Print",ExpressionUUID->"ae35f0e8-6150-4b86-8953-a07626c485c5"],
+Cell[2068239, 41714, 604, 13, 24, "Print",ExpressionUUID->"b49b20f6-ce08-4e04-b7ab-8fd32d231830"],
+Cell[2068846, 41729, 344, 6, 24, "Print",ExpressionUUID->"05da6696-1677-4291-83ca-6d95dd6911ad"],
+Cell[2069193, 41737, 541, 11, 24, "Print",ExpressionUUID->"85843f8e-a907-4177-84d2-eb2d4b7bd53f"],
+Cell[2069737, 41750, 590, 12, 24, "Print",ExpressionUUID->"4e1596e4-a689-4f20-a48b-7cd6014e9776"],
+Cell[2070330, 41764, 592, 12, 24, "Print",ExpressionUUID->"4f2c8132-b88b-42d5-879e-715db56d02f0"],
+Cell[2070925, 41778, 592, 12, 24, "Print",ExpressionUUID->"4d29ddd3-3d51-44a1-ac01-7ace46c1a207"],
+Cell[2071520, 41792, 590, 12, 24, "Print",ExpressionUUID->"e383eb2c-db59-44ff-9447-fcb7f2bb6b00"],
+Cell[2072113, 41806, 592, 12, 24, "Print",ExpressionUUID->"d1b7c23d-63db-45cc-9100-a71e903567cf"],
+Cell[2072708, 41820, 590, 12, 24, "Print",ExpressionUUID->"ce4d3620-8f8e-4146-a5e2-ac5c262d8dc8"],
+Cell[2073301, 41834, 590, 12, 24, "Print",ExpressionUUID->"0f38b972-fdab-499e-a8cc-cfc104707d0c"],
+Cell[2073894, 41848, 590, 12, 24, "Print",ExpressionUUID->"25583a47-b21e-41c6-b3ec-5ee875fe638d"],
+Cell[2074487, 41862, 590, 12, 24, "Print",ExpressionUUID->"31ca5af5-29e2-4fb0-b6cd-06b21819aaf9"],
+Cell[2075080, 41876, 592, 12, 24, "Print",ExpressionUUID->"c885f372-31a7-4908-a6c2-88166a350123"],
+Cell[2075675, 41890, 592, 12, 24, "Print",ExpressionUUID->"9728ca2f-5dab-41b6-90c7-0239e661ca51"],
+Cell[2076270, 41904, 594, 12, 24, "Print",ExpressionUUID->"bf505b0a-1ee7-4f68-81af-aa1879102d5e"],
+Cell[2076867, 41918, 346, 6, 24, "Print",ExpressionUUID->"5ac5dc7a-a338-493a-a6be-037b9c5d1fa1"],
+Cell[2077216, 41926, 539, 11, 24, "Print",ExpressionUUID->"e0c7467d-f9a0-4b83-87cb-6cb354350448"],
+Cell[2077758, 41939, 522, 11, 24, "Print",ExpressionUUID->"74e5fb5e-09a1-4269-9c67-2fc42bdbecc5"],
+Cell[2078283, 41952, 692, 15, 24, "Print",ExpressionUUID->"80962cc2-25b7-4a6b-a950-ce0262e17a97"],
+Cell[2078978, 41969, 695, 15, 24, "Print",ExpressionUUID->"7256350e-383b-47ea-8c8f-e59ec3f52952"],
+Cell[2079676, 41986, 691, 15, 24, "Print",ExpressionUUID->"a08f884c-a77a-45aa-998f-f5710af7811f"],
+Cell[2080370, 42003, 76753, 1542, 296, "Print",ExpressionUUID->"ec92f692-6fdd-4263-850c-ba62394d9a87"],
+Cell[2157126, 43547, 693, 15, 24, "Print",ExpressionUUID->"7c7f8b93-b927-425e-ab01-cf546e6cdf5d"],
+Cell[2157822, 43564, 693, 15, 24, "Print",ExpressionUUID->"176c0399-057a-42a2-8c9a-4465706e52b9"],
+Cell[2158518, 43581, 695, 15, 24, "Print",ExpressionUUID->"c0581993-8174-49cf-8874-6ef4337119f2"]
+}, Open  ]],
+Cell[2159228, 43599, 446, 7, 34, "Output",ExpressionUUID->"aec8077f-5cd5-42fa-808b-023ccfeca0d0"],
+Cell[CellGroupData[{
+Cell[2159699, 43610, 346, 6, 24, "Print",ExpressionUUID->"c3273a63-926b-46f5-9be9-a507d827bc09"],
+Cell[2160048, 43618, 563, 11, 24, "Print",ExpressionUUID->"1f0fed8f-446b-4bc6-ae2b-0d6447bf1fb2"],
+Cell[2160614, 43631, 590, 12, 24, "Print",ExpressionUUID->"bf3f6d04-beb8-4508-af9a-cb0c0d3b0317"],
+Cell[2161207, 43645, 592, 12, 24, "Print",ExpressionUUID->"352330ef-de6c-4199-969c-95de1706a0b9"],
+Cell[2161802, 43659, 590, 12, 24, "Print",ExpressionUUID->"f7ed884f-8cec-44e0-9cfb-8f9cbd67a4e6"],
+Cell[2162395, 43673, 524, 11, 24, "Print",ExpressionUUID->"98f9df52-b30c-4401-b25d-143fe3dbf7b6"],
+Cell[2162922, 43686, 445, 8, 44, "Print",ExpressionUUID->"ad734690-10db-45a6-8e90-c1cd1841a288"],
+Cell[2163370, 43696, 360, 6, 24, "Print",ExpressionUUID->"83bacd40-e2da-452e-a508-27be504cdf56"],
+Cell[2163733, 43704, 349, 6, 44, "Print",ExpressionUUID->"db0d7d73-f5fd-4302-ac71-e7dabd74cdcb"],
+Cell[2164085, 43712, 344, 6, 24, "Print",ExpressionUUID->"91c17410-cacf-4533-b0a5-bfc810eab141"],
+Cell[2164432, 43720, 561, 11, 24, "Print",ExpressionUUID->"1d2df74e-1959-4b97-ab89-9289399db689"],
+Cell[2164996, 43733, 592, 12, 24, "Print",ExpressionUUID->"3bfb67a1-e07a-4599-9d75-739482386684"],
+Cell[2165591, 43747, 590, 12, 24, "Print",ExpressionUUID->"558907a6-e96b-478f-be57-b0590bed3046"],
+Cell[2166184, 43761, 590, 12, 24, "Print",ExpressionUUID->"e2cafdf8-8d71-4ca4-bf2a-141ebca41729"],
+Cell[2166777, 43775, 524, 11, 24, "Print",ExpressionUUID->"eb5b65fd-54ea-4a5e-ac7c-dbbc01dbd204"],
+Cell[2167304, 43788, 445, 8, 44, "Print",ExpressionUUID->"428a0e4e-2c64-4e49-abce-82977beb4da3"],
+Cell[2167752, 43798, 362, 6, 24, "Print",ExpressionUUID->"e89ac08f-6deb-49a4-887d-23373baa7e4e"],
+Cell[2168117, 43806, 349, 6, 44, "Print",ExpressionUUID->"6fc847a1-7579-4e18-aee3-fdeded84679f"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[2168515, 43818, 2101, 51, 262, "Input",ExpressionUUID->"00b2ebfa-faf2-401d-8f84-2e8996fb70f1"],
+Cell[CellGroupData[{
+Cell[2170641, 43873, 290, 5, 24, "Print",ExpressionUUID->"482b7b69-f6b4-45f1-9a2c-0ab150cda602"],
+Cell[2170934, 43880, 279, 5, 24, "Print",ExpressionUUID->"0c57c097-c2e6-40bd-9ede-f2c4dc3c9965"],
+Cell[2171216, 43887, 721, 16, 24, "Print",ExpressionUUID->"7b632676-1202-4f79-a69d-8d737bde6c17"],
+Cell[2171940, 43905, 302, 5, 24, "Print",ExpressionUUID->"efc9d648-68f3-4c34-96f0-b963370877bd"],
+Cell[2172245, 43912, 524, 11, 24, "Print",ExpressionUUID->"465fc068-514c-4e6f-8a5c-4d5fed7eff58"],
+Cell[2172772, 43925, 279, 5, 24, "Print",ExpressionUUID->"15604b7f-08c1-4262-927e-197c4eb46a1c"],
+Cell[2173054, 43932, 719, 16, 24, "Print",ExpressionUUID->"92ab9642-e7a8-40b2-a260-4fb5048c8e9f"],
+Cell[2173776, 43950, 715, 16, 24, "Print",ExpressionUUID->"6c7d441d-fe7c-4fc0-9501-ad4b5c30c80d"],
+Cell[2174494, 43968, 279, 5, 24, "Print",ExpressionUUID->"37f80417-15b7-48cf-8bf2-cf4f12f655ee"],
+Cell[2174776, 43975, 918, 24, 24, "Print",ExpressionUUID->"86eb6596-d624-463b-8591-7765cce1e4c8"],
+Cell[2175697, 44001, 279, 5, 24, "Print",ExpressionUUID->"20329460-4c5a-4694-95bf-5fce24890b13"],
+Cell[2175979, 44008, 593, 12, 24, "Print",ExpressionUUID->"45504770-301f-4888-a0e5-648d6f27e060"],
+Cell[2176575, 44022, 303, 5, 24, "Print",ExpressionUUID->"6f91bd5e-4a6b-4381-a2ae-1f4dc802e7c5"],
+Cell[2176881, 44029, 448, 10, 24, "Print",ExpressionUUID->"74c3926f-183a-4796-9f57-f03092638243"],
+Cell[2177332, 44041, 480, 10, 24, "Print",ExpressionUUID->"fc1dd8ec-c4f8-4f22-98fc-f8943764731a"],
+Cell[2177815, 44053, 474, 10, 24, "Print",ExpressionUUID->"e8020980-812a-45ef-99b7-7d58bed40356"],
+Cell[2178292, 44065, 518, 11, 24, "Print",ExpressionUUID->"4233b12a-ff83-4b7d-993d-36f01140b6c8"],
+Cell[2178813, 44078, 279, 5, 24, "Print",ExpressionUUID->"47869948-ecd1-4af9-b875-01df3bf192d7"],
+Cell[2179095, 44085, 539, 12, 24, "Print",ExpressionUUID->"1ac59348-d86e-46cf-81f6-7f07deec8e69"],
+Cell[2179637, 44099, 281, 5, 24, "Print",ExpressionUUID->"be4046f4-afc7-46ab-9b4c-a12a208d214d"],
+Cell[2179921, 44106, 476, 10, 24, "Print",ExpressionUUID->"590ed1f5-2d5e-4d52-aa2a-521524e47125"],
+Cell[2180400, 44118, 525, 11, 24, "Print",ExpressionUUID->"b00f9b05-f586-43f6-a3ac-47ee5596a4a4"],
+Cell[2180928, 44131, 525, 11, 24, "Print",ExpressionUUID->"4c16b8a2-7923-47bc-bf55-a401337b086e"],
+Cell[2181456, 44144, 527, 11, 24, "Print",ExpressionUUID->"9a4d1373-6745-46e2-bedf-084ceeeb3992"],
+Cell[2181986, 44157, 527, 11, 24, "Print",ExpressionUUID->"86eed2fa-2419-4af5-950e-468c5fc8760b"],
+Cell[2182516, 44170, 525, 11, 24, "Print",ExpressionUUID->"a2282fbf-8887-4e98-9477-9d5f6d1b2b9b"],
+Cell[2183044, 44183, 527, 11, 24, "Print",ExpressionUUID->"f91c9250-7da2-47b4-b52f-a65e91fecc0d"],
+Cell[2183574, 44196, 525, 11, 24, "Print",ExpressionUUID->"3fd83e52-022c-4dbd-84be-a23f1b8c12e9"],
+Cell[2184102, 44209, 525, 11, 24, "Print",ExpressionUUID->"ed764292-1653-4656-a2ea-b82e47346fda"],
+Cell[2184630, 44222, 527, 11, 24, "Print",ExpressionUUID->"d5b36eaf-2487-4de7-82f2-b741d9ff15c6"],
+Cell[2185160, 44235, 527, 11, 24, "Print",ExpressionUUID->"fa11260b-327f-4c3a-9b78-8fac30899110"],
+Cell[2185690, 44248, 527, 11, 24, "Print",ExpressionUUID->"cf4549a7-9aec-4ae6-b884-a3b47e57e099"],
+Cell[2186220, 44261, 527, 11, 24, "Print",ExpressionUUID->"a0755672-a28d-4254-9cac-c3e536d5488a"],
+Cell[2186750, 44274, 529, 11, 24, "Print",ExpressionUUID->"3d0c39fc-4140-4797-b15f-2a88b053444b"],
+Cell[2187282, 44287, 526, 11, 24, "Print",ExpressionUUID->"52f23fe7-2ec8-44d5-b8e2-6d9fefdbcf5f"],
+Cell[2187811, 44300, 525, 11, 24, "Print",ExpressionUUID->"f84fac8b-9b5b-42cd-991e-5c15019c3cd9"],
+Cell[2188339, 44313, 527, 11, 24, "Print",ExpressionUUID->"44871153-0c3e-4261-b73e-52b51d05fc29"],
+Cell[2188869, 44326, 527, 11, 24, "Print",ExpressionUUID->"fe1e6cc7-5408-44e7-8eeb-74c2eb17bd31"],
+Cell[2189399, 44339, 527, 11, 24, "Print",ExpressionUUID->"cd8ba6ab-b5cd-4451-aa7a-29b82c645660"],
+Cell[2189929, 44352, 526, 11, 24, "Print",ExpressionUUID->"86b6b92f-22a6-41ea-a987-474e9174f33c"],
+Cell[2190458, 44365, 527, 11, 24, "Print",ExpressionUUID->"442012e3-dd0e-4dd2-b282-d35c7ffd1a11"],
+Cell[2190988, 44378, 529, 11, 24, "Print",ExpressionUUID->"072923e0-44bc-4646-8b2b-8029d067181f"],
+Cell[2191520, 44391, 529, 11, 24, "Print",ExpressionUUID->"40d18e24-52a9-42ea-b976-6b2bac192ef3"],
+Cell[2192052, 44404, 527, 11, 24, "Print",ExpressionUUID->"f741ced5-cc41-4bba-87d3-6967a7ce4de3"],
+Cell[2192582, 44417, 527, 11, 24, "Print",ExpressionUUID->"4a12258b-acbc-40e4-85d5-b71956bf9f9f"],
+Cell[2193112, 44430, 529, 11, 24, "Print",ExpressionUUID->"26ee02c5-01be-4a5b-8e23-7b5740ecf00b"],
+Cell[2193644, 44443, 527, 11, 24, "Print",ExpressionUUID->"909aa5cc-4cf1-4134-a6db-623eceea8f95"],
+Cell[2194174, 44456, 527, 11, 24, "Print",ExpressionUUID->"ab74d7c3-3bca-48f9-bf90-91962ad793e3"],
+Cell[2194704, 44469, 527, 11, 24, "Print",ExpressionUUID->"2c6d20cb-61d0-477f-9eff-cd5b3c58115b"],
+Cell[2195234, 44482, 527, 11, 24, "Print",ExpressionUUID->"9e1d5d63-95ee-468c-a45a-47a173b62ea5"],
+Cell[2195764, 44495, 527, 11, 24, "Print",ExpressionUUID->"ea1b6e3c-1593-4687-9e7e-bca79b39d679"],
+Cell[2196294, 44508, 529, 11, 24, "Print",ExpressionUUID->"2a96830a-2747-4078-94d6-30d3e432c5ec"],
+Cell[2196826, 44521, 527, 11, 24, "Print",ExpressionUUID->"d8801fc7-5e71-4a0b-b0da-acd196653a94"],
+Cell[2197356, 44534, 527, 11, 24, "Print",ExpressionUUID->"49d5de5e-b904-4599-a241-7c89f29d1c18"],
+Cell[2197886, 44547, 527, 11, 24, "Print",ExpressionUUID->"c409cffb-eb72-4313-9ded-9e7646df22b8"],
+Cell[2198416, 44560, 527, 11, 24, "Print",ExpressionUUID->"a9c42256-77b6-4966-953f-996e7f4424fd"],
+Cell[2198946, 44573, 527, 11, 24, "Print",ExpressionUUID->"c971b94c-7055-46e8-8f42-92bf62b417a1"],
+Cell[2199476, 44586, 527, 11, 24, "Print",ExpressionUUID->"fde8093f-3013-4f73-a87e-3fee062234c5"],
+Cell[2200006, 44599, 527, 11, 24, "Print",ExpressionUUID->"0d001629-ce93-4b92-a44e-6adbc7bbc315"],
+Cell[2200536, 44612, 527, 11, 24, "Print",ExpressionUUID->"9de29004-3c47-42de-97d9-7e5021721326"],
+Cell[2201066, 44625, 526, 11, 24, "Print",ExpressionUUID->"9e2c960c-02fe-4d54-9bf0-10ade211cdc6"],
+Cell[2201595, 44638, 527, 11, 24, "Print",ExpressionUUID->"f4d5c5bd-c09b-404f-83f1-6121f361aa55"],
+Cell[2202125, 44651, 527, 11, 24, "Print",ExpressionUUID->"c2b1216d-3ba1-4577-b3dd-8eb87edd64b9"],
+Cell[2202655, 44664, 527, 11, 24, "Print",ExpressionUUID->"ddae031d-a3a3-4573-a96f-d2a32183f65b"],
+Cell[2203185, 44677, 529, 11, 24, "Print",ExpressionUUID->"83080bc6-77f6-41f9-a6f7-5d45b0a3f5ee"],
+Cell[2203717, 44690, 527, 11, 24, "Print",ExpressionUUID->"5940abce-ac3d-439e-a874-8677dc5b62f9"],
+Cell[2204247, 44703, 529, 11, 24, "Print",ExpressionUUID->"a2a7e806-c823-4891-89c9-0514dcb2ba9f"],
+Cell[2204779, 44716, 527, 11, 24, "Print",ExpressionUUID->"eeda71c5-85db-4b6f-b072-1530f5f1b204"],
+Cell[2205309, 44729, 527, 11, 24, "Print",ExpressionUUID->"e6bbf982-d710-4652-a41f-fe78241c97ff"],
+Cell[2205839, 44742, 529, 11, 24, "Print",ExpressionUUID->"c2a7cf39-1dde-4342-bfba-3560297d5bf6"],
+Cell[2206371, 44755, 527, 11, 24, "Print",ExpressionUUID->"4a20e63b-cbef-4cce-83e8-c2c3f33bc1fd"],
+Cell[2206901, 44768, 529, 11, 24, "Print",ExpressionUUID->"c28ef418-a99d-4b61-8bda-90e9cd0dbc5d"],
+Cell[2207433, 44781, 529, 11, 24, "Print",ExpressionUUID->"bfd191bf-55aa-4710-bfe9-d73cb6383e16"],
+Cell[2207965, 44794, 527, 11, 24, "Print",ExpressionUUID->"808f6012-a961-4e65-bd29-7a53e0ee4e62"],
+Cell[2208495, 44807, 527, 11, 24, "Print",ExpressionUUID->"e1e4a029-d8bb-42f1-8e4d-877284e9ddf5"],
+Cell[2209025, 44820, 527, 11, 24, "Print",ExpressionUUID->"2f798775-721b-43c9-835a-b5ca45d457ac"],
+Cell[2209555, 44833, 529, 11, 24, "Print",ExpressionUUID->"80804efd-1ff8-442a-9e90-4a1205f6bd84"],
+Cell[2210087, 44846, 527, 11, 24, "Print",ExpressionUUID->"fc10ef62-f7de-4da3-b483-c1d974b88f2b"],
+Cell[2210617, 44859, 527, 11, 24, "Print",ExpressionUUID->"b5069cbe-8912-484a-beff-19781e878655"],
+Cell[2211147, 44872, 529, 11, 24, "Print",ExpressionUUID->"0966a11d-4882-4b30-8b31-023a0b8dddaf"],
+Cell[2211679, 44885, 529, 11, 24, "Print",ExpressionUUID->"8cd6cb1b-0482-4344-8799-19acc4683bb7"],
+Cell[2212211, 44898, 526, 11, 24, "Print",ExpressionUUID->"2549f2b3-f306-4cd4-a6f8-81daf0343e2a"],
+Cell[2212740, 44911, 527, 11, 24, "Print",ExpressionUUID->"e992dbcc-c3eb-496c-9aac-5a1569a2a1ea"],
+Cell[2213270, 44924, 529, 11, 24, "Print",ExpressionUUID->"096a688f-5ef8-479f-82e9-f640aa79a4aa"],
+Cell[2213802, 44937, 527, 11, 24, "Print",ExpressionUUID->"22ac10c8-525d-4e43-8c86-670c84529870"],
+Cell[2214332, 44950, 529, 11, 24, "Print",ExpressionUUID->"a0290ced-13d0-4a1e-a400-7e3373d885a6"],
+Cell[2214864, 44963, 527, 11, 24, "Print",ExpressionUUID->"bcfae30e-7bcd-4dd3-8dc6-32b6a9fbba88"],
+Cell[2215394, 44976, 527, 11, 24, "Print",ExpressionUUID->"e0c9f492-f3f4-473f-b226-e2f4e1da03be"],
+Cell[2215924, 44989, 527, 11, 24, "Print",ExpressionUUID->"4a28e937-cbb7-4ff2-8b85-030bc207001b"],
+Cell[2216454, 45002, 527, 11, 24, "Print",ExpressionUUID->"d43e20fa-75e4-44dc-bf1a-9a3930b2102f"],
+Cell[2216984, 45015, 529, 11, 24, "Print",ExpressionUUID->"f3470329-cbfe-4aab-9a92-7fe3182802d3"],
+Cell[2217516, 45028, 527, 11, 24, "Print",ExpressionUUID->"33e6d154-8864-4961-84af-7b088d0c1d6d"],
+Cell[2218046, 45041, 529, 11, 24, "Print",ExpressionUUID->"0a1cc530-3504-4e6c-8ca2-108d9e0929dc"],
+Cell[2218578, 45054, 529, 11, 24, "Print",ExpressionUUID->"8859e214-8f28-458a-86f7-9845a83b59c6"],
+Cell[2219110, 45067, 527, 11, 24, "Print",ExpressionUUID->"3494269d-7ca8-4840-94b7-7df30938c5c5"],
+Cell[2219640, 45080, 527, 11, 24, "Print",ExpressionUUID->"64304681-dd46-4470-b392-15116814eed3"],
+Cell[2220170, 45093, 527, 11, 24, "Print",ExpressionUUID->"b8bb4c71-bd91-47e1-85e7-7cc74ae339ea"],
+Cell[2220700, 45106, 527, 11, 24, "Print",ExpressionUUID->"a9fc632b-ac2e-4d12-845f-6ba9bb0fb88a"],
+Cell[2221230, 45119, 527, 11, 24, "Print",ExpressionUUID->"14e5e342-04db-42f9-9dcd-e54b27381556"],
+Cell[2221760, 45132, 527, 11, 24, "Print",ExpressionUUID->"68cbb07b-ff1b-41d2-9408-97a139ca04b4"],
+Cell[2222290, 45145, 527, 11, 24, "Print",ExpressionUUID->"ade50005-dc22-4549-8c48-ca1c2f4f6179"],
+Cell[2222820, 45158, 527, 11, 24, "Print",ExpressionUUID->"f19201e5-fa6c-4df3-8177-4f4d85a0deb0"],
+Cell[2223350, 45171, 526, 11, 24, "Print",ExpressionUUID->"376cdf29-de05-4896-8cd1-d653f4329951"],
+Cell[2223879, 45184, 527, 11, 24, "Print",ExpressionUUID->"5d1726ba-e7c8-4ea5-8383-70a46e2dca56"],
+Cell[2224409, 45197, 527, 11, 24, "Print",ExpressionUUID->"6289e36d-04de-4e90-8bc7-fea404ee7ae6"],
+Cell[2224939, 45210, 527, 11, 24, "Print",ExpressionUUID->"1596e7c3-f4a0-4f54-b46b-5c85de8d227b"],
+Cell[2225469, 45223, 527, 11, 24, "Print",ExpressionUUID->"aa60764a-022f-4534-b590-7985930ab71d"],
+Cell[2225999, 45236, 527, 11, 24, "Print",ExpressionUUID->"a63d9a20-9fcd-42aa-8251-229ed14fcf0b"],
+Cell[2226529, 45249, 527, 11, 24, "Print",ExpressionUUID->"d5e47eff-33fd-4ab0-a3ec-3f56a6fef96b"],
+Cell[2227059, 45262, 529, 11, 24, "Print",ExpressionUUID->"237304f0-3673-4c2d-afe8-3d7a7ebe249b"],
+Cell[2227591, 45275, 527, 11, 24, "Print",ExpressionUUID->"c829a173-07f8-4df8-8e1f-eb918a3bc6b1"],
+Cell[2228121, 45288, 527, 11, 24, "Print",ExpressionUUID->"e4453bd4-d618-4b7a-b024-d657ef4957f5"],
+Cell[2228651, 45301, 527, 11, 24, "Print",ExpressionUUID->"933e4c6a-54c2-4415-a419-34b52bcef5e4"],
+Cell[2229181, 45314, 527, 11, 24, "Print",ExpressionUUID->"3754f430-9482-4b0e-8e5a-78228e95e7b7"],
+Cell[2229711, 45327, 527, 11, 24, "Print",ExpressionUUID->"e5e28447-4da0-428d-adeb-3d0f178dc854"],
+Cell[2230241, 45340, 526, 11, 24, "Print",ExpressionUUID->"9e930076-0112-457d-9050-59d77b2c3f51"],
+Cell[2230770, 45353, 527, 11, 24, "Print",ExpressionUUID->"83743332-28b4-4f4e-9a55-e7411e838cac"],
+Cell[2231300, 45366, 529, 11, 24, "Print",ExpressionUUID->"5a867892-be28-4a5c-913a-cd64118dc1aa"],
+Cell[2231832, 45379, 527, 11, 24, "Print",ExpressionUUID->"29b71846-a025-4f89-ac63-d818a7f3b614"],
+Cell[2232362, 45392, 529, 11, 24, "Print",ExpressionUUID->"2bd90177-8624-44ca-892b-190c3a5e0d65"],
+Cell[2232894, 45405, 529, 11, 24, "Print",ExpressionUUID->"989dc8a4-be6f-4994-baba-bfd5217241d3"],
+Cell[2233426, 45418, 531, 11, 24, "Print",ExpressionUUID->"1c9dc131-7797-4b61-86ac-5a0c1a0a4d7e"],
+Cell[2233960, 45431, 529, 11, 24, "Print",ExpressionUUID->"1d94d72f-145b-438f-8c3f-eff4ed502617"],
+Cell[2234492, 45444, 529, 11, 24, "Print",ExpressionUUID->"5d87cb98-4c45-4ac9-8d66-d3bacef1ff18"],
+Cell[2235024, 45457, 529, 11, 24, "Print",ExpressionUUID->"9a5bfff7-85c1-4ea1-ac44-b7fe9bc3fabd"],
+Cell[2235556, 45470, 529, 11, 24, "Print",ExpressionUUID->"5465c028-f2a0-4734-a77c-141afa5f82a0"],
+Cell[2236088, 45483, 529, 11, 24, "Print",ExpressionUUID->"c3ca4913-3ce5-4844-9e77-ce5def9e7fbc"],
+Cell[2236620, 45496, 529, 11, 24, "Print",ExpressionUUID->"ae7ec018-75eb-4d88-8e45-5e2518b17411"],
+Cell[2237152, 45509, 529, 11, 24, "Print",ExpressionUUID->"cd4cfb19-6da6-4b99-a609-cb200d0a907d"],
+Cell[2237684, 45522, 529, 11, 24, "Print",ExpressionUUID->"8751b8fd-1b76-40cd-a0f1-a95a97697501"],
+Cell[2238216, 45535, 529, 11, 24, "Print",ExpressionUUID->"1e8c121e-fe1b-4f53-a047-bd73813541da"],
+Cell[2238748, 45548, 528, 11, 24, "Print",ExpressionUUID->"e66c3f4d-4baf-43ee-ad7d-f1cdb877d6d2"],
+Cell[2239279, 45561, 529, 11, 24, "Print",ExpressionUUID->"307c1338-c863-48ee-ba46-8040507dbaf1"],
+Cell[2239811, 45574, 529, 11, 24, "Print",ExpressionUUID->"8428cf6f-dc5d-4ec1-bda1-2e9ec4425dc7"],
+Cell[2240343, 45587, 529, 11, 24, "Print",ExpressionUUID->"586bdfd8-dbe8-4cd4-ad63-16d68f420351"],
+Cell[2240875, 45600, 529, 11, 24, "Print",ExpressionUUID->"1ce4b55a-4462-4f08-beec-bfc80aeafc16"],
+Cell[2241407, 45613, 529, 11, 24, "Print",ExpressionUUID->"fbf84094-2be0-4b4e-b2a7-1f47a58f31a4"],
+Cell[2241939, 45626, 529, 11, 24, "Print",ExpressionUUID->"c7c1d120-76e4-4976-bf75-6d286d33f0af"],
+Cell[2242471, 45639, 529, 11, 24, "Print",ExpressionUUID->"40f00b9a-f076-4a98-b7fb-d2699bfe1e97"],
+Cell[2243003, 45652, 529, 11, 24, "Print",ExpressionUUID->"9aea03ae-78fb-46a4-959c-a632ddd3daaa"],
+Cell[2243535, 45665, 529, 11, 24, "Print",ExpressionUUID->"76d91400-d6dc-462b-b084-79572499fab2"],
+Cell[2244067, 45678, 529, 11, 24, "Print",ExpressionUUID->"97422370-545d-42ab-bc13-4ee2d682e759"],
+Cell[2244599, 45691, 529, 11, 24, "Print",ExpressionUUID->"b21763c2-bbe3-46ab-8865-385f591d934d"],
+Cell[2245131, 45704, 529, 11, 24, "Print",ExpressionUUID->"23d43de6-7477-4fc9-a2c8-82a3b7649e4c"],
+Cell[2245663, 45717, 529, 11, 24, "Print",ExpressionUUID->"996eb42f-d851-402a-836d-d4d08d0227e0"],
+Cell[2246195, 45730, 531, 11, 24, "Print",ExpressionUUID->"994f9d96-4be2-4fd5-956b-db163a49ff23"],
+Cell[2246729, 45743, 531, 11, 24, "Print",ExpressionUUID->"5f2069c4-cd84-4600-b781-1e0cf77be806"],
+Cell[2247263, 45756, 531, 11, 24, "Print",ExpressionUUID->"525bc282-fd37-467e-8572-423278fbcdd4"],
+Cell[2247797, 45769, 529, 11, 24, "Print",ExpressionUUID->"8dbd8c81-2f54-4c1e-86e3-4068bebc0392"],
+Cell[2248329, 45782, 529, 11, 24, "Print",ExpressionUUID->"de29cfe5-bd1d-4218-8f3c-2ad061965406"],
+Cell[2248861, 45795, 529, 11, 24, "Print",ExpressionUUID->"d7bd272b-523a-4d0d-bdb9-13a8ab9c0035"],
+Cell[2249393, 45808, 529, 11, 24, "Print",ExpressionUUID->"8b339b22-b856-40eb-bfaf-5abe17906184"],
+Cell[2249925, 45821, 528, 11, 24, "Print",ExpressionUUID->"c1418234-3828-4e6b-a7e3-10dc4d4fd069"],
+Cell[2250456, 45834, 531, 11, 24, "Print",ExpressionUUID->"19079ee2-5f3c-44db-ab1c-2276bd747d64"],
+Cell[2250990, 45847, 529, 11, 24, "Print",ExpressionUUID->"184b99b6-3396-4806-8cc1-a8c97c30271e"],
+Cell[2251522, 45860, 529, 11, 24, "Print",ExpressionUUID->"9abf7886-0435-4716-adae-2b40526a092b"],
+Cell[2252054, 45873, 531, 11, 24, "Print",ExpressionUUID->"4cdb8b07-6ea3-4251-aea9-de18730afe7d"],
+Cell[2252588, 45886, 529, 11, 24, "Print",ExpressionUUID->"362ddbbc-9592-4a4a-9415-8ae9c7f530ad"],
+Cell[2253120, 45899, 531, 11, 24, "Print",ExpressionUUID->"4b1a34ec-d25c-4125-9e16-fa0442261592"],
+Cell[2253654, 45912, 528, 11, 24, "Print",ExpressionUUID->"ae0838c5-1d04-4af1-8968-3e10ca495bbf"],
+Cell[2254185, 45925, 529, 11, 24, "Print",ExpressionUUID->"1d9d9f94-eb7d-40a4-8e3f-2f0185517645"],
+Cell[2254717, 45938, 531, 11, 24, "Print",ExpressionUUID->"98b19f6e-57f2-4b12-8e98-66a70b62cffe"],
+Cell[2255251, 45951, 531, 11, 24, "Print",ExpressionUUID->"f51fe13e-3dc0-4302-91af-6b45682d4dc1"],
+Cell[2255785, 45964, 529, 11, 24, "Print",ExpressionUUID->"b8da9f1f-ca1b-4c13-9da7-68d2d30d181c"],
+Cell[2256317, 45977, 531, 11, 24, "Print",ExpressionUUID->"d03f960d-a985-4724-b525-dd7047d7d869"],
+Cell[2256851, 45990, 529, 11, 24, "Print",ExpressionUUID->"5fae7711-eb05-48a7-8e45-39de243c9901"],
+Cell[2257383, 46003, 531, 11, 24, "Print",ExpressionUUID->"9058a6ec-2677-4390-b62a-f7f1aa0bb92a"],
+Cell[2257917, 46016, 529, 11, 24, "Print",ExpressionUUID->"b0d7f8aa-1f5d-4d67-9741-4fc437add9f7"],
+Cell[2258449, 46029, 531, 11, 24, "Print",ExpressionUUID->"e15ab415-af93-4c41-bc39-e22f0c3c38be"],
+Cell[2258983, 46042, 529, 11, 24, "Print",ExpressionUUID->"e7d661ab-9386-45ff-8a04-87e1c95ff8b4"],
+Cell[2259515, 46055, 529, 11, 24, "Print",ExpressionUUID->"9f9aa58f-3b1f-4808-b047-c967807c4e93"],
+Cell[2260047, 46068, 531, 11, 24, "Print",ExpressionUUID->"d959dcef-4e60-48c1-a7a6-aafa63b4148a"],
+Cell[2260581, 46081, 531, 11, 24, "Print",ExpressionUUID->"ac11dbe3-d591-4f32-ad94-f779d0c8400b"],
+Cell[2261115, 46094, 529, 11, 24, "Print",ExpressionUUID->"ce4a7715-19ce-46fb-b822-28d77a0fabf1"],
+Cell[2261647, 46107, 529, 11, 24, "Print",ExpressionUUID->"6bb08b23-3c72-4e5b-abc7-73003c3fc261"],
+Cell[2262179, 46120, 529, 11, 24, "Print",ExpressionUUID->"b20c75c7-1181-4a1b-b8ac-e72e92b50561"],
+Cell[2262711, 46133, 528, 11, 24, "Print",ExpressionUUID->"ebd998cf-24bb-4eb2-83c3-8ad397fb14cc"],
+Cell[2263242, 46146, 529, 11, 24, "Print",ExpressionUUID->"bc838b1a-6863-4410-bda0-39dc771ed636"],
+Cell[2263774, 46159, 528, 11, 24, "Print",ExpressionUUID->"d9e7c7db-572d-4067-861e-cbf3afe77521"],
+Cell[2264305, 46172, 529, 11, 24, "Print",ExpressionUUID->"ae8782cc-581e-4f76-a939-956fffe0ace6"],
+Cell[2264837, 46185, 529, 11, 24, "Print",ExpressionUUID->"4a0d7cc3-4eba-4f89-a344-fd6a32562e1b"],
+Cell[2265369, 46198, 531, 11, 24, "Print",ExpressionUUID->"35db92c4-0d44-4217-afab-d426be163229"],
+Cell[2265903, 46211, 531, 11, 24, "Print",ExpressionUUID->"2fdcf078-527a-4c0d-8e30-58706d244691"],
+Cell[2266437, 46224, 529, 11, 24, "Print",ExpressionUUID->"fc6a23a1-f2b2-47b5-987d-323a5a88fd8b"],
+Cell[2266969, 46237, 529, 11, 24, "Print",ExpressionUUID->"5776850a-a04a-49e6-ac40-400c4f896b2d"],
+Cell[2267501, 46250, 529, 11, 24, "Print",ExpressionUUID->"e96f9759-0bef-4290-bd3b-3503f0b0a411"],
+Cell[2268033, 46263, 529, 11, 24, "Print",ExpressionUUID->"5b70a5af-6e87-4b06-a20e-1410998f03dd"],
+Cell[2268565, 46276, 529, 11, 24, "Print",ExpressionUUID->"7d094c60-e2f8-44a0-af91-9cf9d4e2fe15"],
+Cell[2269097, 46289, 528, 11, 24, "Print",ExpressionUUID->"3bf08d18-0602-4a03-909c-894e3bf74dcf"],
+Cell[2269628, 46302, 529, 11, 24, "Print",ExpressionUUID->"ec417ae3-5f5e-4017-bd56-96061adde86f"],
+Cell[2270160, 46315, 529, 11, 24, "Print",ExpressionUUID->"02e9025d-b120-4019-95e1-46e1763691fa"],
+Cell[2270692, 46328, 531, 11, 24, "Print",ExpressionUUID->"b07ab67e-435a-4b6e-a82b-5f77a8e91d93"],
+Cell[2271226, 46341, 529, 11, 24, "Print",ExpressionUUID->"938cd681-f9d7-4a43-81f2-07913fa20f2a"],
+Cell[2271758, 46354, 529, 11, 24, "Print",ExpressionUUID->"39c6fb30-8d6a-4d8d-9994-6f42bae345f9"],
+Cell[2272290, 46367, 529, 11, 24, "Print",ExpressionUUID->"93ebc516-cebb-441b-98b8-8f4f1603bce9"],
+Cell[2272822, 46380, 529, 11, 24, "Print",ExpressionUUID->"0cdd4c37-697f-4767-ad55-4f92221a433a"],
+Cell[2273354, 46393, 529, 11, 24, "Print",ExpressionUUID->"c99942db-c4ba-48f0-95e7-30dd8f17f0cd"],
+Cell[2273886, 46406, 529, 11, 24, "Print",ExpressionUUID->"2335ac84-67b9-49a9-a017-09a8e0c4a6ae"],
+Cell[2274418, 46419, 529, 11, 24, "Print",ExpressionUUID->"0eeed8f2-195e-40f1-802b-caf21bd038e7"],
+Cell[2274950, 46432, 528, 11, 24, "Print",ExpressionUUID->"4d4b5c1c-d382-41d3-a5ac-52ae3f900f67"],
+Cell[2275481, 46445, 529, 11, 24, "Print",ExpressionUUID->"9a772258-6339-4d3a-8514-d40583d2778f"],
+Cell[2276013, 46458, 529, 11, 24, "Print",ExpressionUUID->"9eb11ee9-9ac4-4873-b466-da4df949403c"],
+Cell[2276545, 46471, 531, 11, 24, "Print",ExpressionUUID->"8f962adb-c1f8-419e-9021-a9d089c460ce"],
+Cell[2277079, 46484, 529, 11, 24, "Print",ExpressionUUID->"de26d80c-4225-45fb-8024-3ad5d34d3057"],
+Cell[2277611, 46497, 528, 11, 24, "Print",ExpressionUUID->"1bbac5d9-41b5-41e7-9808-b25a5a990907"],
+Cell[2278142, 46510, 531, 11, 24, "Print",ExpressionUUID->"0efcbad6-30b2-45be-bf8e-31907797baec"],
+Cell[2278676, 46523, 529, 11, 24, "Print",ExpressionUUID->"876194c4-d5d3-4a7e-8bd1-daf467109e1c"],
+Cell[2279208, 46536, 529, 11, 24, "Print",ExpressionUUID->"44f91fba-ff48-4310-a043-4f7922319abe"],
+Cell[2279740, 46549, 529, 11, 24, "Print",ExpressionUUID->"1aaf8a65-c5ef-4f96-ab50-7955b095de96"],
+Cell[2280272, 46562, 527, 11, 24, "Print",ExpressionUUID->"44adcac6-6fa2-4597-87be-3ffb65a19018"],
+Cell[2280802, 46575, 529, 11, 24, "Print",ExpressionUUID->"8fb3435b-6e9e-4561-b825-6e9f204aa4f7"],
+Cell[2281334, 46588, 529, 11, 24, "Print",ExpressionUUID->"78a848a3-9036-4d5e-a10c-a330d2a260c8"],
+Cell[2281866, 46601, 529, 11, 24, "Print",ExpressionUUID->"c8f2fbca-0008-4335-b6e6-c8697073261c"],
+Cell[2282398, 46614, 531, 11, 24, "Print",ExpressionUUID->"1dd6fc8d-3779-4636-802a-4189f9f826a1"],
+Cell[2282932, 46627, 529, 11, 24, "Print",ExpressionUUID->"388b48db-dd6b-4f2b-b280-7b5ee2a4632a"],
+Cell[2283464, 46640, 529, 11, 24, "Print",ExpressionUUID->"eab3aa0a-50a8-41ee-8336-7f644178464a"],
+Cell[2283996, 46653, 529, 11, 24, "Print",ExpressionUUID->"94f1163a-105e-471d-8089-7dc3b1dd1730"],
+Cell[2284528, 46666, 531, 11, 24, "Print",ExpressionUUID->"a47290ef-0229-4a79-9948-295c1804c33a"],
+Cell[2285062, 46679, 529, 11, 24, "Print",ExpressionUUID->"03f29486-c7a6-4203-9a7c-53159274b2b7"],
+Cell[2285594, 46692, 531, 11, 24, "Print",ExpressionUUID->"cbc2fb23-86f0-4eae-967b-646d27f0752f"],
+Cell[2286128, 46705, 529, 11, 24, "Print",ExpressionUUID->"02254409-5700-444c-96ee-cb7782f47981"],
+Cell[2286660, 46718, 531, 11, 24, "Print",ExpressionUUID->"9065b45d-d3e6-4550-9f25-f52c7ab5d2a1"],
+Cell[2287194, 46731, 528, 11, 24, "Print",ExpressionUUID->"cdc4b55a-8a55-4374-922f-4330437d08ae"],
+Cell[2287725, 46744, 531, 11, 24, "Print",ExpressionUUID->"d487652f-a859-4abc-afba-90fda9a6d284"],
+Cell[2288259, 46757, 529, 11, 24, "Print",ExpressionUUID->"e9a8016f-8abd-49e5-bd30-03487dac0600"],
+Cell[2288791, 46770, 531, 11, 24, "Print",ExpressionUUID->"f6627aa5-a63b-4689-a531-f9fd9f6ff3c1"],
+Cell[2289325, 46783, 528, 11, 24, "Print",ExpressionUUID->"82f0b7e8-37ef-41e4-96d9-dbaad94cf023"],
+Cell[2289856, 46796, 529, 11, 24, "Print",ExpressionUUID->"470836fa-a4ca-4f9b-bd23-4012d16256e0"],
+Cell[2290388, 46809, 531, 11, 24, "Print",ExpressionUUID->"7a3100cf-d9f4-4a9d-9228-68fb38a558fb"],
+Cell[2290922, 46822, 529, 11, 24, "Print",ExpressionUUID->"659b8e73-896e-4f34-bc5c-02830044a3d5"],
+Cell[2291454, 46835, 529, 11, 24, "Print",ExpressionUUID->"5e8da35f-7756-4964-a518-c013f255e3c4"],
+Cell[2291986, 46848, 529, 11, 24, "Print",ExpressionUUID->"46a50121-a9bf-4d85-bf5d-dc7b652d1144"],
+Cell[2292518, 46861, 529, 11, 24, "Print",ExpressionUUID->"0168d062-0bce-4e4b-9be3-0bceaac87900"],
+Cell[2293050, 46874, 529, 11, 24, "Print",ExpressionUUID->"67e103d4-033a-44ed-88f2-b30d4465084d"],
+Cell[2293582, 46887, 531, 11, 24, "Print",ExpressionUUID->"d896f028-eccb-4ef2-988b-6a7e9b0e3e27"],
+Cell[2294116, 46900, 529, 11, 24, "Print",ExpressionUUID->"dbee16e9-9956-4c34-b23a-8fa37f409128"],
+Cell[2294648, 46913, 531, 11, 24, "Print",ExpressionUUID->"e676c012-a4c6-4953-90bd-224568353817"],
+Cell[2295182, 46926, 529, 11, 24, "Print",ExpressionUUID->"dc5e52e2-92a9-45ec-8395-a9cf7f422b37"],
+Cell[2295714, 46939, 531, 11, 24, "Print",ExpressionUUID->"3ab2b64f-f0b7-4977-bf1d-7a0531297e92"],
+Cell[2296248, 46952, 529, 11, 24, "Print",ExpressionUUID->"7d1e18f1-81b5-4def-902f-f07f5c784261"],
+Cell[2296780, 46965, 529, 11, 24, "Print",ExpressionUUID->"4b5c0666-679b-45ab-8f9c-57ef999a253e"],
+Cell[2297312, 46978, 279, 5, 24, "Print",ExpressionUUID->"d4b21011-912e-41ab-8f93-a111da7aa8f6"],
+Cell[2297594, 46985, 474, 10, 24, "Print",ExpressionUUID->"16a9d063-9e47-4005-8b9a-4a83ec00a456"],
+Cell[2298071, 46997, 459, 10, 24, "Print",ExpressionUUID->"60607d17-8a34-4d71-8d39-5f6d6f4dc615"],
+Cell[2298533, 47009, 632, 14, 24, "Print",ExpressionUUID->"afa00712-e173-4895-a5f8-fa233ad4295b"],
+Cell[2299168, 47025, 632, 14, 24, "Print",ExpressionUUID->"37ce906d-2da6-487f-842b-f75452bcd614"],
+Cell[2299803, 47041, 632, 14, 24, "Print",ExpressionUUID->"af97715b-8780-4377-88e2-aec6617418f0"],
+Cell[2300438, 47057, 632, 14, 24, "Print",ExpressionUUID->"8957ac75-5a1e-4107-aa6f-de7b162718e5"],
+Cell[2301073, 47073, 636, 14, 24, "Print",ExpressionUUID->"74454467-d658-4fc9-aa06-a309b7b0df38"],
+Cell[2301712, 47089, 636, 14, 24, "Print",ExpressionUUID->"daf03625-85f6-44c4-a69b-3ca42a374fb1"],
+Cell[2302351, 47105, 636, 14, 24, "Print",ExpressionUUID->"504ce6be-8fdf-43e3-aede-6d18388e9714"],
+Cell[2302990, 47121, 636, 14, 24, "Print",ExpressionUUID->"a4d9beca-397c-4845-9373-6d4f19730fcc"],
+Cell[2303629, 47137, 636, 14, 24, "Print",ExpressionUUID->"bc085677-7c1a-48f4-9cd5-dac4e0259c00"],
+Cell[2304268, 47153, 638, 14, 24, "Print",ExpressionUUID->"4610ee3c-edec-4f45-a932-7994ef64cd37"],
+Cell[2304909, 47169, 638, 14, 24, "Print",ExpressionUUID->"54d75cf0-4e08-413c-be98-fdfd4703d4d9"],
+Cell[2305550, 47185, 638, 14, 24, "Print",ExpressionUUID->"3a41706a-380e-454e-a7f2-692e44ff77cc"],
+Cell[2306191, 47201, 637, 14, 24, "Print",ExpressionUUID->"1d2a71d1-aaa2-4ad1-9129-b78664e7eab1"],
+Cell[2306831, 47217, 637, 14, 24, "Print",ExpressionUUID->"074c3978-eaf7-434c-ba91-2c3141f81334"],
+Cell[2307471, 47233, 638, 14, 24, "Print",ExpressionUUID->"930c5b8f-719c-4dbf-958a-62d68fc46958"],
+Cell[2308112, 47249, 638, 14, 24, "Print",ExpressionUUID->"e4634487-cc5a-4ab4-a1c6-1721aee36cc1"],
+Cell[2308753, 47265, 638, 14, 24, "Print",ExpressionUUID->"530f44b3-f7af-4032-a329-45c7bc81f7e4"],
+Cell[2309394, 47281, 640, 14, 24, "Print",ExpressionUUID->"12f670a2-9c97-4115-b9b4-bd4acc18878c"],
+Cell[2310037, 47297, 637, 14, 24, "Print",ExpressionUUID->"7b783d4c-0b65-4266-a396-41f3281ec481"],
+Cell[2310677, 47313, 187259, 3573, 296, "Print",ExpressionUUID->"4c5ec22e-95a1-49ef-b741-eeca0945f7d7"],
+Cell[2497939, 50888, 183326, 3560, 296, "Print",ExpressionUUID->"037fbb3c-8ef3-40a2-bf6f-febd812ea256"],
+Cell[2681268, 54450, 199625, 3826, 296, "Print",ExpressionUUID->"1c7a87a3-12b5-4e99-98f7-bb172de020c1"],
+Cell[2880896, 58278, 192007, 3701, 296, "Print",ExpressionUUID->"44b86e37-6b82-4b3e-90a7-933c9b9fbe25"],
+Cell[3072906, 61981, 38642, 778, 296, "Print",ExpressionUUID->"0eb43952-0016-4696-bef9-7b319c25a78f"],
+Cell[3111551, 62761, 632, 14, 24, "Print",ExpressionUUID->"766fb175-9f43-40a7-a5e5-7ae88f42ca9e"],
+Cell[3112186, 62777, 632, 14, 24, "Print",ExpressionUUID->"ec0fb198-e97b-4d93-badd-f6f811bfb205"],
+Cell[3112821, 62793, 632, 14, 24, "Print",ExpressionUUID->"673a7784-fcd3-4fb3-92f8-09c499f0c71a"],
+Cell[3113456, 62809, 632, 14, 24, "Print",ExpressionUUID->"68382b7f-5248-4c77-9adb-5891b620572f"],
+Cell[3114091, 62825, 638, 14, 24, "Print",ExpressionUUID->"c39cb91c-e010-4491-8ab6-96f908294232"],
+Cell[3114732, 62841, 636, 14, 24, "Print",ExpressionUUID->"70c97ea7-6872-494c-9439-0c17e4ba8bee"],
+Cell[3115371, 62857, 636, 14, 24, "Print",ExpressionUUID->"d706ff73-2406-4c4a-9b0a-56c0010a9d52"],
+Cell[3116010, 62873, 636, 14, 24, "Print",ExpressionUUID->"ba57c76e-baf2-493d-9c2f-c4f85d55f7bc"],
+Cell[3116649, 62889, 635, 14, 24, "Print",ExpressionUUID->"01fed162-eccc-4fa8-a388-c381955985df"],
+Cell[3117287, 62905, 638, 14, 24, "Print",ExpressionUUID->"cdf96293-a47a-4694-9cf7-7c3eee562208"],
+Cell[3117928, 62921, 638, 14, 24, "Print",ExpressionUUID->"6e7bbe49-623f-4b6c-a034-a39d6aa7ba23"],
+Cell[3118569, 62937, 640, 14, 24, "Print",ExpressionUUID->"13429c38-2497-43f2-b673-70aa019a9f5d"],
+Cell[3119212, 62953, 638, 14, 24, "Print",ExpressionUUID->"6c327368-c9b9-4ae3-949a-593fb2b77007"],
+Cell[3119853, 62969, 638, 14, 24, "Print",ExpressionUUID->"47e85b11-c505-4659-89e4-33b60d35abca"],
+Cell[3120494, 62985, 637, 14, 24, "Print",ExpressionUUID->"f3fde698-e9e2-4581-812a-b0bde8dcf250"],
+Cell[3121134, 63001, 638, 14, 24, "Print",ExpressionUUID->"415d3b58-6c3b-419e-a420-fd69f60e69a2"],
+Cell[3121775, 63017, 640, 14, 24, "Print",ExpressionUUID->"f9ef4194-ebb3-4cb6-a5f8-07187185012c"],
+Cell[3122418, 63033, 640, 14, 24, "Print",ExpressionUUID->"4c972635-8329-42e5-9eee-204cdd18f466"],
+Cell[3123061, 63049, 638, 14, 24, "Print",ExpressionUUID->"1aebfe8a-7e86-4a40-8242-1b5cd17fc43d"],
+Cell[3123702, 63065, 279, 5, 24, "Print",ExpressionUUID->"ce56c22a-c969-4120-8ab3-76908cd7cb8f"],
+Cell[3123984, 63072, 496, 10, 24, "Print",ExpressionUUID->"b2ad0c55-c228-4dd8-afe1-596ac3e8de27"],
+Cell[3124483, 63084, 525, 11, 24, "Print",ExpressionUUID->"3f8774c5-285b-44f4-88e8-0185fa11c1a4"],
+Cell[3125011, 63097, 457, 10, 24, "Print",ExpressionUUID->"e93aab79-e7b3-4dbd-8e2b-1c90b2aa247c"],
+Cell[3125471, 63109, 398, 7, 63, "Print",ExpressionUUID->"5a36d2f5-f14d-44c6-9613-e31cb7d50f4f"],
+Cell[3125872, 63118, 295, 5, 24, "Print",ExpressionUUID->"b6a2c1c9-b900-4fe8-a272-adf23b8f05ac"],
+Cell[3126170, 63125, 284, 5, 44, "Print",ExpressionUUID->"9c92fc32-0f89-45c0-afd7-d26c1b8ab947"]
+}, Open  ]]
+}, Closed]],
+Cell[3126481, 63134, 1027, 25, 90, "Input",ExpressionUUID->"af420164-aedf-44d8-98eb-4d8a2113f3a2"],
+Cell[3127511, 63161, 156, 3, 30, "Input",ExpressionUUID->"e983dc9e-7c02-4e79-995f-db0add5406de"],
+Cell[3127670, 63166, 3023, 85, 262, "Input",ExpressionUUID->"e564c25e-e726-4972-89b1-0a2f41bf3658"],
+Cell[CellGroupData[{
+Cell[3130718, 63255, 225, 4, 30, "Input",ExpressionUUID->"60af3fd5-3ff8-49b0-8d45-f9b6af8fdedb"],
+Cell[CellGroupData[{
+Cell[3130968, 63263, 538, 13, 24, "Print",ExpressionUUID->"ad8e8712-859a-4105-b3f2-bea626e99d7e"],
+Cell[3131509, 63278, 537, 13, 24, "Print",ExpressionUUID->"6adec58a-9001-4755-bac4-755211d39c22"],
+Cell[3132049, 63293, 540, 13, 24, "Print",ExpressionUUID->"a702aa91-626a-43ac-84af-7eb65a2c3820"],
+Cell[3132592, 63308, 538, 13, 24, "Print",ExpressionUUID->"8c04e0f3-fff0-4878-adeb-86d45c0497b5"],
+Cell[3133133, 63323, 538, 13, 24, "Print",ExpressionUUID->"b7e8938f-27ff-408a-a41e-cd0d04558ece"],
+Cell[3133674, 63338, 168992, 3283, 296, "Print",ExpressionUUID->"e4fa3707-0315-464f-ab5e-1a60f2018984"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[3302715, 66627, 223, 4, 30, "Input",ExpressionUUID->"a4b7229c-a45a-4b68-bf3b-faf0f642a2a2"],
+Cell[CellGroupData[{
+Cell[3302963, 66635, 536, 13, 24, "Print",ExpressionUUID->"07fffa7d-22b9-4c18-b888-ce1ae9733fde"],
+Cell[3303502, 66650, 538, 13, 24, "Print",ExpressionUUID->"065f363a-68fb-4a5f-a67e-acd35ebd4481"],
+Cell[3304043, 66665, 540, 13, 24, "Print",ExpressionUUID->"f92d3e57-afe2-4c4e-b496-0c090d75a59d"],
+Cell[3304586, 66680, 538, 13, 24, "Print",ExpressionUUID->"d95596c0-fd24-4979-97fe-94e1f7cfd161"],
+Cell[3305127, 66695, 540, 13, 24, "Print",ExpressionUUID->"f8b6cf22-32c1-4de9-b054-4773a2315697"],
+Cell[3305670, 66710, 186337, 3572, 296, "Print",ExpressionUUID->"f1786919-3769-4a36-9052-5d9e2a25ed15"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[3492056, 70288, 222, 4, 30, "Input",ExpressionUUID->"2cbc7209-ee9a-4f7f-8177-387ad319a3fc"],
+Cell[CellGroupData[{
+Cell[3492303, 70296, 564, 13, 24, "Print",ExpressionUUID->"52db7e00-29b4-4ab1-a2ab-0e3ec66df1b8"],
+Cell[3492870, 70311, 562, 13, 24, "Print",ExpressionUUID->"587f1187-8f59-48fd-8985-2c28578f2c58"],
+Cell[3493435, 70326, 564, 13, 24, "Print",ExpressionUUID->"73cda055-f408-4da1-9a38-7e20ef334e8e"],
+Cell[3494002, 70341, 561, 13, 24, "Print",ExpressionUUID->"58aa7021-657d-4a96-9b12-72e7d2154a49"],
+Cell[3494566, 70356, 562, 13, 24, "Print",ExpressionUUID->"44a98079-5d15-4ce0-a5a8-a022c9a4c828"],
+Cell[3495131, 70371, 193898, 3691, 296, "Print",ExpressionUUID->"2b913ad1-b614-498f-89aa-00e8df81124c"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[3689078, 74068, 227, 5, 30, "Input",ExpressionUUID->"48303888-883d-46b4-a53c-0e49eb956a35"],
+Cell[CellGroupData[{
+Cell[3689330, 74077, 559, 13, 24, "Print",ExpressionUUID->"b75b01f0-ebbf-4e5c-b518-fd40b9763316"],
+Cell[3689892, 74092, 561, 13, 24, "Print",ExpressionUUID->"0ac61c0a-7637-4600-8e79-3732d4b01165"],
+Cell[3690456, 74107, 561, 13, 24, "Print",ExpressionUUID->"5f95f51e-ebb6-45a1-b85d-92fd14031b04"],
+Cell[3691020, 74122, 561, 13, 24, "Print",ExpressionUUID->"6e21bdf4-9a1f-49a7-a2c7-0c77719d87d2"],
+Cell[3691584, 74137, 563, 13, 24, "Print",ExpressionUUID->"6670231a-1df0-472f-a312-d696b12867d7"],
+Cell[3692150, 74152, 152214, 3004, 296, "Print",ExpressionUUID->"d4085d86-3e99-422b-b464-5da95ecfa967"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[3844413, 77162, 790, 17, 52, "Input",ExpressionUUID->"e316f8a0-fd46-4d5b-90e7-440910bafa8b"],
+Cell[CellGroupData[{
+Cell[3845228, 77183, 539, 13, 24, "Print",ExpressionUUID->"2028ddd8-fb1b-4f8a-8638-221f68d71770"],
+Cell[3845770, 77198, 539, 13, 24, "Print",ExpressionUUID->"9dc86eff-c1bc-47d2-9797-7070a68f4cff"],
+Cell[3846312, 77213, 541, 13, 24, "Print",ExpressionUUID->"2ed9d214-be4f-4374-91a9-3ed6ffde18aa"],
+Cell[3846856, 77228, 541, 13, 24, "Print",ExpressionUUID->"c6c44094-bc27-406f-a697-fe8027a06958"],
+Cell[3847400, 77243, 156993, 3032, 296, "Print",ExpressionUUID->"8cadb222-880c-431f-bebb-244137dc59cb"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4004442, 80281, 134, 3, 30, "Input",ExpressionUUID->"894c3aa5-233f-40d9-abd4-c11f7c04deed"],
+Cell[4004579, 80286, 57813, 1501, 1862, "Output",ExpressionUUID->"d353b59d-f382-4ddb-9275-565a55db2a87"]
+}, Open  ]],
+Cell[4062407, 81790, 150, 2, 30, "Input",ExpressionUUID->"cfe42b8d-a133-43f0-8eba-4b6d5054fe94"],
+Cell[CellGroupData[{
+Cell[4062582, 81796, 3693, 95, 220, "Input",ExpressionUUID->"c21a9507-1005-45da-ac08-6b71a512cdb3"],
+Cell[CellGroupData[{
+Cell[4066300, 81895, 537, 13, 24, "Print",ExpressionUUID->"cecf98cf-d5f5-42ce-becc-bed6c19908ad"],
+Cell[4066840, 81910, 5958, 166, 296, "Print",ExpressionUUID->"68173534-fb34-4083-ad18-a599cd34db03"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4072847, 82082, 3670, 95, 220, "Input",ExpressionUUID->"50946dc0-1256-43a8-8c70-6558c64d6588"],
+Cell[CellGroupData[{
+Cell[4076542, 82181, 589, 14, 24, "Print",ExpressionUUID->"42161dc8-5982-4e91-86e6-ac0e9e2855fb"],
+Cell[4077134, 82197, 6011, 165, 296, "Print",ExpressionUUID->"38bd2f3f-a624-468e-8866-cc6d57f4bb3b"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4083194, 82368, 3644, 94, 220, "Input",ExpressionUUID->"3d697f34-eb91-4e16-a6ab-b7f84711c144"],
+Cell[CellGroupData[{
+Cell[4086863, 82466, 537, 13, 24, "Print",ExpressionUUID->"a030f618-cb08-491c-b05d-c8c1cad74681"],
+Cell[4087403, 82481, 5833, 161, 296, "Print",ExpressionUUID->"31395d7a-43c7-4ce2-b56a-61625c621684"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4093285, 82648, 3646, 94, 220, "Input",ExpressionUUID->"7c67b339-5778-4a32-a704-015a1e3308a7"],
+Cell[CellGroupData[{
+Cell[4096956, 82746, 537, 13, 24, "Print",ExpressionUUID->"c7d8bfdd-77c5-4b29-9fc2-c64844f0539a"],
+Cell[4097496, 82761, 5839, 161, 296, "Print",ExpressionUUID->"e460b8c6-d4c3-42f7-84dc-6ccc1b2f9cd7"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4103384, 82928, 201, 3, 30, "Input",ExpressionUUID->"f47f20a2-ef10-4e3c-90e4-68dac4335aae"],
+Cell[4103588, 82933, 225, 3, 34, "Output",ExpressionUUID->"be9a0083-bb42-4379-92e1-991b92ddc766"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4103850, 82941, 1005, 25, 94, "Input",ExpressionUUID->"6800b168-3c3c-4c90-9751-b09d8f332f95"],
+Cell[CellGroupData[{
+Cell[4104880, 82970, 228, 5, 24, "Print",ExpressionUUID->"cfe0b0a5-e000-4ef4-b060-d0a61b123e10"],
+Cell[4105111, 82977, 445, 10, 24, "Print",ExpressionUUID->"45f9d3be-6c00-4116-8d77-940effdd0f13"],
+Cell[4105559, 82989, 474, 11, 24, "Print",ExpressionUUID->"6546963f-6dc7-4a2c-b5f3-e90c85ac3c1f"],
+Cell[4106036, 83002, 406, 10, 24, "Print",ExpressionUUID->"53babf5d-4bec-4739-8005-a06241339b0c"],
+Cell[4106445, 83014, 338, 7, 44, "Print",ExpressionUUID->"5781fdf9-69b4-4d1b-884e-6a54e167299c"],
+Cell[4106786, 83023, 244, 5, 24, "Print",ExpressionUUID->"eeffcb8f-f1dd-4e33-84ab-c32270a70114"],
+Cell[4107033, 83030, 233, 5, 44, "Print",ExpressionUUID->"0afebf41-54a3-4a92-bf05-5338b6d5e3ca"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4107315, 83041, 338, 6, 30, "Input",ExpressionUUID->"1df007b4-96eb-461b-86ae-1c696de119e6"],
+Cell[CellGroupData[{
+Cell[4107678, 83051, 539, 13, 24, "Print",ExpressionUUID->"21579126-847a-4684-9b4b-80e2512f899b"],
+Cell[4108220, 83066, 38252, 761, 296, "Print",ExpressionUUID->"838c2144-a502-4cac-b833-05dc947b99d9"]
+}, Open  ]],
+Cell[4146487, 83830, 1446, 38, 69, "Output",ExpressionUUID->"97b45850-20a4-4e49-9235-15111d28f326"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4147970, 83873, 305, 6, 30, "Input",ExpressionUUID->"3dcd3bc7-a60f-497e-8b2f-3b81c95c1fcf"],
+Cell[4148278, 83881, 656267, 16375, 20734, "Output",ExpressionUUID->"f656a8cd-2599-4067-a9c2-ba0e03ca1d96"]
 }, Closed]],
-Cell[3118823, 63057, 1027, 25, 90, "Input",ExpressionUUID->"af420164-aedf-44d8-98eb-4d8a2113f3a2"],
-Cell[3119853, 63084, 156, 3, 30, "Input",ExpressionUUID->"e983dc9e-7c02-4e79-995f-db0add5406de"]
+Cell[4804560, 100259, 153, 3, 26, "Input",ExpressionUUID->"f59e812d-d271-47da-888e-9508b5fad2f0"]
 }
 ]
 *)
-- 
GitLab